简单VB程序设计.ppt

1、2020/7/18,清华大学出版社,1,第3章 简单VB程序设计,3.1 窗体 3.2 标签 3.3 文本框 3.4 命令按钮 3.5 数据输入输出 3.6 注释语句、结束语句,2020/7/18,清华大学出版社,2,【目的要求】 1、掌握窗体、标签、文本框、命令按钮的常用属性、事件和方法； 2、掌握设计简单的VB应用程序的方法； 3、掌握在VB中进行数据的输入与输出的方法； 4、理解面向对象编程的中事件的含义； 5、了解VB编程中的一些书写习惯。 【重点】 掌握窗体、标签、文本框、命令按钮的常用属性、事件； 理解事件的含义,2020/7/18,清华大学出版社,3,第3章 简单VB程序设计,3

2、.1 窗 体 作为与用户交互的界面，各种控件对象必须建立在窗体上。在VB6中，每当创建一个新的工程时，都会得到一个默认名为Form1的窗体。 3.1.1 属性 （1）（名称）属性 即Name属性，用来指定窗体的名称，在程序代码中用这个名称引用该窗体。 （2）AutoRedraw 属性 该属性控制窗体图像的重画。只有属性值为True 时，在其他窗体覆盖然后移出此窗体后，VB才能重画此窗体内的所有图形，即重画Print、Cls、Circle等方法的输出。,2020/7/18,清华大学出版社,4,（4）BorderStyle 属性 决定窗体边框式样及窗体是否能调整大小。 （5）Caption 属性

3、设置窗体标题栏显示的文本。 （6）Enabled属性 用来设置窗体是否响应鼠标或键盘事件。属性值为True（默认值）时，窗体能够对用户产生的事件做出反应；属性值设为False时，窗体不响应鼠标或键盘事件。 （7）Font属性 设置窗体上字体的样式、大小、字形等。,（3）BackColor属性和ForeColor 属性 BackColor属性：设置窗体的背景颜色。 ForColor 属性：设置窗体的前景颜色。,2020/7/18,清华大学出版社,5,（8）Height属性和Width属性 设置窗体的高度和宽度。其单位为Twip。1Twip=1/20点=1/1440英寸=1/567厘米。,（9）L

4、eft属性和Top属性 Left：设置窗体左边框距屏幕左边界的距离。 Top：设置窗体顶边距屏幕顶端的距离。 （10）MaxButton 属性和 MinButton 属性 用来设置窗体的右上角的“最大化”按钮和“最小化”按钮。 属性值为True，按钮可用；为False时，按钮不可用。 （11）Picture属性 设置在窗体中显示的图片。可以选择位图（*.BMP）、GIF图像、JPEG图像和ICONS等图像格式文件作为窗体的背景图片。若在程序中设置该属性的值，需要使用LoadPicture函数。 Form1.Picture=LoadPicture（c：Changcheng.wmf）,2020/7

5、/18,清华大学出版社,6,（12）StartUpPosition属性 指定窗体首次出现时的位置。该属性有四个设置值。 0 - 手动：窗体出现的位置由属性Left和Top决定。 1 所有者中心：UserForm 所属的项目中央。 2 屏幕中心：窗体出现在显示器屏幕的中央。 3 窗口默认：按照默认设置，窗体出现在屏幕的左上角。 （13）Visible属性 设置窗体是否显示。属性值为True或False。 True：使窗体可见。此值为默认值。 False：在运行时，窗体及其上面的对象都将被隐藏。 （14）WindowState属性 设置窗体运行时的大小状态。它有三个可选值： 0-Normal：窗体

6、大小由Height和Width属性决定，此值为默认值。 1-Minimized：窗体最小化成图标。 2-Maximized：窗体最大化，充满整个屏幕。,2020/7/18,清华大学出版社,7,3.1.2 事件 窗体最常用的有如下事件： （1）Click事件：程序运行后，单击窗体的空白区域或一个无效控件时发生。 （2）DblClick事件：程序运行后，双击窗体的空白区域或一个无效控件时发生。 （3）Load事件：窗体被装入内存工作区时触发该事件。Load事件过程通常用来在启动程序时对属性和变量进行初始化。 （4）MouseDown事件：当用户在对象上按下鼠标键时触发该事件。 （5）MouseUp

7、事件：当用户在对象上释放鼠标键时触发该事件 （6）MouseMove事件：当用户在对象上移动鼠标时触发该事件。,注意:在VB中，虽然不同的对象有不同的属性集合，但有一些属性，如Name 、Enabled、Height、Width、Left、Top、Visible等，其他控件也具有，且具有相似的作用。,2020/7/18,清华大学出版社,8,3.1.3 方法 窗体上常用的方法有如下三种： Print方法：可以在窗体上输出字符串或表达式的值。 Cls方法：可以清除用Print方法在窗体上显示的文本。 格式如下： 对象.Cls 其中：“对象”为窗体（也可是后面介绍的图片框控件），若省略则默认为当前窗

