Ch02VisualBasic简单工程的设计(阅读)课件

第2章VisualBasic简单工程的设计本章介绍VisualBasic的一些基本概念，几个常用控件的属性、事件和方法，并通过一个简单例子说明VisualBasic应用程序设计的一般过程11/11/20221第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第2章VisualBasic简单工程的设计本章介绍教学要求理解面向对象程序设计的方法，掌握对象、属性、事件和方法等概念掌握VisualBasic简单工程的设计步骤掌握窗体对象的常用属性、事件和方法及其使用掌握命令按钮、标签、文本框控件的常用属性、事件和方法及其使用11/11/20222第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)教学要求理解面向对象程序设计的方法，掌握对象、属性、事件和第1节VisualBasic中的一些基本概念在用VisualBasic进行程序设计之前，首先要正确理解VisualBasic的对象、属性、事件、方法等几个重要概念。正确理解这些概念是设计VisualBasic应用程序的基础11/11/20223第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第1节VisualBasic中的一些基本概念在用V一、对象与类1.对象(Object)对象是代码和数据的集合。现实生活中的一个实体就是一个对象，如一支钢笔、一辆汽车在VisualBasic中，对象可以是窗体、各种控件等，它既包括作用于对象的操作(方法)和对象的响应(事件)2.类(Class)类是同种对象的集合与抽象，是一个整体概念，是创建对象实例的模板，而对象是类的实例化，类与对象是面向对象程序设计语言的基础以"汽车"为例，说明类与对象的关系。汽车是一个笼统的名称，是整体概念，我们把汽车看成一个"类"，一辆辆具体的汽车(比如你的汽车)是这个类的实例11/11/20224第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、对象与类1.对象(Object)11/9/20224对象与类工具箱的各种控件并不是对象，而是代表了各个不同的类。通过类的实例化，可以得到真正的对象。当在窗体上画一个控件时，就将类转换为对象，即创建了一个控件对象，也简称为控件类对象11/11/20225第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类工具箱的各种控件并不是对象，而是代表了各个不同的类。对象与类3.对象的建立和命名(1)对象的建立方法一:单击工具箱控件对象在窗体上按住左键拖拉到所需要的大小后释放方法二:双击工具箱控件对象，则立即在窗体出现一个默认大小的对象框(2)编辑对象先选中对象(单击对象)放大、缩小删除对象复制对象11/11/20226第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类3.对象的建立和命名(1)对象的建立11/9/20对象与类(3)对象的命名每一个对象都有有自己的名字。每个窗体、控件对象在建立时VisualBasic系统给出了一个默认名。用户可通过属性窗口设置(名称)来给对象命名命名的原则:必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线(最好不用)串组成长度≤255个字符智能化命名规则(国际通用方法):用前3个小定字母组成前缀(指明对象的类型)和表示该对象作用的缩写字母组成11/11/20227第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类(3)对象的命名命名的原则:智能化命名规则(国际对象与类控件名称的通用前缀惟一名称名称前缀惟一名称名称前缀Picture1picTimer1tmrLabel1lblDrive1drvText1txtDir1dirOption1optFile1filCheck1chkShape1shpCommand1cmdLine1linFrame1fraImage1imgCombo1cboData1dtaList1lstOLE1oleHscroll1hsbVscroll1vsb11/11/20228第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类控件名称的通用前缀惟一名称名称前缀惟一名称名称前缀P二、属性(Property)对象中的数据，所有对象都有各自的属性。它们是用来描述和反映对象特征的参数。例如:控件名称(Name)、标题(Caption)、颜色(Color)、字体(FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能对象属性设置的方法:方法一:在设计模式下，通过属性窗口直接设置对象的属性方法二:在程序的代码中通过赋值实现，其格式为:perty=expression例1: cmdDisp.Caption="显示" Form1.Height=400011/11/20229第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、属性(Property)对象中的数据，所有对象都有各自属性(Property)对同一对象设置多个属性时，可以使用With...EndWith语句简化书写例2

:对窗体的属性进行设置Form1.Width=4000Form1.Height=4000Form1.Caption="欢迎使用我的应用程序"Withobject

[statements]EndWithWithForm1.Width=4000.Height=4000.Caption="欢迎使用我的应用程序"EndWith11/11/202210第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)属性(Property)对同一对象设置多个属性时，可以使用W三、事件(Event)、事件过程(EventProcedure)事件

:可被对象识别的动作。VisualBasic为每个对象预先定义好了一系列的事件。例如单击鼠标(Click事件)、双击鼠标(DblClick事件)、按下键盘键(KeyPress事件)、窗体加载(Load事件)等

事件过程:是指附在该对象上的程序代码，是事件触发后处理的程序事件过程的形式:PrivateSubForm_event([arglist])[statements]EndSub11/11/202211第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)三、事件(Event)、事件过程(EventProced事件(Event)及事件过程(EventProcedure)例3:对于窗体的单击事件编写如下代码PrivateSubForm_Click()DimXAsInteger,YAsInteger,ZAsInteger '

定义变量X=20Y=30Z=X+YPrint"Z=";Z '显示输出EndSub例4:命令按钮cmdHide的Click事件代码PrivateSubcmdHide_Click()

cmdHide.Visible=FalseEndSub11/11/202212第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)事件(Event)及事件过程(EventProcedure四、方法(Method)在对象上可操作的过程，是VisualBasic系统提供的一种特殊的过程和函数----方法。方法是面向对象的，所以对象的方法调用一般要指明对象对象方法调用形式:[object.]method[arglist]

如省略对象，表示在当前对象，一般指窗体例5:在窗体Form1上显示"VB程序设计"，可使用窗体的Print方法Form1.Print"VB程序设计"例6

:使用Show方法显示名称为MyForm2的窗口MyForm2.Show 'Show方法没有参数11/11/202213第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)四、方法(Method)在对象上可操作的过程，是Visu第2节VisualBasic中简单工程的设计建立一个简单的VisualBasic工程的步骤新建一个工程设计用户界面编写事件过程及通用过程运行、调试并保存工程

11/11/202214第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第2节VisualBasic中简单工程的设计建立一一、新建工程新建一个简单工程通常是从新建一个标准EXE工程开始，可以有以下两种方法:启动VisualBasic后，在系统显示的"新建工程"对话框的"新建"选项卡中选择"标准EXE"，然后单击"打开"按钮使用"文件|新建工程"命令，然后在打开的"新建工程"对话框中选择"标准EXE"，再单击"确定"按钮11/11/202215第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、新建工程新建一个简单工程通常是从新建一个标准EXE工程二、设计用户界面1.控件的画法(1)画1个单独的控件

单击工具箱中所需的控件按钮，在窗体上拖动鼠标画出控件双击工具箱中所需的控件按钮，即可在窗体中央位置画出控件

(2)连续画多个同类件

按下Ctrl键，同时单击工具箱中所需的控件按钮，然后松开Ctrl键在窗体上连续多次拖动鼠标可以画出多个控件画完所需的控件后，单击工具箱中的指针按钮或其他按钮

11/11/202216第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、设计用户界面1.控件的画法11/9/202216第设计用户界面2.控件的选择当画完一个控件或用鼠标单击某控件之后，表明选择了该控件同时选择多个控件的方法:按住Shift键或Ctrl键不放，再用鼠标依次单击各个控件在窗体的空白区域按住鼠标左键拖曳鼠标，只要鼠标拖曳出的虚线框接触到的控件都会被选择

11/11/202217第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面2.控件的选择11/9/202217第2章设计用户界面选择了一个或多个控件之后，在属性窗口显示的是这些控件共有的属性，这时在属性窗口可以为多个控件同时设置属性

选定多个控件当前控件11/11/202218第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面选择了一个或多个控件之后，在属性窗口显示的是这些设计用户界面3.控件的缩放和移动(1)控件缩放选择控件拖曳控件边框上的黑色控制柄Shift+"方向箭头"设置控件的Width和Height属性(2)移动控件将鼠标指针移到控件内拖曳鼠标到合适的位置使用Ctrl+"方向箭头"设置控件的Left、Top属性11/11/202219第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面3.控件的缩放和移动11/9/202219第设计用户界面控件的Left、Top、Width、Height属性对于窗体，Left、Top、Width、Height属性总是以缇为单位来表示对于控件，Left、Top、Width、Height属性的度量单位取决于控件所在容器(如窗体)的坐标系LeftTopWidthHeight11/11/202220第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面控件的Left、Top、Width、Height设计用户界面4.控件的复制与删除

(1)控件的复制

选择控件"编辑|复制"命令"编辑|粘贴"，弹出对话框单击"否":在窗体的左上角复制出一个控件，VisualBasic为其取另一个名称单击"是"复制出一个具有相同名称的控件，这样复制出来的控件构成一个控件数组(2)控件的删除

选择控件，按Delete键，或右击控件，从快捷菜单中选择"删除"11/11/202221第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面4.控件的复制与删除11/9/202221第设计用户界面5.控件的的布局通过"格式"菜单来完成:控件的排列、对齐、统一尺寸、调整间距等操作。对于重叠的控件，可以使用"格式|顺序|置前"或"格式|顺序|置后"命令对齐或统一尺寸时以该控件为准11/11/202222第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面5.控件的的布局对齐或统一尺寸时以该控件为准1三、编写代码代码也叫程序，用于完成应用程序的功能，代码的编写在代码窗口中进行除了一些通用的常量、变量、过程等之外，大多数代码都要写在相应的事件过程中。因此编写代码之前首先要明确代码的编写位置希望在窗体加载时将窗体的背景色设置为蓝色，需要在窗体的Load事件过程中编写代码希望在单击某命令按钮时实现某些功能，需要将代码写在命令按钮的Click事件中编写好程序后，程序正确与否，需要通过运行、调试之后才能确定11/11/202223第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)三、编写代码代码也叫程序，用于完成应用程序的功能，代码的编四、保存工程一个工程由多种文件组成，如工程文件、窗体文件、标准模块文件等，因此，保存一个工程需要分多步才能完成

