简单工程的设计.ppt

《简单工程的设计.ppt》由会员分享，可在线阅读，更多相关《简单工程的设计.ppt（71页珍藏版）》请在三一办公上搜索。

1、2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),1,第2章 Visual Basic简单工程的设计,本章介绍Visual Basic的一些基本概念，几个常用控件的属性、事件和方法，并通过一个简单例子说明Visual Basic应用程序设计的一般过程,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),2,第1节 Visual Basic面向对象的基本概念,在用Visual Basic进行程序设计之前，首先要正确理解Visual Basic的对象、属性、事件、方法等几个重要

2、概念。正确理解这些概念是设计Visual Basic应用程序的基础,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),3,一、对象与类,1.对象(Object)对象是代码和数据的集合。现实生活中的一个实体就是一个对象，如一支钢笔、一辆汽车在Visual Basic中，对象可以是窗体、各种控件等，它既包括作用于对象的操作(方法)和对象的响应(事件)2.类(Class)类是同种对象的集合与抽象，是一个整体概念，是创建对象实例的模板，而对象是类的实例化，类与对象是面向对象程序设计语言的基础以汽车为例，说明类与对象的关系。汽车是一个笼统的名

3、称，是整体概念，我们把汽车看成一个类，一辆辆具体的汽车(比如你的汽车)是这个类的实例,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),4,对象与类,类的重要特性,封装性封装是指将对象的数据和与数据有关的操作包装在一起。封装将对象的内部复杂性与应用程序的其他部分隔离开来，使用户不必知道对象行为的实现细节，只需根据对象提供的外部特性接口访问对象即可继承性继承是子类自动共享父类中定义的数据和方法的机制，所表达的是对象类之间的关系多态性多态性是指一些关联的类包含同名的方法程序，但方法程序的内容可以不同。具体调用哪种方法程序要在运行时根据对

4、象的类来确定,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),5,对象与类,3.Visual Basic中的对象和类的概念在Visual Basic中开发的控件实际上是一个控件类，工具箱中的各种控件代表着各个不同的类。当把一个控件放在窗体上时，就创建了该控件类的一个对象，即建立了该控件类的实例,工具箱中的控件:类,例如，工具箱中有 图标，代表CommandButton类，它确定了CommandButton类的属性、方法和事件。如果在窗体上画两个CommandButton对象，是类的实例化，它们继承了CommandButton类的特

5、征，也可以根据需要修改各自的属性,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),6,对象与类,3.对象的建立和命名每一个对象都有有自己的名字。每个窗体、控件对象在建立时Visual Basic系统给出了一个默认名。用户可通过属性窗口设置(名称)来给对象命名,命名的原则:必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线(最好不用)串组成长度255个字符,智能化命名规则(国际通用方法):用前3个小定字母组成前缀(指明对象的类型)和表示该对象作用的缩写字母组成,2023/10/17,Ch02 Visual Basic 简单工程

6、的设计-大学计算机基础(Hemingrui),7,对象与类,控件名称的通用前缀,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),8,二、属性(Property),对象中的数据，所有对象都有各自的属性。它们是用来描述和反映对象特征的参数。例如:控件名称(Name)、标题(Caption)、颜色(Color)、字体(FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能,对象属性设置的方法:方法一:在设计模式下，通过属性窗口直接设置对象的属性方法二:在程序的代码中通过赋值实现，其格式为:对象名.属性名=属性值例1:c

7、mdDisp.Caption=显示Form1.Height=4000,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),9,属性(Property),对同一对象设置多个属性时，可以使用With.End With语句简化书写,例2:对窗体的属性进行设置Form1.Width=4000Form1.Height=4000Form1.Caption=欢迎使用我的应用程序,With 对象名语句组End With,With Form1.Width=4000.Height=4000.Caption=欢迎使用我的应用程序End With,2023/

8、10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),10,三、方法(Method),在对象上可操作的过程，是Visual Basic系统提供的一种特殊的过程和函数-方法。方法是面向对象的，所以对象的方法调用一般要指明对象,对象方法调用形式:对象名.方法名参数表 如省略对象，表示在当前对象，一般指窗体,例3:在窗体Form1上显示VB程序设计，可使用窗体的Print方法Form1.Print VB程序设计例4:使用Show方法显示名称为MyForm2的窗口MyForm2.Show Show方法没有参数,2023/10/17,Ch02 Visual

