东北大学,可视化程序设计(VB),课件07第7章.ppt

VisualBasic.NET程序设计,主讲人：蒋忠中东北大学工商管理学院,第7章界面设计,教学目的,教学要求,重点难点,教学内容,教学目的,通过本章的学习，掌握窗体的属性设置、事件和方法的使用；熟悉添加多个窗体的方法；了解简单对话框、输入对话框、通用对话框和自定义对话框的应用；学会主菜单和弹出式菜单的设计、属性设置和事件方法的使用；了解TabControl控件、ListView控件和TreeView控件的设计；熟悉在窗体中添加ToolBar控件和StatusBar控件；学会在界面设计时使用多文档界面。,BACK,教学要求,1.掌握窗体的属性设置、Click和Load事件的使用。2.熟悉含有多个窗体的界面设计方法。3.掌握主菜单和弹出式菜单的概念和设计方法，会举一反三，将其应用到界面设计中。4.掌握简单对话框、输入对话框和通用对话框的设计方法，会在程序设计中合理地加以运用。,教学要求,5.掌握在界面设计中添加ToolBar和StatusBar控件的方法，并会合理设置属性值和设计相应的事件驱动程序。6.了解TabControl、ListView和TreeView控件的概念。7.学会多文档复杂程序界面的设计方法。,BACK,重点难点,重点：1.界面设计时添加多个窗体的方法。2.窗体的Load事件和Click事件的使用。3.界面中主菜单的设计及其事件的合理选用。4.使用ContextMenu组件设计弹出式菜单。,重点难点,重点：5.利用ToolBar控件在窗体中添加工具栏，并灵活选用其事件进行程序设计。6.利用StatusBar控件在窗体中添加状态栏，并灵活选用其事件进行程序设计。7.使用多文档界面进行复杂界面的程序设计。,重点难点,难点：界面中主菜单的设计及合理选用其事件进行程序设计。利用ToolBar、StatusBar控件在窗体中添加工具栏和状态栏，并灵活使用其事件。3.复杂界面设计中多文档界面设计的方法。,BACK,教学内容,7.1窗体,7.2对话框设计,7.3菜单设计,7.4高级界面设计控件,7.5多文档界面设计,7.1窗体,7.1.1概述,窗体分单文档窗体(SDI)和多文档窗体(MDI)两种。,7.1窗体,7.1.1概述,窗体分单文档窗体(SDI)和多文档窗体(MDI)两种。,7.1窗体,记事本,7.1.1概述,窗体分单文档窗体(SDI)和多文档窗体(MDI)两种。,7.1窗体,7.1.1概述,窗体分单文档窗体(SDI)和多文档窗体(MDI)两种。,7.1窗体,MicrosoftWord,7.1.1概述,窗体分单文档窗体(SDI)和多文档窗体(MDI)两种。,7.1窗体,7.1.1概述,对话框是一种特殊的窗体，能够向用户展示某些信息并接受用户输入。,Word中设置字体对话框,7.1窗体,7.1.2添加窗体,在一个项目中添加多个窗体的步骤：,1、在“项目”菜单中选择“添加windows窗体”；,7.1窗体,2、在弹出的“添加新项”对话框中选择”Windows窗体“，单击“打开“按钮；,7.1.2添加窗体,在一个项目中添加多个窗体的步骤：,7.1窗体,添加了一个窗体,7.1.2添加窗体,在一个项目中添加多个窗体的步骤：,7.1窗体,7.1.2添加窗体,默认时，多个窗体的启动从Form1开始，也可以在项目属性页设置。,设置启动窗体,7.1窗体,7.1.3窗体的设置,标题栏，可以设置Text属性值来改变,“最小化”“最大化”“关闭”按钮，可以用窗体的MaximizeBox、MinimizeBox属性确定是否显示“最大化”“最小化”按钮,7.1窗体,7.1.3窗体的设置,Icon属性用来确定窗体图标,7.1窗体,7.1.3窗体的设置,运行时单击图标会下拉一个控制菜单,7.1窗体,7.1.3窗体的设置,ControlBox属性值为False，无论如何设置属性，标题栏上不会任何显示,7.1窗体,7.1.4窗体的事件和方法,窗体常用的事件有Load、Closed、Click等。,Load在第一次显示窗体前发生。Closed在窗体关闭后发生。Click在鼠标点击窗体时发生。,7.1窗体,7.1.4窗体的事件和方法,VB.NET中提供了多个方法用于窗体的加载、显示、隐藏、关闭等。例如，创建窗体的一个实例后，必须使用Show（无模式）或ShowDialog（有模式）方法显示窗体。,7.1窗体,7.1.4窗体的事件和方法,例在Form1窗体的Button1中打开窗体Form2的代码如下：,PrivateSubButton1_Click.DimfrmAsNewForm2()frm.Show()EndSub,用New建立Form2的对象frm,7.1窗体,7.1.4窗体的事件和方法,例在Form1窗体的Button1中打开窗体Form2的代码如下：,PrivateSubButton1_Click.DimfrmAsNewForm2()frm.Show()EndSub,显示为无模式窗体，如写成frm.ShowDialog()则显示为有模式窗体,MENU,7.2对话框设计,7.2.1简单对话框,简单对话框也称为消息框，在应用程序运行时，可将提示、警告和错误等信息及时通知用户，并等待用户回应。例如，当修改了数据还没有保存就试图关闭应用程序时，可让系统弹出对话框，提示用户保存以防丢失数据。,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,Text指明要在消息框中显示的文本,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,Caption指明要在消息框的标题栏中显示的文本,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,Button指明在消息框中显示的按钮,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,Icon指定在消息框中显示的图标,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,OverloadsPublicSharedFunctionShow(_ByValtextAsString,_ByValcaptionAsString,_ByValbuttonsAsMessageBoxButtons,_ByValiconAsMessageBoxIcon,_ByValdefaultButtonAsMessageBoxDefaultButton_)AsDialogResult,defaultButton指定消息对话框的默认按钮,7.2对话框设计,7.2.1简单对话框,创建简单对话框的方法有两种：MsgBox函数、MessageBox类。用MessageBox类来显示对话框，需调用Show方法，对话框中的标题、文本、按钮、图标和默认按钮由传递给该方法的参数确定。Show方法的格式如下：,7.2对话框设计,MessageBox.Show(记录已经改动！需要保存吗？,系统提示,MessageBoxButtons.YesNoCancel,MessageBoxIcon.Question),7.2.1简单对话框,MsgBox(“记录已经改动！需要保存吗？”,_MsgBoxStyle.YesNoCancelvbQuestion,“系统提示),7.2对话框设计,7.2.2输入对话框,输入对话框用来显示提示信息，并等待用户输入文字或单击按钮，然后返回包含文本框内容的字符串。VB.NET使用InputBox函数来显示该对话框，格式如下：,PublicFunctionInputBox(_ByValPromptAsString,_OptionalByValTitleAsString=,_OptionalByValDefaultResponseAsString=,_OptionalByValXPosAsInteger=-1,_OptionalByValYPosAsInteger=-1_)AsString,7.2对话框设计,7.2.2输入对话框,输入对话框用来显示提示信息，并等待用户输入文字或单击按钮，然后返回包含文本框内容的字符串。VB.NET使用InputBox函数来显示该对话框，格式如下：,PublicFunctionInputBox(_ByValPromptAsString,_OptionalByValTitleAsString=,_OptionalByValDefaultResponseAsString=,_OptionalByValXPosAsInteger=-1,_OptionalByValYPosAsInteger=-1_)AsString,Prompt用来显示提示信息,7.2对话框设计,PublicFunctionInputBox(_ByValPromptAsString,_OptionalByValTitleAsString=,_OptionalByValDefaultResponseAsString=,_OptionalByValXPosAsInteger=-1,_OptionalByValYPosAsInteger=-1_)AsString,Title显示对话框的标题,7.2.2输入对话框,输入对话框用来显示提示信息，并等待用户输入文字或单击按钮，然后返回包含文本框内容的字符串。VB.NET使用InputBox函数来显示该对话框，格式如下：,7.2对话框设计,PublicFunctionInputBox(_ByValPromptAsString,_OptionalByValTitleAsString=,_OptionalByValDefaultResponseAsString=,_OptionalByValXPosAsInteger=-1,_OptionalByValYPosAsInteger=-1_)AsString,DefaultResponse表示在输入对话框的TextBox上显示的默认值,7.2.2输入对话框,输入对话框用来显示提示信息，并等待用户输入文字或单击按钮，然后返回包含文本框内容的字符串。VB.NET使用InputBox函数来显示该对话框，格式如下：,7.2对话框设计,PublicFunctionInputBox(_ByValPromptAsString,_OptionalByValTitleAsString=,_OptionalByValDefaultResponseAsString=,_OptionalByValXPosAsInteger=-1,_OptionalByValYPosAsInteger=-1_)AsString,Xpos，Ypos用于指定显示对话框的位置,7.2.2输入对话框,输入对话框用来显示提示信息，并等待用户输入文字或单击按钮，然后返回包含文本框内容的字符串。VB.NET使用InputBox函数来显示该对话框，格式如下：,7.2对话框设计,7.2.2输入对话框,例要输入一个0到100之建的整数，可用以下代码：,.DimtempAsStringTemp=InputBox(“输入一个0到100之间的整数”，“接受_用户输入”，“0”）.,7.2对话框设计,7.2.3通用对话框,1.通用文件对话框,利用OpenFileDialog和SaveFileDialog两个组件可以实现通用文件对话框，分别用于打开和保存文件。,OpenFileDialog,7.2对话框设计,SaveFileDialog,7.2.3通用对话框,1.通用文件对话框,利用OpenFileDialog和SaveFileDialog两个组件可以实现通用文件对话框，分别用于打开和保存文件。,7.2对话框设计,7.2.3通用对话框,2.通用颜色对话框,VB.NET采用ColorDialog组件来实现通用颜色对话框。该组件用来打开一个标准的Windows颜色选择对话框，也可以在调色板中自定义颜色。,7.2对话框设计,7.2.3通用对话框,2.通用颜色对话框,VB.NET采用ColorDialog组件来实现通用颜色对话框。该组件用来打开一个标准的Windows颜色选择对话框，也可以在调色板中自定义颜色。,7.2对话框设计,7.2.3通用对话框,2.通用颜色对话框,VB.NET采用ColorDialog组件来实现通用颜色对话框。该组件用来打开一个标准的Windows颜色选择对话框，也可以在调色板中自定义颜色。,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,VB.NET中，字体对话框用FontDialog组件实现。该组件用来打开一个标准的Windows字体对话框，允许用户选择字体、字形以及字号等选项。,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,FontDialog组件有多个配置外观的属性，通过设置属性值可定制对话框。例如，将ShowColor属性设置为True，对话框中将出现选择字体颜色的组合框。,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,PrivateSubButton1_ClickFontDialog1.ShowColor=TrueIf(FontDialog1.ShowDialog()=_DialogResult.OK)ThenTextBox1.Font=FontDialog1.FontTextBox1.ForeColor=FontDialog1.ColorEndIfEndSub,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,PrivateSubButton1_ClickFontDialog1.ShowColor=TrueIf(FontDialog1.ShowDialog()=_DialogResult.OK)ThenTextBox1.Font=FontDialog1.FontTextBox1.ForeColor=FontDialog1.ColorEndIfEndSub,添加选颜色组合框,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,PrivateSubButton1_ClickFontDialog1.ShowColor=TrueIf(FontDialog1.ShowDialog()=_DialogResult.OK)ThenTextBox1.Font=FontDialog1.FontTextBox1.ForeColor=FontDialog1.ColorEndIfEndSub,按“确定”按钮，设置文本框内文字的字体和颜色,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,PrivateSubButton1_ClickIf(ColorDialog1.ShowDialog()=DialogResult.OK)ThenTextBox1.BackColor=ColorDialog1.ColorEndIfEndSub,7.2对话框设计,7.2.3通用对话框,3.通用字体对话框,例颜色对话框和字体对话框的应用。,PrivateSubButton1_ClickIf(ColorDialog1.ShowDialog()=DialogResult.OK)ThenTextBox1.BackColor=ColorDialog1.ColorEndIfEndSub,按“确定”按钮，设置文本框的背景色,7.2对话框设计,7.2.3通用对话框,4.通用打印对话框,VB.NET提供了一组组件可以很容易地实现打印功能。,PrintDocument设置打印内容、启动打印操作PageSetupDialog设置打印页面PrintDialog选择打印机、选择打印页PrintPreviewControl和PrintPreviewDialog用于打印预览,MENU,7.3菜单设计,7.3.1菜单概述,菜单分为两种基本类型：下拉式菜单和弹出式菜单。下拉式菜单常用于主菜单的设计。主菜单通常位于窗体的顶部的菜单栏上，包括了应用程序的所有功能。,菜单栏,7.3菜单设计,7.3.1菜单概述,菜单分为两种基本类型：下拉式菜单和弹出式菜单。下拉式菜单常用于主菜单的设计。主菜单通常位于窗体的顶部的菜单栏上，包括了应用程序的所有功能。,菜单标题,7.3菜单设计,7.3.1菜单概述,菜单分为两种基本类型：下拉式菜单和弹出式菜单。下拉式菜单常用于主菜单的设计。主菜单通常位于窗体的顶部的菜单栏上，包括了应用程序的所有功能。,菜单项,7.3菜单设计,7.3.1菜单概述,菜单分为两种基本类型：下拉式菜单和弹出式菜单。弹出式菜单又称上下文菜单，即用鼠标在某个对象上右击时弹出的菜单。,弹出式菜单,7.3菜单设计,7.3.2主菜单设计,主菜单通过MainMenu(MenuStrip)组件建立。该组件是非用户界面组件，在设计阶段，不出现在窗体上，而是位于窗体下方专用的面板上。,7.3菜单设计,7.3.2主菜单设计,主菜单通过MainMenu组件建立。该组件是非用户界面组件，在设计阶段，不出现在窗体上，而是位于窗体下方专用的面板上。MainMenu组件中的主菜单由MenuItem(ToolStrip-MenuItem)对象组成，每个MenuItem对象表示的是菜单结构中单个的菜单项。,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。1.新建一个Windows应用程序项目MainMenu，在窗体上放置一个MainMenu组件，系统默认为MainMenu1。,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。2.菜单项及属性设置。,设置菜单项,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。2.菜单项及属性设置。,添加菜单项子菜单,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。2.菜单项及属性设置。,菜单项的快捷键设置可用Shortcut属性,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,放置一个RichTextBox控件，并将其Anchor属性设为”Top,Bottom,Left,Right”,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubNewfile_ClickMe.RichTextBox1.Text=“”EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubOpenfile_ClickMe.RichTextBox1.LoadFile(C:examplemainmenumy.txt,_RichTextBoxStreamType.RichText)EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubSavefile_ClickMe.RichTextBox1.SaveFile(C:examplemainmenumy.txt,_RichTextBoxStreamType.RichText)EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubCopytext_ClickMe.RichTextBox1.Copy()EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubCuttext_ClickMe.RichTextBox1.Cut()EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubPastetext_ClickMe.RichTextBox1.Paste()EndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。3.添加各菜单项的事件代码。,PrivateSubMultilinestyle_ClickMultilinestyle.Checked=NotMultilinestyle.CheckedIfMultilinestyle.CheckedThenMe.RichTextBox1.Multiline=TrueElseMe.RichTextBox1.Multiline=FalseEndIfEndSub,7.3菜单设计,7.3.2主菜单设计,例设计一个“简单记事本”。4.将Form1的Menu属性值设为MainMenu1，即把MainMenu1菜单绑定在Form1上。,7.3菜单设计,7.3.3弹出式菜单设计,在VB.NET中，弹出式菜单通过ContextMenu(Con-textMenuStrip)组件建立。与MainMenu组件的属性完全相同，不同之处有以下几点：（1）一个窗体只需要一个MainMenu组件，但可以有多个ContextMenu组件。（2）用MainMenu组件建立的菜单位置固定于窗体的顶部，而用ContextMenu组件建立的菜单位置不固定。（3）用MainMenu组件可以建立多个主菜单项，而用ContextMenu组件建立的菜单只有一个主菜单项。,7.3菜单设计,7.3.3弹出式菜单设计,下面通过在记事本的编辑区设计弹出“编辑”菜单，来说明设计弹出式菜单的步骤。1.在窗体上添加一个ContextMenu组件ContextMenu1，然后建立“复制”、“剪切”、“粘贴”菜单项。,7.3菜单设计,7.3.3弹出式菜单设计,下面通过在记事本的编辑区设计弹出“编辑”菜单，来说明设计弹出式菜单的步骤。2.为每个菜单的Click事件编写代码，方法与MainMenu组件一样。,7.3菜单设计,7.3.3弹出式菜单设计,下面通过在记事本的编辑区设计弹出“编辑”菜单，来说明设计弹出式菜单的步骤。3.将RichTextBox1的ContextMenu属性值设为ContextMenu1。,MENU,7.4高级界面设计控件,7.4.1TabControl控件,TabControl控件常用来制作多页对话框，通过选项卡来分类组织各种控件，每一页用一个选项卡来标识。,Windows中的“显示属性”对话框中的选项卡是典型的Tabcontrol控件,7.4高级界面设计控件,7.4.2ListView和TreeView控件,ListView和TreeView控件两者经常配合使用。,TreeView控件,ListView控件,ListView控件通常用于向用户展示带图标的列表项。TreeView控件提供了一个由节点构成树状的结构。,7.4高级界面设计控件,7.4.3ToolBar控件,ToolBar(ToolStrip)控件可在窗体中显示一个工具栏，在工具栏中可以设置位图按钮、下拉式菜单或ComboBox控件。,下拉式菜单,7.4高级界面设计控件,位图按钮,7.4.3ToolBar控件,ToolBar(ToolStrip)控件可在窗体中显示一个工具栏，在工具栏中可以设置位图按钮、下拉式菜单或ComboBox控件。,7.4高级界面设计控件,ComboBox控件,7.4.3ToolBar控件,ToolBar(ToolStrip)控件可在窗体中显示一个工具栏，在工具栏中可以设置位图按钮、下拉式菜单或ComboBox控件。,7.4高级界面设计控件,7.4.3ToolBar控件,在简单记事本的窗体中添加工具栏的步骤如下：1.在窗体上添加一个名称为ImageList1的ImageList控件，其中加入了简单记事本工具栏中对应的6个图标。,打开Image属性来加入图标,7.4高级界面设计控件,7.4.3ToolBar控件,在简单记事本的窗体中添加工具栏的步骤如下：2.在窗体上添加一个名称为ToolBar1的ToolBar控件，并把ToolBar1的ImageList属性设为“ImageList1”。,7.4高级界面设计控件,7.4.3ToolBar控件,在简单记事本的窗体中添加工具栏的步骤如下：3.单击ToolBar1控件中Buttons属性右侧的省略号按钮，弹出ToolBarButton集合编辑器，在“成员”框中添加6个ToolBarButton按钮。,7.4高级界面设计控件,7.4.3ToolBar控件,在简单记事本的窗体中添加工具栏的步骤如下：3.单击ToolBar1控件中Buttons属性右侧的省略号按钮，弹出ToolBarButton集合编辑器，在“成员”框中添加6个ToolBarButton按钮。,7.4高级界面设计控件,7.4.3ToolBar控件,在简单记事本的窗体中添加工具栏的步骤如下：4.对ToolBar控件编程时，采用ToolBarButton对象的IndexOf方法，来获得当前单击按钮的索引号。根据索引号判断单击的按钮，再选择相应的操作。,7.4高级界面设计控件,7.4.3ToolBar控件,PrivateSubToolBar1_ButtonClickSelectCaseToolBar1.Buttons.IndexOf(e.Button)Case0Me.RichTextBox1.Text=Case1Me.RichTextBox1.LoadFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)Case2Me.RichTextBox1.SaveFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)EndSelectEndSub,7.4高级界面设计控件,7.4.3ToolBar控件,PrivateSubToolBar1_ButtonClickSelectCaseToolBar1.Buttons.IndexOf(e.Button)Case0Me.RichTextBox1.Text=Case1Me.RichTextBox1.LoadFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)Case2Me.RichTextBox1.SaveFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)EndSelectEndSub,通过索引号判断单击了哪个按钮,7.4高级界面设计控件,7.4.3ToolBar控件,PrivateSubToolBar1_ButtonClickSelectCaseToolBar1.Buttons.IndexOf(e.Button)Case0Me.RichTextBox1.Text=Case1Me.RichTextBox1.LoadFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)Case2Me.RichTextBox1.SaveFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)EndSelectEndSub,单击了新建按钮,7.4高级界面设计控件,7.4.3ToolBar控件,PrivateSubToolBar1_ButtonClickSelectCaseToolBar1.Buttons.IndexOf(e.Button)Case0Me.RichTextBox1.Text=Case1Me.RichTextBox1.LoadFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)Case2Me.RichTextBox1.SaveFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)EndSelectEndSub,单击了打开按钮,7.4高级界面设计控件,7.4.3ToolBar控件,PrivateSubToolBar1_ButtonClickSelectCaseToolBar1.Buttons.IndexOf(e.Button)Case0Me.RichTextBox1.Text=Case1Me.RichTextBox1.LoadFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)Case2Me.RichTextBox1.SaveFile(C:examplemainmenumy.txt,RichTextBoxStreamType.RichText)EndSelectEndSub,单击了保存按钮,7.4高级界面设计控件,7.4.4StatusBar控件,StatusBar(StatusStrip)控件被放置在窗体的底部，用来显示应用程序运行中的各种状态信息，如系统日期和时间、光标的位置、键盘上Caps键的状态等。常用属性如下：,Panels：状态栏包括的状态面板的集合，每一个面板都是类StatusBarPanel的对象。ShowPanels：确定状态栏是否显示每个面板。,7.4高级界面设计控件,7.4.4StatusBar控件,向状态栏添加面板的方法：1.选中StatusBar控件，单击Panels属性，打开StatusBarPanel集合编辑器对话框。2.使用“添加”按钮添加面板并设置其状态属性。,7.4高级界面设计控件,7.4.4StatusBar控件,StatusBarPanel1,7.4高级界面设计控件,7.4.4StatusBar控件,属性设置：Text:设计者：ZZIA工作室AutoSize:Spring,7.4高级界面设计控件,7.4.4StatusBar控件,StatusBarPanel2,7.4高级界面设计控件,7.4.4StatusBar控件,属性设置：Text:空AutoSize:Contents,7.4高级界面设计控件,7.4.4StatusBar控件,在窗体的Form1_load事件中添加代码：Me.StatusBarPanel2.Text=Date.Today,7.4高级界面设计控件,7.4.4StatusBar控件,在状态栏添加系统时间,7.4高级界面设计控件,7.4.5扩展界面组件（控件）与应用,扩展界面组件是指那些不出现在VB.NET缺省工具箱中的组件，VisualStudio.NET开发环境自带了很多COM组件和NETFramework组件。使用它们的方法如下：,（1）在工具箱上右击并选择弹出菜单的“自定义工具箱”菜单项，系统弹出自定义工具箱对话框。,7.4高级界面设计控件,7.4.5扩展界面组件（控件）与应用,扩展界面组件是指那些不出现在VB.NET缺省工具箱中的组件，VisualStudio.NET开发环境自带了很多COM组件和NETFramework组件。使用它们的方法如下：,（2）选择COM组件或.NETFramework组件选项卡，选中其中的某个组件，单击“确定”按钮，被选中的组件就会出现在工具箱中。,MENU,7.5多文档界面设计,多文档界面（MultipleDocumentInterface，即MDI）可以在一个包容式窗体中包含多个窗体，一般将作为容器的窗体称为父窗体。在MDI程序中可以同时打开多个文档，每个文档用一个单独的窗体表示，该窗体称为子窗体。所有的子窗体都是使用窗体模板来创建。从类的角度讲，所有子窗体都是一个类的不同实例。,7.5多文档界面设计,在运行期间，MDI子窗体区别于普通窗体的特性如下：（1）所有子窗体在MDI窗体内部区域显示，可以像其他任何窗体一样移动子窗体和改变子窗体的大小，但不能移出父窗体之外。,7.5多文档界面设计,在运行期间，MDI子窗体区别于普通窗体的特性如下：（2）当一个子窗体最小化时，它的图标出现在MDI窗体上而不是任务栏上。当MDI窗体最小化时，MDI窗体和它的每个子窗体都用自己单独的图标表示。,7.5多文档界面设计,在运行期间，MDI子窗体区别于普通窗体的特性如下：（3）当子窗体正常显示时，每个窗体都有自己的标题，而当子窗体最大化时，其标题与MDI窗体的标题合并，在MDI窗体的标题中显示出来。,7.5多文档界面设计,在运行期间，MDI子窗体区别于普通窗体的特性如下：（4）如果活动子窗体有菜单，则菜单显示在MDI窗体的菜单栏中，而不是显示在子窗体中。,7.5多文档界面设计,例设计一个简单的图片浏览器程序。它能够同时打开多幅图片，并能以“水平平铺”、“垂直平铺”、“层叠”三种方式显示图片。,1.新建一个项目，并将一个MainMenu组件和一个OpenFileDialog组件放置到窗体Form1上。编辑MainMenu建立菜单，主菜单项：“文件”、“窗口”，其中“文件”菜单项有两个子菜单项：“打开”、“退出”，“窗口”菜单项有三个子菜单项“水平平铺”、“垂直平铺”、“层叠”。,7.5多文档界面设计,1.新建一个项目，并将一个MainMenu组件和一个OpenFileDialog组件放置到窗体Form1上。,7.5多文档界面设计,2.创建父窗体。选中Form1，要使其成为父窗体，需要将窗体的IsMdiContainer属性设置为True。,7.5多文档界面设计,3.创建子窗体模板。添加一个Windows窗体Form2，将其AutoScroll属性设为True。将一个PictureBox控件放置到Form2上，并将其SizeMode属性设置为AutoSize。,PictureBox控件,7.5多文档界面设计,4.添加事件代码。,PrivateSubOpenpicturefile_ClickOpenFileDialog1.ShowDialog()EndSub,显示“打开”文件对话框,7.5多文档界面设计