1.保存工程

单击"文件|保存工程"，对于从未保存过的工程，系统打开"文件另存为"对话框在"文件另存为"对话框中，注意保存的类型，对于只含有窗体模块的工程，首先提示保存窗体文件(.frm)。然后提示保存工程文件(.vbp)

11/11/202224第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)四、保存工程一个工程由多种文件组成，如工程文件、窗体文件、保存工程2.修改窗体文件的保存位置或修改窗体文件名方法一:在工程资源管理器窗口中右击窗体文件，选择"MyProject1.frm另存为"命令方法二:使用"文件|MyProject1.frm另存为"命令(其中，"MyProject1.frm"视具体窗体名而定)窗体另存之后，必须再次保存工程11/11/202225第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)保存工程2.修改窗体文件的保存位置或修改窗体文件名方法一保存工程3.修改工程文件的保存位置或修改工程文件名方法: 在工程资源管理器窗口中单击工程文件，然后使用"文件|工程另存为"命令进行另存

如果要同时另存窗体文件和工程文件，则必须先另存窗体文件，再另存工程文件不要直接在"我的电脑"或"资源管理器"下直接修改工程文件或窗体文件的文件名，更不要修改其扩展名11/11/202226第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)保存工程3.修改工程文件的保存位置或修改工程文件名方法:保存工程4.关闭当前工程选择"文件|移除工程"命令可以关闭当前工程，继续设计其他工程5.打开工程方法一:使用"文件|打开工程"命令方法二:如果要在Windows中的"我的电脑"或"资源管理器"中打开工程，应双击工程文件，即扩展名为.vbp的文件11/11/202227第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)保存工程4.关闭当前工程11/9/202227第2章五、运行与调试工程如果运行有错或者不能达到预期的目的，则需要结束运行，修改代码甚至修改界面，然后再次运行VisualBasic提供了多种手段来帮助编程人员查找代码中的错误选择"运行|启动"命令单击标准工具栏中的"启动"按钮按F5键11/11/202228第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)五、运行与调试工程如果运行有错或者不能达到预期的目的，则需第3节窗体窗体(Form)也就是平时所说的窗口，它是VisualBasic编程中最常用的对象，也是程序设计的基础。窗体是所有控件的容器，各种控件对象必须建立在窗体上，一个窗体对应一个窗体模块11/11/202229第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第3节窗体窗体(Form)也就是平时所说的窗口，它一、窗体属性窗体属性决定了窗体的外观与操作。窗体的许多属性既可以通过属性窗口设置，也可以在程序中设置有些属性(如MaxButton、BorderStyle等影响窗体外观的属性)只能在设计状态设置有些属性(如CurrentX、CurrentY等)只能在运行期间设置1.窗体的基本属性窗体的基本属性有Name、Left、Top、Height、Width、Visible、Enabled、Font、ForeColor、BackColor等，在VisualBasic中的大多数控件基本上都有这些属性11/11/202230第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、窗体属性窗体属性决定了窗体的外观与操作。窗体的许多属性窗体属性(1)Name名称属性(任何对象都具有的)创建的对象名称，有默认的名称。在程序中，控件名是作为对象的标识而引用，不会显示在窗体上(2)Height、Width、Top和Left属性单位为twip:1twip=1/20点=1/1440英寸=1/567cm

