第2章VisualBasic程序开发环境

第２章VisualBasic程序开发环境目的要求学会根据要求设计窗体界面，合理使用常用控件，并对窗体进行布局。掌握窗体及常用控件的属性、事件、方法。掌握用程序代码方式设置属性的方法。掌握命令菜单的创建方法。熟悉多重窗体应用程序的创建方法。主要内容1.用户界面用户界面是应用程序中最重要的部分，是程序与用户进行交互的桥梁，标准的Windows应用程序界面都是由窗口、菜单条、各种按钮、文本框、列表框等对象构成的。2.窗体窗体是设计VB应用程序的一个基本平台，是包含用户界面或对话框所需的各种控件对象的容器。在创建一个新的工程时，默认的第一个窗体即为启动窗体。常用属性：Name、Caption、Enabled、Visible、ForeColor；常用方法：Hide、Show、Print、Cls；常用事件：Click、Initialize、Load、Activate；3.控件控件是用户可与之交互以输入或操作数据的对象。以下所列控件的属性、事件、方法需要重点掌握。（1）标签常用属性：Caption、Alignment、Autosize；常用方法：Refresh、Move；（2）命令按钮常用属性：Caption、Cancel、Default；常用事件：Click；常用方法：SetFocus；（3）文本框常用属性：Text、PasswordChar、MaxLength、Alignment；常用事件：Change、KeyPress、LostFocus；常用方法：Refresh、SetFocus；（4）列表框常用属性：List、ListCount、ListIndex、Text、Sorted；常用事件：Click、DbClick；常用方法：AddItem、RemoveItem、Clear；（5）组合框常用属性：Text、List、Style；常用事件：Click、DbClick、Change；常用方法：AddItem、RemoveItem、Clear；（6）框架常用属性：Visible、Enabled、BorderStyle、Caption；常用事件：Click、DblClick；常用方法：Move；（7）单选按钮、复选按钮常用属性：Value、Caption；常用事件：Click；常用方法：Refresh；（8）滚动条常用属性：Max、Min、LargeChange、SmallChange、Value；常用事件：Change；Scroll；常用方法：SetFocus、Refresh；（9）定时器常用属性：Interval、Enabled；常用事件：Timer；（10）图形控件①Image常用属性：Visible、Enabled、BorderStyle、Picture、Stretch；常用事件：Click、DblClick；常用方法：Move；②Picture常用属性：Visible、Enabled、BorderStyle、Picture、AutoSize、Align；常用事件：Click、DblClick、Change；常用方法：Move；③Shape常用属性：Visible、Shape、FillStyle；常用方法：Move；④Line常用属性：Visible、BorderStyle、BorderWidth；4.命令菜单菜单按使用形式分为下拉式和弹出式两种，下拉式菜单位于窗口的顶部，弹出式菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。5.多重窗体的创建方法一个工程中可以包含多个窗体，每个窗体都有自己的设计界面和相应的程序代码，它们各自执行自己的功能。（1）添加窗体通过选择“工程”菜单的“添加窗体”命令或工具栏的“添加窗体”按钮打开“添加窗体”对话框，然后选择“新建”选项卡新建一个窗体；或者选择“现存”选项卡，把一个已有的窗体添加到当前工程中。（2）设置启动对象设置启动对象，可以通过选择“工程”菜单中的“工程属性”命令打开“工程属性”对话框，然后在“通用”选项卡中的“启动对象”下拉列表框中选择指定的对象作为启动对象。实验操作1、文本框练习程序在名称为Form1的窗体上画二个文本框，名称分别为T1、T2，初始情况下都没有内容。请编写适当的事件过程，使得在运行时，在T1中输入的任何字符，立即显示在T2中（如图2-1所示）。程序中不得使用任何变量。图2-1程序运行界面实验步骤(1)窗体设计单击工具箱中的文本框控件，在窗体上画两个文本框。(2)属性设置各控件的主要属性设置如表2-1所示。表2-1对象的属性设置值对象属性名称属性值Text1NameT1Caption（空）Text2NameT2Caption（空）（3）添加程序代码PrivateSubT1_Change()T2.Text=T1.TextEndSub（4）运行程序并保存。2、标签框、文本框和命令按钮练习程序编写如图2-2所示的程序，程序界面由一个标签框，一个文本框，三个命令按钮组成，程序的功能如下：1)当运行窗体时，标签框中的内容是“欢迎使用本系统”；文本框中的内容是“本系统是由VB语言开发”。2)当单击“显示界面”按钮时，标签框和文本框中的内容分别为“程序开发的第一步”和“建立用户界面”。3)当单击“清除文字”按钮时，标签框内容还原为“欢迎使用本系统”，而文本框内容以及文本框本身将自动消失。4)当单击“结束运行”按钮时，将结束运行，回到设计状态。图2-2程序运行后的界面实验步骤(1)窗体设计在窗体上添加一个标签框，一个文本框，三个命令按钮。(2)属性设置各控件的主要属性设置如表2-2所示。表2-2对象的属性设置值对象属性名称属性值Command1Caption显示界面Command2Caption清除文字Command3Caption结束运行所有控件Font四号、粗体(3)添加程序代码PrivateSubForm_Load()Label1.Caption=欢迎使用本系统Text1.Text=本系统由VB语言开发EndSubPrivateSubCommand1_Click()Label1.Caption=程序开发的第一步Text1.Text=建立用户界面EndSubPrivateSubCommand2_Click()Label1.Caption=欢迎使用本系统Text1.Text=Text1.Visible=FalseEndSubPrivateSubCommand3_Click()EndEndSub(4)运行程序并保存。2、滚动条和文本框练习程序在名称为Form1的窗体上画一个空白文本框，名称为Txt1，其高度为1500；再画一个垂直滚动条，名称为Vsb1，其刻度范围为1500-2000。如图2-3所示界面。功能如下：（1）请编写滚动条的Change事件过程，程序运行后，如果移动滚动框，则可按照滚动条的刻度值改变文本框的高度。图2-3程序界面实验步骤(1)窗体设计在窗体上画一个文本框，再画一个垂直滚动条。(2)属性设置各控件的主要属性值设置如表2-3所示。表2-3对象的属性设置值对象属性名称属性值Text1NameTxt1Height1500VScrollBarNameVsb1VScrollBarMax2000Min1500(3)添加程序代码PrivateSubVsb1_Change()Txt1.Height=Vsb1.ValueEndSub(4)运行程序并保存。3、图像框练习程序在名称为Form1的窗体中画一个图像框，名称为Image1，其高、宽分别为1800、1500。通过属性窗口把图像文件装入图像框；再画一个命令按钮，名称为Cmd1，标题为“放大”。如图2-4所示界面。功能如下：(1)请编写适当事件过程，程序运行后，单击“放大”按钮，则把图像框的高度、宽度均增加100，同时图像也随之自动放大。图2-4程序界面实验步骤（1）窗体设计在窗体中画一个图像框和一个命令按钮。（2）属性设置各控件的主要属性值设置如表2-4所示。表2-4对象的属性设置值对象属性名称属性值Image1Height1800Width1500StretchTruePicture（图片文件的实际路径）Command1NameCmd1Caption放大（3）添加程序代码PrivateSubCmd1_Click()Image1.Height=Image1.Height+100Image1.Width=Image1.Width+100EndSub（4）运行程序并保存。4、创建四个窗体，功能如下：（1）第一个窗体如图2-5所示，等三秒钟后程序自动转到第二个窗体。图2-5第一个窗体界面（2）第二个窗体如图2-6所示。当单击第二个窗体的“题目1”按钮或“题目1”子菜单时，程序跳转到第三个窗体；当单击第二个窗体的“题目2”按钮或“题目2”子菜单时，程序跳转到第四个窗体。图2-6第二个窗体界面（3）第三个窗体如图2-7所示。在第三个窗体中单击列表框时，在文本框上显示单击的内容。双击列表框时，删除选中的列表项。点击“添加”按钮时，则把Text1里的内容添加到列表框中去。点击“清空”按钮时，清空列表框和Text1的内容，并使焦点设置在文本框上。点击“统计个数”按钮时，把文本框里的项目个数统计在Text2中。点击“返回”按钮时，程序将返回到第二个窗体界面。图2-7第三个窗体界面（4）第四个窗体如图2-8所示。当单击“打印”按钮时，在窗体和图片框上打印如图2-8所示的内容（用分号或逗号控制打印的字符间距）。单击“清空”按钮时，清空打印的内容。图2-8第四个窗体界面实验步骤(1)窗体设计①添加四个窗体分别为Form1、Form2、Form3和Form4，并设置启动对象为Form1。②在Form1上添加一个Timer控件和一个Label控件。③在Form2上添加三个按钮，并选择“工具”菜单中的“菜单编辑器命令制作菜单。④在Form3上添加一个列表框List、两个文本框Text和四个按钮Command。⑤在Form4上添加一个图片框Picture和两个按钮Command。(2)属性设置Form1的主要属性值设置如表2-5所示。表2-5Form1的主要属性值对象属性名称属性值Timer1Interval3000EnabledTrueLabel1Caption“三秒钟后自动转入第二个窗体”Font四号、粗体Form2的主要属性值设置如表2-6所示。表2-6Form2的主要属性值对象属性名称属性值Command1Caption题目1Command2Caption题目2Command3Caption题目3菜单(题目)标题题目(&T)名称Timu子菜单(题目1)标题题目1名称Timu1子菜单(题目2)标题题目2名称Timu2菜单(退出)标题退出(&E)名称TuichuForm3的主要属性值设置如表2-7所示。表2-7Form3的主要属性值对象属性名称属性值List1List语文数学英语Command1Caption添加Command2Caption清除Command3Caption返回Command4Caption统计个数Form4的主要属性值设置如表2-8所示。表2-8Form4的主要属性值对象属性名称属性值Command1Caption打印Command2Caption清空（3）添加程序代码Form1的程序代码：PrivateSubTimer1_Timer()Form1.HideForm2.ShowTimer1.Enabled=False’窗体二显示后把计时器即时关闭EndSubForm2的程序代码：PrivateSubCommand1_Click()’“题目1”按钮单击事件Form2.HideForm3.ShowEndSubPrivateSubCommand2_Click()’“题目2”按钮单击事件Form2.HideForm4.ShowEndSubPrivateSubCommand3_Click()’“退出”按钮单击事件EndEndSubPrivateSubtimu1_Click()’“题目1”菜单单击事件Form2.HideF