9、 Basic 简单工程的设计-大学计算机基础(Hemingrui),11,三、事件(Event)、事件过程(Event Procedure),事件:可被对象识别的动作。Visual Basic为每个对象预先定义好了一系列的事件。事件的发生:用户引发、系统引发、代码间接引发事件过程:是指附在该对象上的程序代码，是事件触发后处理的程序,事件过程的形式:Private Sub 对象名_事件名(参数表)语句组End Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),12,事件(Event)、事件过程(Event Procedure)

10、,例5:对于窗体的单击事件编写如下代码Private Sub Form_Click()Dim X As Integer,Y As Integer,Z As Integer 定义变量X=20Y=30Z=X+YPrint Z=;Z 显示输出End Sub,例6:命令按钮cmdHide的Click事件代码Private Sub cmdHide_Click()cmdHide.Visible=FalseEnd Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),13,第2节 Visual Basic应用程序基础,建立一个简单的Visua

11、l Basic工程的步骤新建工程设计应用程序界面设置各对象属性编写事件过程代码保存工程运行与调试工程生成可执行文件,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),14,一、新建工程,新建一个简单工程通常是从新建一个标准EXE工程开始，可以有以下两种方法:启动Visual Basic后，在系统显示的新建工程对话框的新建选项卡中选择标准EXE，然后单击打开按钮使用文件|新建工程命令，然后在打开的新建工程对话框中选择标准EXE，再单击确定按钮,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(H

12、emingrui),15,二、设计应用程序界面,1.控件的添加 单击工具箱中所需的控件按钮，在窗体上拖动鼠标画出控件双击工具箱中所需的控件按钮，即可在窗体中央位置画出控件 控件的选择按住Shift键或Ctrl键不放，再用鼠标依次单击各个控件在窗体的空白区域按住鼠标左键拖曳鼠标，只要鼠标拖曳出的虚线框接触到的控件都会被选择,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),16,设计应用程序界面,选择了一个或多个控件之后，在属性窗口显示的是这些控件共有的属性，这时在属性窗口可以为多个控件同时设置属性,选定多个控件,当前控件,2023/

13、10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),17,设计应用程序界面,3.控件的移动和尺寸调整(1)控件的移动将鼠标指针移到控件内 拖曳鼠标到合适的位置使用Ctrl+方向箭头设置控件的Left、Top属性(2)控件的尺寸调整选择控件 拖曳控件边框上的黑色控制柄Shift+方向箭头设置控件的Width和Height属性,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),18,设计应用程序界面,控件的Left、Top、Width、Height属性,对于窗体，Left、Top、Wid

14、th、Height属性总是以缇为单位来表示对于控件，Left、Top、Width、Height属性的度量单位取决于控件所在容器(如窗体)的坐标系,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),19,设计应用程序界面,4.控件的复制与删除(1)控件的复制 选择控件 编辑|复制命令 编辑|粘贴，弹出对话框单击否:在窗体的左上角复制出一个控件，Visual Basic为其取另一个名称单击是 复制出一个具有相同名称的控件，这样复制出来的控件构成一个控件数组(2)控件的删除 选择控件，按Delete键，或右击控件，从快捷菜单中选择删除,2

15、023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),20,设计应用程序界面,5.控件的布局通过格式菜单来完成:控件的排列、对齐、统一尺寸、调整间距等操作。对于重叠的控件，可以使用格式|顺序|置前或格式|顺序|置后命令,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),21,设计应用程序界面,6.控件的焦点焦点是接收用户鼠标或键盘输入的能力。当一个控件具有焦点时，它可以接收用户的输入信息。比如窗体上有多个文本框，只有具有焦点的文本框才能接受用户的输入信息,可以用下面的方法设置一

16、个对象的焦点:在运行时单击该对象运行时用热键选择该对象在程序代码中用SetFocus方法利用Tab键将焦点移动到该对象上,焦点只能移到可视的窗体或控件上，因此只有当一个对象的Enabled和Visible属性均为True时，它才能接收焦点。并不是所有对象都可以接收焦点,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),22,设计应用程序界面,7.控件的Tab顺序 所谓Tab顺序，就是指按Tab键时，焦点在各个控件之间移动的顺序。每按一次Tab键，焦点便从一个控件移到另一个控件,在一般情况下，Tab顺序由控件建立时的先后顺序确定。例如

