《Visual Basic程序设计 第3版 教学课件 ppt 作者 吴昌平 第3章》由会员分享，可在线阅读，更多相关《Visual Basic程序设计 第3版 教学课件 ppt 作者 吴昌平 第3章（128页珍藏版）》请在金锄头文库上搜索。
1、,第3章 简单VB程序设计,VB应用程序的执行是由事件驱动的，当用户触发某一事件时执行相应的事件过程，这些事件过程之间并没有特定的执行次序。,但在每一个事件过程内部，是有一定的执行控制流程的，这就是通常所说的三种基本结构：顺序结构、分支结构、循环结构。顺序结构是最简单的一种结构，该结构按语句排列的先后顺序执行。,本章的主要内容有：VB最基本的几个对象；与顺序结构有关的语句和方法。通过本章的学习，可以进行简单VB程序设计。,3.1 窗体,创建VB应用程序的第一步是创建用户界面。用户界面的基础是窗体，各种控件对象必须建立在窗体上。 启动VB后，即在屏幕上显示一个窗体，如图3-1所示。,图3-1 窗
2、体,3.1.1 窗体的主要属性 窗体的属性决定了窗体的外观和操作。对象的大部分属性可用两种方法来设置：通过属性窗口设置和通过程序代码设置。有少量的属性不能在程序代码中设置。,（1）Caption 属性 设置窗体的标题内容。标题内容应概括说明本窗体作用。 （2）MaxButton 属性和 MinButton 属性 MaxButton为True，窗体右上角有最大化按钮；为False时，无最大化按钮。 MinButton 属性为True，窗体右上角有最小化按钮；为False时，无最小化按钮。,（3）BorderStyle 属性 决定窗体边框式样及窗体是否能调整大小。 （4）BackColor属性和F
3、oreColor 属性 BackColor属性设置窗体的背景颜色；ForColor 属性设置窗体的前景颜色。窗体的前景颜色是执行Print方法时所显示文本的颜色。,（5）Height属性和Width属性 设置窗体的初始高度和宽度。其单位为Twip。1Twip=1/20点=1/1440英寸=1/567厘米。,（6）Left属性和Top属性 用于设置窗体左边框距屏幕左边界的距离和窗体顶边距屏幕顶端的距离。其单位为Twip。,（7）Name（名称）属性 设置窗体的名称，在程序代码中用这个名称引用该窗体。新建工程时，窗体的名称缺省为 Form1；添加第二个窗体，其名称缺省为 Form2，以此类推。为了
4、便于识别，用户通常给 Name 属性设置一个有实际意义的名称。,（8）Enabled属性 属性值为True或False，设置对象是否能够对用户产生的事件做出反应。一般在程序中设置，用于临时屏蔽对窗体或其他控件的的控制。,（9）Moveable属性 属性值为True或False，设置是否可以移动窗体。,（10）Visible属性 属性值为True或False，设置窗体是否被显示。用户可用该属性在程序代码中控制窗体的隐现。,（11）Picture属性 设置在窗体中显示的图片。单击Picture属性右边的按钮，弹出“加载图片”对话框，用户可选择一个图片文件作为窗体的背景图片。若在程序中设置该属性的值
5、，需要使用LoadPicture函数。,（12）WindowState属性 设置窗体启动后的大小状态。它有三个可选值： 0-Normal: 窗体大小由Height和Width属性决定。 1-Minimized: 窗体最小化成图标。 2-Maximized: 窗体最大化，充满整个屏幕。,在VB中，虽然不同的对象有不同的属性集合，但有一些属性，如Name 、Enabled、Visible、Height、Width、Left、Top等，其他控件也具有，且具有相似的作用。在后续的章节中，我们主要介绍各种控件常用的特殊属性。,3.1.2 事件 窗体最常用的事件有三种：Click（单击）、DbClick（
6、双击）、Load（装入）。,（1）Click事件 程序运行后，单击窗体触发该事件。 （2）DbClick事件 程序运行后，双击窗体触发该事件。,（3）Load事件 Load事件是窗体被装入内存工作区时触发的事件。如果这个事件过程存在，就马上执行它。Load事件过程通常用于启动程序时对属性、变量的初始化，装载数据等。,【例3.1】窗体上无最大化最小化按钮，程序运行后，在窗体上装入一幅图片作为背景；当单击窗体时，窗体变宽；当双击窗体时，则退出。程序运行界面如图3-2所示。,图3-2 例3.1运行界面,属性设置如表3-1所示。,表3-1 例3.1对象属性设置,事件过程如下： Private Sub
7、Form_Load() 装入图片 Form1.Picture = LoadPicture(“c:picChangcheng.wmf“) End Sub Private Sub Form_click() 单击窗体,Form1.Width = Form1.Width + 1000 End Sub Private Sub Form_DblClick() 双击窗体 End End Sub,说明：上机时，可通过查找文件的方法找一个图片文件，参照本例中的格式代如即可。,3.2 命令按钮,在VB应用程序中，命令按钮是使用的最多的对象之一，常常用它接受用户的操作信息，触发相应的事件过程，以实现指定的功能。,3
8、.2.1 属性 （1）Caption属性 设定命令按钮上显示的文本。 （2）Default属性 该属性用于设置默认命令按钮。当Default属性设置为True时，按ENTER键相当于用鼠标单击了该按钮。,（3）Style 属性和Picture属性 命令按钮上除了可以显示文字外，还可以显示图形。 若要显示图形，首先应将Style 属性设置为1，然后在Picture属性中设置要显示的图形文件。类似的，若要设置命令按钮的BackColor（背景色），也应将Style 属性设置为1。,Style 属性可设置为： 0-Standard： 标准的，命令按钮上不能显示图形。 1-Graphical：图形的，
9、命令按钮上可以显示图形，也可以显示文字。,（4）Value属性 该属性只能在程序运行期间引用或设置。True表示被按下，False（默认）表示未被按下。在代码中可通过设置Value属性为True，来触发命令按钮的Click事件。例如，利用下面代码，可通过程序来选择命令按钮，并触发命令按钮的Click事件。 Command2.Value=True,3.2.2 事件 最常用的事件是Click事件。,3.3 标签,标签（Label）主要用于显示不需要用户修改的文本。所以，标签可以用来标示窗体及窗体上的对象，如为文本框、列表框等添加描述性的文字，或者作为窗体的说明文字。,3.3.1 属性 （1）Cap
10、tion属性 设置标签要显示的内容。它是标签的主要属性。 （2）BorderStyle属性 默认值为0，标签无边框；设置为1时，标签有立体边框。,（3）Autosize属性 该属性用于设置标签是否自动改变尺寸以适应其内容。设置为True时，随着Caption的内容变化，自动调整标签的大小，并且不换行；设置为False时，标签保持设计时的大小，这时如果内容太长，只能显示一部分。默认值为False。,（4）Alignment属性 确定标签中内容的对齐方式，有三种可选值： 0-Left Juseify：默认值，左对齐。 1-Right Juseify：右对齐。 2-Center：居中对齐。,（5）B
11、ackStyle属性 该属性用于设置背景是否透明。默认值为1，不透明；设为0时，透明。所谓透明，是指无背景色。,3.3.2 事件 常用Click，DbClick事件。 【例3.2】修改例3.1，在图片上加提示信息“请单击图片”，程序其它功能不变。程序运行界面如图3-2所示。,图3-3 例3.2运行界面,操作如下： 在窗体上添加一个标签，将其Caption属性设置为“请单击图片”，BackStyle属性设置为0（透明），程序代码不变。,3.4 文本框,文本框（TextBox）在窗体中为用户提供一个既能显示文本又能编辑文本的区域,3.4.1 属性 （1）Text属性 设置文本框中显示的内容。它是文
12、本框最主要的属性。 （2）Locked属性 设置文本框中的内容是否可编辑。 默认值为False，表示可编辑，当设置为True时，不可编辑，此时文本框的作用相当于标签。,（3）Maxlength属性 设置文本框中允许输入的最大字符数。 如果输入的字符数超过Maxlength设定的数目后，系统将不接受超出部分的字符，并发出嘟嘟声。该属性默认值为0，表示无限制。,（4）MultiLine属性 决定文本框是否允许接收多行文本。 若设置为True，文本框可接收多行文本，当输入的文本超出文本框的边界时，会自动换行。默认值为False，文本框中只能输入一行文本。,（5）PassWordChar属性 当Mul
13、tiLine为False时，该属性可设置显示在文本框中的替代符。 例如，PassWordChar设置为“*”，那么无论用户输入什么字符，文本框中显示的只是“*”，但文本框接收的还是用户实际输入的字符。设置该属性主要用于输入口令。,（6）ScrollBars属性 决定文本框中是否有滚动条。 只有当MultiLine属性为True时，文本框才能加滚动条。,3.4.2 事件 文本框除支持Click，DbClick事件，常用的还有Change，LostFocus事件。,1. Change事件 当用户输入新内容，或程序对文本框的Text属性重新赋值，从而改变文本框的Text属性时触发该事件。,2. Lo
14、stFocus事件 当用户按下键时光标离开文本框，或用鼠标选择其他对象时触发该事件，称为“失去焦点”事件。 焦点是对象接收用户鼠标或键盘输入的能力。当对象具有焦点时，可接收用户的输入。通常用该事件过程对文本框中的内容进行检查和确认。,3.4.3 方法 文本框最常用的方法是SetFocus，使用该方法可把光标移到指定的文本框中，使之获得焦点。当使用多个文本框时，用该方法可把光标移到所需要的的文本框中。 其使用格式为： 对象.SetFocus,【例3.3】程序运行后，随着用户的输入，标签中同步显示出用户对文本框的内容更新的次数。运行效果如图3-4所示。,图3- 4 例3.3 运行效果,（1）界面设
15、计 在窗体上建立一个文本框、一个标签。设置各对象的属性，如表3-2所示。,表3-2 例3.3对象属性设置,（2）编写事件过程如下： Private Sub Text1_Change() Static i% i = i + 1 Label1.Caption = i End Sub,3.5 赋值语句,赋值语句是VB程序最常用、最基本的语句，它能为变量提供数据。另外，若要在程序代码中设置对象的属性，也是使用赋值语句。,赋值语句有两种格式： 格式1： 变量名=表达式 格式2： 对象名.属性名=表达式 赋值语句的作用是：首先计算“=”右边表达式的值，然后将该值赋给“=”左边的变量或对象的属性。在格式2中
16、，若对象名省略，则默认对象为当前窗体。,例如： x=2 把2赋给x y=x*3 计算x*3的值，得6，把6赋给y x=x+1 计算x+1的值，得3，把3赋给x a$= “Hello“ 把“Hello”赋给a$ Text1.Text=“你好！“ 把“你好！”赋给Text1的Text属性,这里还要说明一下赋值语句中的类型问题。通常，在使用时应使表达式值的类型与变量（或对象的属性）类型相同，以避免出现“类型不匹配”的错误。不过，某些情况下，VB容许“=”两边类型不相同。,例如： dim x!,y%,z$ x = “12.5” 把数值形式的字符串赋给 数值变量 y=34.24 把单精度数赋给整型变 量，此时截去小数部分 z=6 把整数赋给实型变量,以上三种情况都是赋值相容的。在赋值相容前提下，当“=”两边类型不相同时，VB自动将表达