屏幕Screen窗口Form1命令按钮OKScreen.WidthScreen.HeightForm1.TopForm1.LeftOK.LeftOK.TopOK.HeightOK.WidthForm1.WidthForm1.Height11/11/202231第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性(1)Name名称属性(任何对象都具有的)(2)窗体属性例1: 在窗体Form1被加载时，将其大小设置为屏幕大小的75%，并居中显示。通过窗体的Load事件来实现。PrivateSubForm_Load()Form1.Width=Screen.Width*.75 '设置窗体的宽度Form1.Height=Screen.Height*.75 '设置窗体的高度'在水平方向上居中显示Form1.Left=(Screen.Width–Form1.Width)/2'在垂直方向上居中显示Form1.Top=(Screen.Height–Form1.Height)/2EndSub11/11/202232第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性例1: 在窗体Form1被加载时，将其大小设置为窗体属性(3)Caption标题属性决定出现在窗体的标题栏上的文本内容(4)字体Font属性组

FontName属性是字符型，决定对象上正文的字体(缺省为宋体)FontSize属性是整型，决定对象上正文的字体大小FontBold属性是逻辑型，决定对象上正文是否是粗体FontItalic属性是逻辑型，决定对象上正文是否是斜体FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线FontUnderLine属性是逻辑型，决定对象上正文是否带下划线对于图片框控件、窗体和打印机(Printer)对象，设置这些属性不会影响在控件或对象上已经绘出的图片和文本对于其他控件，改变字体将会在屏幕上立即生效11/11/202233第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性(3)Caption标题属性(4)字体Font属窗体属性(5)Enabled属性(逻辑值)决定控件是否可操作True:允许用户进行操作，并对操作出响应(缺省值)False:呈暗淡色，禁止用户进行操作如果使窗体或其他"容器"对象无效，则在其中的所有控件也将无效(6)Visible属性(逻辑值)