8、体。窗体中使用Picture属性设置的背景位图和放置在窗体上的控件不受Cls方法影响。 Move方法：用于移动窗体或控件，并可以改变其大小。格式如下：,2020/7/18,清华大学出版社,9,对象.Move 左边距离，上边距离，宽度，高度 其中： 对象：可以是窗体以及除菜单以外的所有可视控件，若省略对象则默认为当前窗体。 左边距离、上边距离、宽度、高度：均为数值，以twip为单位。如果对象是窗体，则“左边距离”和“上边距离”以屏幕左边界和上边界为准，否则以窗体等容器内部的左边界和上边界为准。“宽度”和“高度”指定对象的新宽度和新高度。调用Move方法后将自动改变对象的Left、Top、Widt

9、h和Height四个属性。,2020/7/18,清华大学出版社,10,【例3.1】设计程序，用窗体模拟黑板，鼠标单击时窗体上输出提问，双击时显示回答。 【例3.2】在程序运行时，用鼠标单击窗体使窗体移动。,2020/7/18,清华大学出版社,11,3.2 标 签 标签（Label）主要用于显示不需要用户修改的文本。标签不能作为输入信息的界面，其内容只能用Caption属性来设置或修改。标签常用作标题、栏目名或输入输出区域的标识。,3.2.1 属性 （1）Caption属性 （2）BorderStyle属性 ：设置标签有无边框。默认值为0，标签无边框；设置为1时，标签有立体边框。 （3）Auto

10、size属性 ：该属性用于设置标签是否自动调整大小以显示所有内容。它有True和False两种设置。 True：标签控件宽度随文本改变而改变，不能换行。 False：标签保持设计时的大小，如果内容太长，则只能显示一部分。此为默认值。 （4）Alignment属性 ：确定标签中内容的对齐方式。,2020/7/18,清华大学出版社,12,3.2.2 事件 常用的事件有Click（单击）、DblClick（双击）等。,【例3.3】用标签制作浮雕效果文字。 利用两个标签控件，在设计时通过白色与黑色错位叠加，实现如左图所示的文字浮雕效果。,（5）BackStyle属性 ：该属性用于设置背景是否透明。默认

11、值为1，不透明；设为0时，透明，即无背景色。,2020/7/18,清华大学出版社,13,3.3 文 本 框 文本框（TextBox）是一个文本编辑区域。用户可以在文本框内输入、编辑和显示文本。,3.3.1 属性 （1）Text属性 ：设置文本框中显示的内容。程序执行时，在框内输入的内容，会自动保存在Text属性中。 （2）Locked属性：设置文本框中的内容是否可编辑。默认值为False，表示可编辑。设置为True时，不可编辑；但此时可对框内文字选择复制，而Enabled属性设为False时，连选择复制也不允许。 （3）Maxlength属性：设置文本框中允许输入的最大字符数。输入的字符数超过

12、Maxlength设定的数目后，文本框将不接受超出部分的字符。该属性默认值为0，表示无限制。 （4）MultiLine属性：设置文本框是否允许接收多行文本。若设置为True，则可接收多行文本，当输入的文本超出文本框的边界或按回车键时，会进行换行。默认值为False，文本框中只能输入一行文本。,2020/7/18,清华大学出版社,14,3.3.2 事件 文本框支持Click、DblClick事件，但更常用的是Change和LostFocus事件。 （1）Change事件 当改变文本框的Text属性的值时触发该事件。当用户键入一个字符时，就会引发一次Change事件。,（5）PassWordCha

13、r属性 设置是否在文本框中显示用户键入的字符。该属性主要用于输入密码。 （6）ScrollBars属性 设置文本框是否有滚动条。只有当MultiLine属性为True时，文本框才能加滚动条。 (7) SelStart属性、Sellength属性和SelText属性,2020/7/18,清华大学出版社,15,（2）LostFocus事件 当文本框失去焦点时触发该事件。焦点的丢失是由于按Tab键或单击其他对象而产生的。比在Change事件中检查更为合理有效。（3）GotFocus事件：得到焦点时触发。（4）keypress事件：当用户按下“键”时框，触发该事件。,3.3.3 方法 SetFocus