17、，假定在窗体上建立了5个控件，其中3个文本框，两个命令按钮，建立顺序为:Text1、Text2、Text3、Command1、Command2这5个控件的TabIndex属性值依次是0、1、2、3、4，TabIndex属性值从0开始编号在设计模式下，通过修改属性窗口中的TabIndex属性值来改变Tab顺序,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),23,三、设置各对象属性,界面设计好后，接下来就是在属性窗口中给所有窗口对象设置属性值窗体、所有控件对象,2023/10/17,Ch02 Visual Basic 简单工程的设计

18、-大学计算机基础(Hemingrui),24,四、编写事件过程代码,代码窗口是编写应用程序的Visual Basic代码的地方，代码由语句、常量和声明部分组成除了一些通用的常量、变量、过程等之外，大多数代码都要写在相应的事件过程中。因此编写代码之前首先要明确代码的编写位置希望在窗体加载时将窗体的背景色设置为蓝色，需要在窗体的Load事件过程中编写代码希望在单击某命令按钮时实现某些功能，需要将代码写在命令按钮的Click事件中编写好程序后，程序正确与否，需要通过运行、调试之后才能确定,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),

19、25,五、保存工程,一个工程由多种文件组成，如工程文件、窗体文件、标准模块文件等，因此，保存一个工程需要分多步才能完成,单击文件|保存工程，对于从未保存过的工程，系统打开文件另存为对话框在文件另存为对话框中，注意保存的类型，对于只含有窗体模块的工程，首先提示保存窗体文件(.frm)，然后提示保存工程文件(.vbp)说明:窗体文件名和工程文件名最好保存在相同的文件夹中，并取相同的文件名前缀，以便进行管理,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),26,保存工程,生成的文件窗体文件(.frm):保存窗体及其控件的属性、代码工程文

20、件(.vbp、.vbw):记录本工程内包含的窗体、代码模块等此外，可能还生成.frx、.bas文件，分别用于记录窗体静态加载的图像、用户定义的代码模块等,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),27,保存工程,注意:不能在操作系统的环境下直接更改与工程有关的所有文件的文件名(包括扩展名)，否则打开工程时将会出错当完成一个工程的设计并保存工程之后，使用文件|移除工程命令关闭当前工程，继续设计其他工程如果要修改工程或运行已关闭的工程，使用文件|打开工程命令、或单击标准工具栏上的打开工程按钮打开工程,2023/10/17,Ch0

21、2 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),28,六、运行与调试工程,如果运行有错或者不能达到预期的目的，则需要结束运行，修改代码甚至修改界面，然后再次运行Visual Basic提供了多种手段来帮助编程人员查找代码中的错误,选择运行|启动命令单击标准工具栏中的启动按钮按F5键,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),29,七、生成可执行文件,为了使应用程序能够独立于Visual Basic集成开发环境之外运行，需要把它编译成可执行文件(exe文件)。假设工程文件名为myform.v

22、bp,选择文件|生成myForm.exe命令(此时的myForm因不同的工程文件名而不同)在生成工程对话框中，可以选择生成可执行文件的文件夹和文件名单击确定按钮，便生成了名为myForm.exe可执行文件。在操作系统下，双击该文件便可运行应用程序,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),30,第3节 窗体,窗体(Form)也就是平时所说的窗口，它是Visual Basic编程中最常用的对象，也是程序设计的基础。窗体是所有控件的容器，各种控件对象必须建立在窗体上，一个窗体对应一个窗体模块,2023/10/17,Ch02 Vi

23、sual Basic 简单工程的设计-大学计算机基础(Hemingrui),31,一、窗体的基本元素,与Windows环境下的应用程序窗口一样，窗体主要由控制菜单按钮、标题栏、最小化按钮、最大化/还原按钮、关闭按钮及边框组成,在设计模式下，窗体不能最小化和关闭，但可以双击标题栏进行窗体的最大化和还原的切换。在运行模式下，窗体具有Windows窗口特点,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),32,二、窗体的添加和移除,1.窗体的添加 1)执行工程|添加窗体命令2)在添加窗体对话框中，新建选项卡中列出了各种类型的新窗体，选择

24、窗体选项，建立一个新的空白窗体3)单击打开按钮，就将一个窗体添加到当前工程中 2.窗体的移除一个窗体可以从当前工程中移除，移除的窗体对应的窗体文件并没被删除执行工程|移除Form1.frm命令(Form1.frm随具体窗体文件名的不同而不同),2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),33,三、窗体的属性,窗体属性决定了窗体的外观与操作。窗体的许多属性既可以通过属性窗口设置，也可以在程序中设置有些属性(如MaxButton、BorderStyle等影响窗体外观的属性)只能在设计状态设置有些属性(如CurrentX、Curre

25、ntY等)只能在运行期间设置,1.窗体的基本属性窗体的基本属性有Name、Left、Top、Height、Width、Visible、Enabled、Font、ForeColor、BackColor等，在Visual Basic中的大多数控件基本上都有这些属性,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),34,窗体的属性,(1)Name名称属性(任何对象都具有的)创建的对象名称，有默认的名称。在程序中，控件名是作为对象的标识而引用，不会显示在窗体上,(2)Height、Width、Top、Left属性单位为twip:1 twi