决定控件是否可见True:运行时控件可见(缺省值)False:运行时控件隐藏，用户看不到但控件本身是存在的11/11/202234第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性(5)Enabled属性(逻辑值)(6)Visi窗体属性例2: 下面的程序当文本框Text1不包含任何文本时使命令按钮Command1无效PrivateSubText1_Change()IfText1.Text="" '判断文本框是否为空Command1.Enabled=False '使按钮无效ElseCommand1.Enabled=True '使按钮有效EndIfEndSub11/11/202235第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性例2: 下面的程序当文本框Text1不包含任何文窗体属性(7)BackColor属性和ForeColor属性BackColor属性用于返回或设置对象的背景颜色，ForeColor属性用于返回或设置在对象里显示图片和文本的前景颜色在VisualBasic中通常用Windows运行环境的红-绿-蓝(RGB)颜色方案，使用调色板或在代码中使用RGB或QBColor函数指定标准RGB颜色例3:将窗体Form1的背景色设置为红色

Form1.BackColor=RGB(255,0,0)

'标准RGB颜色

Form1.BackColor=&HFF&

'十六进制长整数数据

Form1.BackColor=vbRed

'VB系统内部常量11/11/202236第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性(7)BackColor属性和ForeColor属窗体属性2.窗体的其它常用属性MaxButton最大化按钮和MinButton最小化按钮当值为Ture，有最大或最小化按钮；值为False则无Icon控制图标属性返回或设置窗体左上角显示或最小化时显示的图标注意:此属性必须在ControlBox属性设置为Ture才有效ControlBox控制菜单框属性设置为Ture，有控制菜单；设置为False则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture11/11/202237第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性2.窗体的其它常用属性MaxButton最大化按钮窗体属性Picture图片属性设置窗体中要显示的图片。加载图片操作同Icon控制图标属性BorderStyle边框风格属性通过改变BorderStyle属性，可以控制窗体如何调整大小0-None 无边框1-FixedSingle 单线边框，不可以改变窗口大小2-Sizable 双线边框，可以改变窗口大小3-FixedDouble 双线框架，不可以改变窗口大小4-FixedToolWindow 窗体外观与工具条相似。有关闭按钮，不可以改变窗口大小5-SizableToolWindow 窗体外观与工具条相似。有关闭按钮，可以改变窗口大小11/11/202238第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性Picture图片属性11/9/202238第2窗体属性WindowsState属性0-Normal:正常窗口状态，有窗口边界vbNormal1:最小化状态，以图标方式运行 vbMinimized2:最大化状态，无 vbMaximizedAutoRedraw属性该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出当为True时，重新还原该窗体以前的画面当为False时，则不重画AutoRedraw属性11/11/202239第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体属性WindowsState属性11/9/202239第二、窗体事件最常用的事件Click/DblClick:单击/双击窗体触发Load:窗体被装入时触发的事件。该事件通常用来在启动应用程序时对属性和变量进行初始化Unload事件:卸载窗体时触发该事件Resize事件:无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件11/11/202240第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、窗体事件最常用的事件11/9/202240第2章三、窗体方法窗体常用的方法有:打印输出Print移动Move清除Cls显示Show隐藏Hide方法的使用的形式:[object.]method[arglist]

11/11/202241第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)三、窗体方法窗体常用的方法有:11/9/202241第窗体方法1.Print方法[object.]Print[{Spc(n)|Tab(n)}expression][;|,]作用:以当前所设置的前景色和字体在对象上输出信息object:表示窗体、图形框或打印机(Pinter)等对象，省略对象在窗体上输出Spc(n)函数:插入n个空格，允许重复使用Tab(n)函数:左端开始右移动n列，允许重复使用expression