14、:该方法使之获得焦点（把光标移到指定的文本框中）。语句“Text1.SetFocus”使文本框Text1获得焦点。 【例3.4】设计程序，实现以下功能。 要求在文本框Text1中输入时，文本框Text2同步显示相同内容。 单击“清除”按钮，可清除文本框中的信息并使Text1获得焦点,2020/7/18,清华大学出版社,16,3.4 命令按钮 3.4.1 属性（1）Caption属性 设定命令按钮上显示的文本。可以在字母前加一个“ 姓名 ; Tab(25) ; 年龄 则“姓名”和“年龄”分别从当前行的第10列和第25列开始输出。输出结果如下： 姓名 年龄,2020/7/18,清华大学出版社,24

15、,【例3.8】设计程序，用 Print方法的不同格式进行输出。,（5）用Spc函数定位输出 Print方法中，还可以使用Spc函数来对输出进行定位，与Tab函数不同，Spc函数提供若干个空格。 Spc函数的格式为：Spc（n） 其中n为整数表达式，表示在显示或打印下一个表达式之前插入的空格数。Spc函数与输出项之间用“；”相隔。例如： Print 后面有8个空格；Spc (8) ; 前面有8个空格 输出结果如下： 后面有8个空格 前面有8个空格,2020/7/18,清华大学出版社,25,3.5.3 MsgBox函数和MsgBox语句 1. MsgBox函数可生成为用户提供信息和选择的交互式对话

16、框。 格式：MsgBox（提示，按钮数值，标题） 功能：MsgBox函数在对话框中显示信息，在用户单击对话框上按钮时，可返回一个整数以标明用户单击的是哪个按钮。 说明：执行下面的语句后，在屏幕上会弹出如下图所示的消息框。 inta=MsgBox（第一项为提示，65，第三项为标题 ）,2020/7/18,清华大学出版社,26,计算“出钮数值”的方法：“按钮数值”是三个数值之和，这三个数值分别代表按钮的数目和类型，使用的图标样式，及默认按钮是什么。,注意：每个表只能取一个数。例如“按钮数值”是65，系统会自动把它分解成分别属于上面三个表中的三个值1（显示确定和取消按钮）、64（显示“i”图标）、0

17、（第一个按钮为默认按钮）。65=1+64+0，这种分解是惟一的。 在程序中，可以把“按钮数值”写成符号常数相加的形式，如把65写成vbOKCancel+vbInformation+vbDefaultButton1。 2、MsgBox语句： MsgBox也可以写成语句形式，例如： 密码错！, , 错误提示 执行此语句也产生一个消息框，如下图所示。 MsgBox语句没有返回值，因此常用于比较简单的信息提示。,2020/7/18,清华大学出版社,27,【例3.9】用MsgBox函数建立如下图所示的“退出”对话框。,2020/7/18,清华大学出版社,28,3.5.4 InputBox函数 Input

18、Box函数可以生成输入框来接收用户的输入。格式：InputBox（提示，标题，默认值，x坐标位，y坐标位置）功能：生成一个能接受用户输入的对话框，并返回用户在对话框中输入的信息。,说明 “提示”：字符串表达式，指定在对话框中显示的提示文本，此项为必选项。若要多行显示提示信息，则可以在各行之间用vbNewLine来分隔，vbNewLine是代表换行的常量。 “标题”：字符串表达式，在对话框中标题区显示，若省略，则标题为应用程序名。 “默认值”：字符串表达式，指定输入框中的文本框里显示的默认文本。 “x坐标位置”：整数表达式，指定输入框的左边与屏幕左边的水平距离，单位为Twip。如果省略此项，则对

19、话框会在水平方向居中。,2020/7/18,清华大学出版社,29,注意： 各项参数次序必须一一对应，除了“提示”不能省略外，其余各项均可省略，但省略部分有时要加入相应的逗号占位符。 用户可在文本框中输入数据，按“确定”按钮，函数返回值是用户在文本框中输入数据，其类型为字符型；如果按“取消”按钮，则函数返回值是一个零长度的字符串（空字符串）。,“y坐标位置”：整数表达式，指定输入框的上边与屏幕上边的水平距离，单位为Twip。如果省略此项，则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。,【例3.10】通过InputBox函数输入两个数字存入变量a、b，然后将其互换。,2020/7/18,清华大学出版社,30,3.6 注释语句、结束语句,3.6.1 注释语句 格式：|Rem 功能：可以实现在代码中加入用来解释说明的附加文本。 说明：如果在其他语句行后使用“Rem”关键字，则必须使用西文冒号“:”与语句隔开。 可以用一个撇号“” 来代替“Rem”关键字。若使用撇号，则在其他语句行使用时不必加冒号。 3.6.2 结束语句 格式：End 功能：用来结束程序的执行，并关闭已打开的文件。 说明：End语