26、p=1/20点=1/1440英寸=1/567cm,屏幕Screen窗口Form1命令按钮OK,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),35,窗体的属性,例1:在窗体Form1被加载时，将其大小设置为屏幕大小的75%，并居中显示。通过窗体的Load事件来实现,Private Sub Form_Load()Form1.Width=Screen.Width*.75 设置窗体的宽度Form1.Height=Screen.Height*.75 设置窗体的高度 在水平方向上居中显示Form1.Left=(Screen.Width-Fo

27、rm1.Width)/2 在垂直方向上居中显示Form1.Top=(Screen.Height-Form1.Height)/2 End Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),36,窗体的属性,(3)Caption标题属性决定出现在窗体的标题栏上的文本内容,(4)字体Font属性组 FontName属性是字符型，决定对象上正文的字体(缺省为宋体)FontSize属性是整型，决定对象上正文的字体大小FontBold属性是逻辑型，决定对象上正文是否是粗体FontItalic属性是逻辑型，决定对象上正文是否是斜体Font

28、StrikeThru属性是逻辑型，决定对象上正文是否加一删除线FontUnderLine属性是逻辑型，决定对象上正文是否带下划线,对于图片框控件、窗体和打印机(Printer)对象，设置这些属性不会影响在控件或对象上已经绘出的图片和文本对于其他控件，改变字体将会在屏幕上立即生效,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),37,窗体的属性,(5)Enabled属性(逻辑值)决定控件是否可操作True:允许用户进行操作，并对操作做出响应(缺省值)False:呈暗淡色，禁止用户进行操作如果使窗体或其他容器对象无效，则在其中的所有控

29、件也将无效,(6)Visible属性(逻辑值)决定控件是否可见True:运行时控件可见(缺省值)False:运行时控件隐藏，用户看不到但控件本身是存在的,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),38,窗体的属性,例2:下面的程序当文本框Text1不包含任何文本时使命令按钮Command1无效,Private Sub Text1_Change()If Text1.Text=Then 判断文本框是否为空 Command1.Enabled=False 使按钮无效Else Command1.Enabled=True 使按钮有效En

30、d IfEnd Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),39,窗体的属性,(7)BackColor属性、ForeColor属性 BackColor属性用于返回或设置对象的背景颜色，ForeColor属性用于返回或设置在对象里显示图片和文本的前景颜色,在Visual Basic中通常用Windows运行环境的红-绿-蓝(RGB)颜色方案，使用调色板或在代码中使用RGB或QBColor函数指定标准RGB颜色,例3:将窗体Form1的背景色设置为红色 Form1.BackColor=RGB(255,0,0)标准RGB颜色

31、 Form1.BackColor=&HFF&十六进制长整数数据 Form1.BackColor=vbRed VB系统内部常量,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),40,窗体属性,2.窗体的其它常用属性,MaxButton最大化按钮、MinButton最小化按钮当值为Ture，有最大或最小化按钮；值为False则无Icon控制图标属性返回或设置窗体左上角显示或最小化时显示的图标注意:此属性必须在ControlBox属性设置为Ture才有效ControlBox控制菜单框属性设置为Ture，有控制菜单；设置为False则无控

32、件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),41,窗体的属性,Picture图片属性设置窗体中要显示的图片。加载图片操作同Icon控制图标属性BorderStyle边框风格属性通过改变BorderStyle属性，可以控制窗体如何调整大小0-None无边框1-Fixed Single单线边框，不可以改变窗口大小2-Sizable双线边框，可以改变窗口大小3-Fixed Double双线框架，不可以改变窗口大小4-Fixe

33、d Tool Window窗体外观与工具条相似。有关闭按钮，不可以改变窗口大小5-Sizable Tool Window窗体外观与工具条相似。有关闭按钮，可以改变窗口大小,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),42,窗体的属性,WindowState属性0:正常窗口状态，有窗口边界 vbNormal1:最小化状态，以图标方式运行vbMinimized2:最大化状态，无vbMaximizedAutoRedraw属性该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Cir