:要输出的数值表达式或字符串表达式;(分号):光标定位上一个显示的字符后,(逗号):光标定位在下一个打印区的开始位置处。每个打印区占14列无;,换行11/11/202242第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法1.Print方法[object.]Print[窗体方法例4: 在窗体Form1的单击事件中写入如下代码PrivateSubForm_Click()a=10:b=3.14:c=100Print"a=";a,"b=";bPrint"a=";a,"b=";bPrint"a=";a,"b=";bPrint

'空一行Print"a=";a,"b=";bPrint"a=";a,Tab(18);"b=";b

'从第18列开始打印输出Print"a=";a,Spc(18);"b=";b

'输出a值后，插入18个空后输出bPrintPrint"a=";a,"b=";bPrintTab(18);"a=";a,"b=";bPrintSpc(18);"a=";a,"b=";bEndSub11/11/202243第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法例4: 在窗体Form1的单击事件中写入如下代码窗体方法2.Cls方法[object.]Cls作用:清除运行时在窗体或图形框中显示的文本或图形Cls将清除图形和打印语句在运行时所产生的文本和图形，Cls方法不能清除在设计时的文本和图形清屏后对象的CurrentX和CurrentY属性复位为0，坐标当前回到原点例5: 执行窗体的Cls方法 Form1.Cls11/11/202244第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法2.Cls方法[object.]ClsCls将清除窗体方法3.Move方法[object.]Moveleft[,top[,width[,height]]]作用:移动窗体或控件，并可改变其大小object:可以是窗体及除时钟、菜单外的所有可视控件，省略代表窗体left、top、width、height:表示左边距、上边距、宽度、高度，以twip为单位。如果是窗体对象，则"左边距"和"上边距"是以屏幕左边界和上边界为准。其它则是以窗体的左边和上边界为准例6:使用Move方法移动一个窗体。双击窗体，窗体移动并定位在屏幕的左上角，同时窗体的长宽也缩小一倍PrivateSubForm_DblClick()Form1.Move0,0,Form1.Width/2,Form1.Height/2EndSub11/11/202245第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法3.Move方法[object.]Movelef窗体方法4.Show(显示)方法[object.]Move[style],[ownerform]作用:显示窗体对象。相当于将Visible属性设置为Trueobject:一个窗口对象。省略表示与活动窗体模块关联的窗体style:style为1(vbModal)，则窗体是模式的；style为0(vbModeless)，则窗体是无模式的ownerform

:ownerform指定的窗体可看作是object窗体的父窗体。对于标准的VisualBasic窗体，使用关键字Me例7:下面的例子说明如何使用ownerform参数

PrivateSubcmdShowResult_Click()

'显示模式窗体frmResultfrmResult.ShowvbModal,Me

EndSub11/11/202246第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法4.Show(显示)方法[object.]Move窗体方法5.Hide(隐藏)方法[object.]Hide作用:隐藏窗体对象。相当于将Visible属性设置为Falseobject:如果省略，则带有焦点的窗体就认为是该object如果调用Hide方法时窗体还没有加载，那么Hide方法将加载该窗体但不显示它例8:实现将指定的窗体在屏幕上进行显示或隐藏的切换PrivateSubForm_Click()Form1.Hide '隐藏窗体MsgBox"单击确定按钮，使窗体重现屏幕" '显示信息Form1.Show '重现窗体EndSub11/11/202247第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)窗体方法5.Hide(隐藏)方法[object.]Hide例9: 窗体初始画面如左图，单击窗体，窗体运行如右图，双击窗体，清除窗体上显示的内容PrivateSubForm_Click() MyForm1.BackColor=vbYellow MyForm1.ForeColor=vbRed MyForm1.FontName="楷体_GB2312" MyForm1.FontSize=30 MyForm1.FontBold=True MyForm1.CurrentX=800 MyForm1.CurrentY=500 MyForm1.Print"北京欢迎您" MyForm1.Caption="2008"EndSubPrivateSubForm_DblClick() MyForm1.ClsEndSubex02-3-0911/11/202248第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)例9: 窗体初始画面如左图，单击窗体，窗体运行如右图，双第4节命令按钮、标签、文本框命令按钮、标签、文本框是VisualBasic中最基本、使用最广泛的三个控件，本节将介绍这三个控件的常用属性、方法和事件11/11/202249第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第4节命令按钮、标签、文本框命令按钮、标签、文本框是一、命令按钮--CommandButton使用命令按钮来接受用户的操作信息，激发某些事件，实现一个命令的启动、中断、结束等操作命令按钮接受用户输入的命令可以有3种方式:鼠标单击按Tab键焦点跳转到该按钮，再按Enter键快捷键(Alt+有下划线的字母)1.基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font等与窗体的使用相同11/11/202250第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、命令按钮--CommandButton使用命令按钮命令按钮CommandButton2.常用属性Caption 标题属性。命令按钮显示的内容，可在某字母前加"&"设置快捷键。例如:&Ok，显示Ok(Alt+O)Default

该属性把窗体中哪个命令按钮作为缺省按钮。如果该属性被设置为True时，则此命令按钮为缺省按钮 注意：窗体中只允许有一个命令按钮是缺省按钮Cancel

该属性把窗体中哪个命令按钮作为取消按钮。当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同 注意：窗体中只允许有一个命令按钮是取消按钮

Value

将按钮的Value属性设置为True，即可触发命令按钮的Click事件。该属性在设计时无效Picture

按钮显示的图片文件(.bmp和.ico)，当Style属性值设为1时有效Style

用来指示控件的显示类型和行为。0(VbButtonStandard，缺省)表示标准方式，只显示文字；1(VbButtonGraphical)表示图形方式，文字、图形均可ToolTipText

设置工具提示，和Picture结合使用11/11/202251第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)命令按钮CommandButton2.常用属性Captio命令按钮CommandButton3.常用方法Setfocus

获得焦点。使用该方法之前，必须保证命令按钮当前处于可见和可用状态4.常用事件最常用的是Click()事件，一般也只对该事件进行编程例1:设计如下图所示的窗体，单击"显示"按钮显示"你好"；单击"隐藏"按钮，"你好"隐去；单击"关闭"按钮，关闭窗体设置三个命令按钮的Caption属性对三个命令按钮编写其Click事件ex02-4-0111/11/202252第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)命令按钮CommandButton3.常用方法例1:设二、标签控件--Label标签控件用来显示文本，但没有文本输入的功能标签主要标注和显示提示信息，通常是标识那些本身不具有标题(Caption)属性的控件。可用标签控件为文本框、列表框、组合框的控件添加描述性的文字，或者用来显示如处理结果、事件进程等信息既可以在设计时通过属性窗口设定标签控件显示的内容，也可以在程序运行时通过代码改变控件显示的内容1.基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与窗体的使用相同11/11/202253第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、标签控件--Label标签控件用来显示文本，但没有标签控件Label2.常用属性Caption 用来改变标签控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉Alignment

设置Caption属性中文本的对齐方式，共有三种可选值:0-左对齐，1-右对齐，2-居中对齐BackStyle 该属性用于确定标签的背景是否透明。有两种情况可选:值为0时，表示背景透明，标签后的背景和图形可见；值为1时，表示不透明，标签后的背景和图形不可见

AutoSize

该属性有两种设置值：True和False。设置为True，标签控件大小随文本的改变而变化；设置为False(缺省)，则标签控件不因文本的改变而变化WordWrap 该属性有两种设置值:True和False。设置为True，标签控件将在垂直方向变化大小以和文本相适应，但将限制其原先的水平大小；设置为False(缺省)，标签控件不会改变垂直方向大小以适应文本的需要11/11/202254第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)标签控件Label2.常用属性Caption 用来改变标签控件Label例2:在窗体上放置5个标签，其名称使用默认值Label1~Label5，它们的高度和宽度相同，运行后界面如右图所示对象属性（属性值）Label1Caption:左对齐,Alignment:0,BorderStyle:1Label2Caption:水平居中,Alignment:2,BorderStyle:1Label3Caption:自动,AutoSize:True,WordWrap:False,BorderStyle:1Label4Caption:背景白,BackColor:&H00FFFFFF&,BorderStyle:0Label5Caption:背景红,BackColor:&H000000FF&,BorderStyle:0ex02-4-0211/11/202255第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)标签控件Label例2:在窗体上放置5个标签，其名称三、文本框控件--TextBox文本框控件有两个作用:一是用于显示用户输入的信息，作为接收用户输入数据的接口；二是在设计或运行时，通过对控件的Text属性赋值，作为信息输出的对象1.基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与标签控件的使用相同2.常用属性Text 文本属性。在文本框中显示的正文内容存放在Text属性中。当程序运行时，用户通过键盘输入正文内容，保存在Text属性中Maxlength 设置文本框中所允许输入的最大字符数，默认值为0，表示无字符限制11/11/202256第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)三、文本框控件--TextBox文本框控件有两个作用文本框控件TextBoxMultiLine 该属性表明文本框是否可以接收和显示多行文本。设置为True，允许有多行文本；设置为False(缺省)，只允许一行文本ScrollBars 当MultiLine为True时，该属性才有效，滚动条的形式 0-None:无滚动条 1-Horizontal:水平滚动条 2-Vertical:垂直滚动条 3-Both:水平和垂直滚动条Locked 该属性设置文本框的内容是否可以编辑。设置为True，则文本框中的文本为只读；设置为False，文本框中的文本可以编辑PassWordChar设置PasswordChar属性为了掩盖文本框中输入的字符。它常用于设置密码输入，只显示占位符11/11/202257第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)文本框控件TextBoxMultiLine 该属性表明文本框文本框控件TextBoxSelStart、SelLength、SelText:文本框中对文本的编辑属性SelStart

确定在文本框选中文本的起始位置。第一字符的位置为0。若没有选择文本，则用于返回或设置文本的插入点位置，如果SelStart的值大于文本的长度，则SelStart取当前文本的长度SelLength

设置或返回文本框中选定的文本字符串长度(字符个数)SelText

设置或返回当前选定文本中的文本字符串11/11/202258第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)文本框控件TextBoxSelStart、SelLength文本框控件TextBox3.常用事件Change 当改变文本框的Text属性时会引发该事件。用户每向文本框输入一个字符，就会触发一次该事件KeyPress 当用户按下并释放键盘上一个ANSI键时，就会触发一次该事件，并返回一个KeyAscii参数(字符的Ascii值)到该事件过程中LostFocus

当控件失去焦点时发生GotFocus

当控件获得焦点时发生4.常用方法Setfocus

获得焦点。使用该方法之前，必须保证命令按钮当前处于可见和可用状态11/11/202259第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)文本框控件TextBox3.常用事件11/9/202259文本框控件TextBox例3: 在文本框Text1的Change事件编写有如下程序代码，当程序运行后中输入ABCD，则在窗体上在输出结果是?PrivateSubText1_Change()

PrintText1.textEndSubAABABCABCD例4

: 以下程序运行后中输入ABCD，则在窗体上在输出结果是什么?PrivateSubText1_KeyPress(KeyAsciiAsInteger)PrintKeyAscii,Chr(KeyAscii)EndSub65 A66 B67 C68 D11/11/202260第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)文本框控件TextBox例3: 在文本框Text1的Ch四、一个简单的VisualBasic程序的创建实例