34、cle、Line、Pset和Print等方法的输出当为True时，重新还原该窗体以前的画面当为False时，则不重画AutoRedraw属性,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),43,窗体的属性,StartUpPosition属性指定窗体首次出现时的位置，运行时不能使用0:手动方式，没有指定初始设置值 vbStartUpManual 1:UserForm所属的项目中央 vbStartUpOwner 2:屏幕中央 vbStartUpScreen 3:屏幕的左上角 vbStartUpWindowsDefault Curre

35、ntX、CurrentY属性 返回或设置下一次打印或绘图方法的水平(CurrentX)或垂直(CurrentY)坐标，设计时不可用，属性窗口中看不到这两个属性。默认的坐标以缇为单位表示,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),44,四、窗体的事件,最常用的事件Click/DblClick:单击/双击窗体触发Activate:当窗体成为活动窗口时发生Load:窗体被装入时触发的事件。该事件通常用来在启动应用程序时对属性和变量进行初始化Unload事件:卸载窗体时触发该事件Resize事件:无论是因为用户交互，还是通过代码调整

36、窗体的大小，都会触发一个Resize事件,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),45,五、窗体的方法,窗体常用的方法有:显示 Show隐藏 Hide清除 Cls移动 Move打印输出 Print,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),46,窗体的方法,1.Show 方法,对象名.Show style作用:显示窗体对象。相当于将Visible属性设置为True,对象名:窗口对象。省略表示与活动窗体模块关联的窗体style:style=1(vbModa

37、l)，则窗体是模式的；style=0(vbModeless)，则窗体是无模式的,例4:下面的代码模式显示窗体 frmResult,Private Sub cmdShowResult_Click()模式显示窗体 frmResult frmResult.Show vbModalEnd Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),47,窗体的方法,2.Hide 方法,对象名.Hide作用:隐藏窗体对象。相当于将Visible属性设置为False,对象名:如果省略，则带有焦点的窗体就认为是该对象如果调用Hide方法时窗体还没有

38、加载，那么Hide方法将加载该窗体但不显示它,例5:实现将指定的窗体在屏幕上进行显示或隐藏的切换,Private Sub Form_Click()Form1.Hide 隐藏窗体 MsgBox 单击确定按钮，使窗体重现屏幕 显示信息 Form1.Show 重现窗体End Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),48,窗体的方法,3.Cls 方法,对象名.Cls作用:清除运行时在窗体或图形框中显示的文本或图形,Cls将清除图形和打印语句在运行时所产生的文本和图形，Cls方法不能清除在设计时的文本和图形清屏后对象的Cur

39、rentX、CurrentY属性复位为0，坐标当前回到原点,例6:执行窗体的Cls方法Form1.Cls,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),49,窗体的方法,4.Move 方法,对象名.Move left,top,width,height作用:移动窗体或控件，并可改变其大小,对象名:可以是窗体及除时钟、菜单外的所有可视控件，省略代表窗体left、top、width、height:表示左边距、上边距、宽度、高度，以twip为单位。如果是窗体对象，则左边距和上边距是以屏幕左边界和上边界为准。其它则是以窗体的左边和上边界为

40、准,例7:使用Move方法移动一个窗体。双击窗体，窗体移动并定位在屏幕的左上角，同时窗体的长宽也缩小一倍,Private Sub Form_DblClick()Form1.Move 0,0,Form1.Width/2,Form1.Height/2End Sub,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),50,例8:窗体初始画面如左图，单击窗体，窗体运行如右图，双击窗体，清除窗体上显示的内容,Private Sub Form_Click()MyForm1.BackColor=vbYellowMyForm1.ForeColor=

41、vbRedMyForm1.FontName=楷体_GB2312MyForm1.FontSize=30MyForm1.FontBold=TrueMyForm1.CurrentX=800MyForm1.CurrentY=500MyForm1.Print 北京欢迎您MyForm1.Caption=2008End Sub,Private Sub Form_DblClick()MyForm1.ClsEnd Sub,ex02-3-08,窗体的方法,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),51,窗体的方法,5.Print 方法,对象名.

42、Print Spc(n)|Tab(n)表达式表;|,作用:以当前所设置的前景色和字体在对象上输出信息,对象名:表示窗体、图形框或打印机(Pinter)等对象，省略对象在窗体上输出Spc(n)函数:插入n个空格，允许重复使用Tab(n)函数:左端开始右移动n列，允许重复使用表达式表:要输出的数值表达式或字符串表达式;(分号):光标定位上一个显示的字符后,(逗号):光标定位在下一个打印区的开始位置处。每个打印区占14列无;,换行,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),52,窗体的方法,例9:在窗体Form1的单击事件中写入如

43、下代码,Private Sub Form_Click()a=10:b=3.14:c=100 Print a=;a,b=;b Print a=;a,b=;b Print a=;a,b=;b Print 空一行 Print a=;a,b=;b Print a=;a,Tab(18);b=;b 从第18列开始打印输出 Print a=;a,Spc(18);b=;b 输出a值后，插入18个空后输出b Print Print a=;a,b=;b Print Tab(18);a=;a,b=;b Print Spc(18);a=;a,b=;bEnd Sub,2023/10/17,Ch02 Visual Bas

44、ic 简单工程的设计-大学计算机基础(Hemingrui),53,第4节 命令按钮、标签、文本框,命令按钮、标签、文本框是Visual Basic中最基本、使用最广泛的三个控件，本节将介绍这三个控件的常用属性、方法和事件,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),54,一、命令按钮-CommandButton,使用命令按钮来接受用户的操作信息，激发某些事件，实现一个命令的启动、中断、结束等操作命令按钮接受用户输入的命令可以有 3 种方式:鼠标单击按Tab键焦点跳转到该按钮，再按 Enter 键快捷键(Alt+有下划线的字母)

45、,1.基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font等与窗体的使用相同,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),55,命令按钮CommandButton,2.常用属性,Caption 标题属性。命令按钮显示的内容，可在某字母前加&设置快捷键。例如:&Ok，显示 Ok(Alt+O)Default 该属性把窗体中哪个命令按钮作为缺省按钮。如果该属性被设置为True时，则此命令按钮为缺省按钮 注意:窗体中只允许有一个命令按钮是缺省按钮Cancel 该属性把窗体中哪个命令按钮

46、作为取消按钮。当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同 注意:窗体中只允许有一个命令按钮是取消按钮,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),56,命令按钮CommandButton,Value 将按钮的Value属性设置为True，即可触发命令按钮的Click事件。该属性在设计时无效Picture 按钮显示的图片文件(.bmp和.ico)，当Style属性值设为1时有效Style 用来指示控件的显示类型和行为。0(vbButtonStandard，缺省)表示标准方式，只显示文字；1(vbButto

47、nGraphical)表示图形方式，文字、图形均可ToolTipText 设置工具提示，和Picture结合使用,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),57,命令按钮CommandButton,3.常用方法Setfocus获得焦点。使用该方法之前，必须保证命令按钮当前处于可见和可用状态 4.常用事件最常用的是Click()事件，一般也只对该事件进行编程,例1:设计如下图所示的窗体，单击显示按钮显示你好；单击隐藏按钮，你好隐去；单击关闭按钮，关闭窗体,设置三个命令按钮的Caption属性对三个命令按钮编写其Click事件,

48、ex02-4-01,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),58,二、标签控件-Label,标签控件用来显示文本，但没有文本输入的功能标签主要标注和显示提示信息，通常是标识那些本身不具有标题(Caption)属性的控件。可用标签控件为文本框、列表框、组合框的控件添加描述性的文字，或者用来显示如处理结果、事件进程等信息既可以在设计时通过属性窗口设定标签控件显示的内容，也可以在程序运行时通过代码改变控件显示的内容,1.基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font、For

49、eColor、BackColor 等与窗体的使用相同,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),59,标签控件Label,2.常用属性,Caption 用来改变标签控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉Alignment 设置Caption属性中文本的对齐方式，共有三种可选值:0-左对齐，1-右对齐，2-居中对齐BackStyle 该属性用于确定标签的背景是否透明。有两种情况可选:值为0时，表示背景透明

50、，标签后的背景和图形可见；值为1时，表示不透明，标签后的背景和图形不可见,2023/10/17,Ch02 Visual Basic 简单工程的设计-大学计算机基础(Hemingrui),60,标签控件Label,AutoSize 该属性有两种设置值:True和False。设置为True，标签控件大小随文本的改变而变化；设置为False(缺省)，则标签控件不因文本的改变而变化BorderStyle用于确定标签的边框样式。该属性设置为0(默认值)，标签无边框；该属性设置为1，标签有边框 WordWrap该属性有两种设置值:True和False。设置为True，标签控件将在垂直方向变化大小以和文本相