例5: 设计一简单应用程序，计算两个数的和。输入完两个数后，单击"求和"按钮，进行求和运算，并显示计算结果；单击"清除"按钮，将三个文本框置空；单击"关闭"按钮，关闭窗体，结束运行02_4_01.vbpex02-4-0511/11/202261第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)四、一个简单的VisualBasic程序的创建实例例5一个简单的VisualBasic程序的创建实例新建工程 在"新建工程"对话框中选择"标准EXE"，进入"设计工作模式"，创建了一个带有单个窗体的工程程序界面设计1.在窗体上放置五个标签，三个文本框，三个命令按钮2.调整控件的大小、位置和锁定控件3.设置各对象的属性对象(Name)属性及属性值Label1Caption:加数,FontSize:五号Label2Caption:被加数,FontSize:五号Label3Caption:和,FontSize:五号Label4Caption:+,FontSize:四号Label5Caption:=,FontSize:四号Text1FontSize:五号Text2FontSize:五号Text3FontSize:五号,Alignment:2-Center,Enabled:FalseCommand1Caption:求和,FontSize:五号Command2Caption:清除,FontSize:五号Command3Caption:关闭&C,FontSize:五号11/11/202262第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一个简单的VisualBasic程序的创建实例新建工程 一个简单的VisualBasic程序的创建实例编写相关事件的代码 双击命令按钮进入代码编辑窗口编写程序代码，选择"Click"事件，见ex02-4-05.vbp保存工程

使用"文件|保存工程"或单击工具栏上的"保存工程"按钮，VisualBasic会提示将所有内容保存窗体文件:.frm工程文件:.vbp运行、调试程序

1."运行|启动"、按F5、单击启动按钮 如果程序有错，将会出现错误提示 2."调试|逐语句"进行单步执行，按F8继续 可以设置"断点"生成可执行程序

1.执行"文件|生成ex02-4-05.exe"命令 2.在"生成工程"对话框中输入可执行文件名11/11/202263第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一个简单的VisualBasic程序的创建实例编写相关事

下课了……追求休息一会儿……11/11/202264第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)下课了……追求休息一会儿……11/9/20作业P31:练习题结束上机实验2-1,2-2,2-311/11/202265第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)作业P31:练习题结束上机实验2-1,2-2,2-311第2章VisualBasic简单工程的设计本章介绍VisualBasic的一些基本概念，几个常用控件的属性、事件和方法，并通过一个简单例子说明VisualBasic应用程序设计的一般过程11/11/202266第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第2章VisualBasic简单工程的设计本章介绍教学要求理解面向对象程序设计的方法，掌握对象、属性、事件和方法等概念掌握VisualBasic简单工程的设计步骤掌握窗体对象的常用属性、事件和方法及其使用掌握命令按钮、标签、文本框控件的常用属性、事件和方法及其使用11/11/202267第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)教学要求理解面向对象程序设计的方法，掌握对象、属性、事件和第1节VisualBasic中的一些基本概念在用VisualBasic进行程序设计之前，首先要正确理解VisualBasic的对象、属性、事件、方法等几个重要概念。正确理解这些概念是设计VisualBasic应用程序的基础11/11/202268第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第1节VisualBasic中的一些基本概念在用V一、对象与类1.对象(Object)对象是代码和数据的集合。现实生活中的一个实体就是一个对象，如一支钢笔、一辆汽车在VisualBasic中，对象可以是窗体、各种控件等，它既包括作用于对象的操作(方法)和对象的响应(事件)2.类(Class)类是同种对象的集合与抽象，是一个整体概念，是创建对象实例的模板，而对象是类的实例化，类与对象是面向对象程序设计语言的基础以"汽车"为例，说明类与对象的关系。汽车是一个笼统的名称，是整体概念，我们把汽车看成一个"类"，一辆辆具体的汽车(比如你的汽车)是这个类的实例11/11/202269第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、对象与类1.对象(Object)11/9/20224对象与类工具箱的各种控件并不是对象，而是代表了各个不同的类。通过类的实例化，可以得到真正的对象。当在窗体上画一个控件时，就将类转换为对象，即创建了一个控件对象，也简称为控件类对象11/11/202270第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类工具箱的各种控件并不是对象，而是代表了各个不同的类。对象与类3.对象的建立和命名(1)对象的建立方法一:单击工具箱控件对象在窗体上按住左键拖拉到所需要的大小后释放方法二:双击工具箱控件对象，则立即在窗体出现一个默认大小的对象框(2)编辑对象先选中对象(单击对象)放大、缩小删除对象复制对象11/11/202271第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类3.对象的建立和命名(1)对象的建立11/9/20对象与类(3)对象的命名每一个对象都有有自己的名字。每个窗体、控件对象在建立时VisualBasic系统给出了一个默认名。用户可通过属性窗口设置(名称)来给对象命名命名的原则:必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线(最好不用)串组成长度≤255个字符智能化命名规则(国际通用方法):用前3个小定字母组成前缀(指明对象的类型)和表示该对象作用的缩写字母组成11/11/202272第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类(3)对象的命名命名的原则:智能化命名规则(国际对象与类控件名称的通用前缀惟一名称名称前缀惟一名称名称前缀Picture1picTimer1tmrLabel1lblDrive1drvText1txtDir1dirOption1optFile1filCheck1chkShape1shpCommand1cmdLine1linFrame1fraImage1imgCombo1cboData1dtaList1lstOLE1oleHscroll1hsbVscroll1vsb11/11/202273第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)对象与类控件名称的通用前缀惟一名称名称前缀惟一名称名称前缀P二、属性(Property)对象中的数据，所有对象都有各自的属性。它们是用来描述和反映对象特征的参数。例如:控件名称(Name)、标题(Caption)、颜色(Color)、字体(FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能对象属性设置的方法:方法一:在设计模式下，通过属性窗口直接设置对象的属性方法二:在程序的代码中通过赋值实现，其格式为:perty=expression例1: cmdDisp.Caption="显示" Form1.Height=400011/11/202274第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、属性(Property)对象中的数据，所有对象都有各自属性(Property)对同一对象设置多个属性时，可以使用With...EndWith语句简化书写例2

:对窗体的属性进行设置Form1.Width=4000Form1.Height=4000Form1.Caption="欢迎使用我的应用程序"Withobject

[statements]EndWithWithForm1.Width=4000.Height=4000.Caption="欢迎使用我的应用程序"EndWith11/11/202275第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)属性(Property)对同一对象设置多个属性时，可以使用W三、事件(Event)、事件过程(EventProcedure)事件

:可被对象识别的动作。VisualBasic为每个对象预先定义好了一系列的事件。例如单击鼠标(Click事件)、双击鼠标(DblClick事件)、按下键盘键(KeyPress事件)、窗体加载(Load事件)等

事件过程:是指附在该对象上的程序代码，是事件触发后处理的程序事件过程的形式:PrivateSubForm_event([arglist])[statements]EndSub11/11/202276第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)三、事件(Event)、事件过程(EventProced事件(Event)及事件过程(EventProcedure)例3:对于窗体的单击事件编写如下代码PrivateSubForm_Click()DimXAsInteger,YAsInteger,ZAsInteger '

定义变量X=20Y=30Z=X+YPrint"Z=";Z '显示输出EndSub例4:命令按钮cmdHide的Click事件代码PrivateSubcmdHide_Click()

cmdHide.Visible=FalseEndSub11/11/202277第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)事件(Event)及事件过程(EventProcedure四、方法(Method)在对象上可操作的过程，是VisualBasic系统提供的一种特殊的过程和函数----方法。方法是面向对象的，所以对象的方法调用一般要指明对象对象方法调用形式:[object.]method[arglist]

如省略对象，表示在当前对象，一般指窗体例5:在窗体Form1上显示"VB程序设计"，可使用窗体的Print方法Form1.Print"VB程序设计"例6

:使用Show方法显示名称为MyForm2的窗口MyForm2.Show 'Show方法没有参数11/11/202278第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)四、方法(Method)在对象上可操作的过程，是Visu第2节VisualBasic中简单工程的设计建立一个简单的VisualBasic工程的步骤新建一个工程设计用户界面编写事件过程及通用过程运行、调试并保存工程

11/11/202279第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)第2节VisualBasic中简单工程的设计建立一一、新建工程新建一个简单工程通常是从新建一个标准EXE工程开始，可以有以下两种方法:启动VisualBasic后，在系统显示的"新建工程"对话框的"新建"选项卡中选择"标准EXE"，然后单击"打开"按钮使用"文件|新建工程"命令，然后在打开的"新建工程"对话框中选择"标准EXE"，再单击"确定"按钮11/11/202280第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)一、新建工程新建一个简单工程通常是从新建一个标准EXE工程二、设计用户界面1.控件的画法(1)画1个单独的控件

单击工具箱中所需的控件按钮，在窗体上拖动鼠标画出控件双击工具箱中所需的控件按钮，即可在窗体中央位置画出控件

(2)连续画多个同类件

按下Ctrl键，同时单击工具箱中所需的控件按钮，然后松开Ctrl键在窗体上连续多次拖动鼠标可以画出多个控件画完所需的控件后，单击工具箱中的指针按钮或其他按钮

11/11/202281第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)二、设计用户界面1.控件的画法11/9/202216第设计用户界面2.控件的选择当画完一个控件或用鼠标单击某控件之后，表明选择了该控件同时选择多个控件的方法:按住Shift键或Ctrl键不放，再用鼠标依次单击各个控件在窗体的空白区域按住鼠标左键拖曳鼠标，只要鼠标拖曳出的虚线框接触到的控件都会被选择

11/11/202282第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面2.控件的选择11/9/202217第2章设计用户界面选择了一个或多个控件之后，在属性窗口显示的是这些控件共有的属性，这时在属性窗口可以为多个控件同时设置属性

选定多个控件当前控件11/11/202283第2章VisualBasic简单工程的设计----《大学计算机基础》(Hemingrui)设计用户界面选择了一个或多个控件之后，在属性窗口显示的是这些设计用户界面3.控件的缩放和移动(1)控件缩放选择控件拖曳控件边框上的黑色控制柄Shift+"方向箭头"设置控件的Width和Height属性(2)移动控件将鼠标指针移到控件内拖曳鼠标到合适的位置使用Ctrl+"方向箭头"设