清华大学VB经典教案——顺序结构程序设计.ppt

第3章 顺序结构程序设计一个Visual Basic应用程序由多个过程组成，在过程中程序的 控制结构仍然采用结构化程序设计的三种基本结构：顺序结构、 选择结构、循环结构 3.1 文本与按钮控件 3.1.1 标签标签主要用于显示只读的文本信息，即标签只能显示文本，不 能对显示的文本进行编辑 1．标签的常用属性 （1）Caption属性：在标签中显示的文本内容（标题） （2）Alignment属性：标签的对齐方式：左对齐（0-Left Justify ）、右对齐（1-Right Justify）、居中（2-Center） （3）BorderStyle属性：标签的边框样式，默认为无边框 （4）BackStyle属性：标签透明或不透明，默认为不透明，会挡 住它后面的控件5）AutoSize属性：标签是否会根据Caption属性指定的标题 自动改变标签水平方向的大小 （6）WordWrap属性：标签是否会根据Caption属性指定的标 题自动改变标签垂直方向的大小 2．标签的常用事件标签的常用事件是Click、DblClick事件例3-1】利用标签的BackStyle属性设计文字的阴影效果 3.1.2 文本框文本框是一个文本编辑区域，在程序运行期间都可以在这个 区域中输入、编辑和显示文本。

1．文本框的常用属性 （1）Text属性该属性用于设置或返回文本框中输入或显示的内容 （2）MaxLength属性一般用于文本框作为密码输入框时，限制输入文本的长度 （3）MultiLine属性文本框是否可以输入或输出多行文本，该属性默认值为False ，则在文本框中只能输入单行文本 （4）PasswordChar属性该属性可用于密码输入，如果把PasswordChar属性设置为一 个字符，如：星号“*”，则在文本框中键入字符时，显示的不是键 入的字符，而是被设置的字符（如：星号）注意：文本框的MultiLine属性和PasswordChar属性不能同 时使用5）ScrollBars属性该属性用于确定文本框是否有滚动条，默认为文本框没有滚 动条，可以给文本框设置水平滚动条、垂直滚动条或者同时具有 水平和垂直滚动条注意：只有当MultiLine属性值被设置为True时，才能用 ScrollBars 属性为文本框设置滚动条 （6）SelStart属性文本框中选中文本的开始位置 （7）SelLength属性文本框中选中文本的长度（字符数） （8）SelText属性文本框中选中的文本 （9）Locked属性该属性用于指定文本框是否可编辑（锁定）。

当Locked属性 值为False（默认值）时，可以编辑文本框中的文本；当Locked 属性值为True时，不能编辑文本框中的文本类似地，当 Enabled属性值为True（默认值）时，可以编辑文本框中的文本 ；当Enabled属性值为False时，不能编辑文本框中的文本 2．文本框的常用事件 （1）Change事件当改变文本框中的内容时触发其Change事件 （2）KeyPress事件当焦点在文本框中时，按下大小写字母键、数字键、标 点符号键、空格键、Esc键、BackSpace键、Enter键、Tab键时 触发其KeyPress事件 （3）GotFocus事件当文本框得到焦点时触发其GotFocus事件 （4）LostFocus事件当文本框失去焦点时触发其LostFocus事件 3．文本框的常用方法文本框的常用方法是SetFocus，该方法使文本框获得焦点3.1.3 命令按钮命令按钮常用于执行用户的命令 1．命令按钮的常用属性 （1）Caption属性在命令按钮上显示的文本内容（标题） （2）Default属性是否为默认命令按钮，当一个命令按钮的Default属性 值设为True时，当焦点不在任何一个命令按钮上时，按下回车 键，相当于单击该命令按钮。

在一个窗体中，最多只能有一个 命令按钮的Default属性值被设置为True （3）Cancel属性是否为取消命令按钮，当一个命令按钮的Cancel属性值 设置为True时，任意时刻按下Esc键，相当于单击该命令按钮 在一个窗体中，最多只能有一个命令按钮的Cancel属性值被 设置为True4）Style属性设置文本框的样式可以实现两种样式：0-Standard（标 准样式，默认）、1-Graphical（图形样式） （5）Picture属性用该属性可以给命令按钮指定一个图形为了使用这个属 性，必须把Style属性设置为图形样式 （6）DownPicture属性设置当控件被单击并处于按下状态时在控件中显示的图形 为了使用这个属性，必须把Style属性设置为1-Graphical，否 则DownPicture属性将被忽略 （7）DisabledPicture属性设置当命令按钮被禁止使用，即Enabled属性值为False时 ，在命令按钮上显示的图形和前两个属性一样，必须把Style 属性设置为l-Graphical才能使DisabledPicture属性生效8）Value属性该属性仅在程序运行时有效，当Value属性值为True时， 相当于Click该命令按钮。

该属性一般用于模拟产生用户的 Click事件，可用于编写演示程序 2．命令按钮的常用事件命令按钮最常用的事件是Click事件，命令按钮不支持 DblClick事件 3．命令按钮的常用方法命令按钮的SetFocus方法可以使该命令按钮获得焦点例3-2】输入球的半 径，计算并输出球的体 积和表面积 3.2 焦点与Tab键顺序 3.2.1 焦点焦点的作用是使窗体中的某个控件成为“当前”控件或“活 动”控件，这样，该控件将可以接收用户的输入 1．与焦点有关的常用事件当对象得到焦点时，将触发其GotFocus事件；而当对象 失去焦点时，将触发其LostFocus事件 2．与焦点有关的常用方法在程序代码中使用对象的SetFocus方法，可以使对象获得焦点下面的操作可以使对象获得焦点：（1）程序运行时单击该对象；（2）程序运行时按下访问键选择该对象；（3）程序运行时按Tab键注意： （1）只有当控件的Enabled属性和Visible属性值均为True时，控件才能接收焦点； （2）并不是所有对象都可以接收焦点，某些控件，如：框架、标签、菜单控件、直线、形状、图像控件和计时器控件都不能接收焦点； （3）焦点在不同控件上的表现形式不同，如：文本框的焦点是一个闪烁的光标，命令按钮、复选框、单选按钮的焦点是一个虚线框。

3.2.2 Tab键顺序Tab键顺序就是按Tab键时焦点在控件之间移动的顺序，一般情况下，Tab键顺序由控件建立时的先后顺序确定与控件的Tab键顺序有关的属性如下：（1）TabIndex属性控件的TabIndex属性决定了按Tab键时控件获得焦点的先后顺序默认情况下，第一个添加的控件其TabIndex属性值为0，第二个添加的控件其TabIndex属性值为1，以此类推当改变某个控件的TabIndex属性值时，Visual Basic会自动调整其他控件的TabIndex属性值2）TabStop属性控件的TabStop属性决定了焦点是否会停在该控件上，当控件的TabStop属性值为False时，按下Tab键，焦点将跳过该控件3.3 InputBox函数用InputBox函数（输入框函数）产生一个输入框，可以输 入一个数据（文本），用户输入数据后，按回车键或单击“确定 ”按钮，将输入数据赋给赋值符号前的变量其语法格式如下：变量名=InputBox([,][,])其中，是必选参数，是字符串，在其中可以含 有回车符Chr(13)、换行符Chr(10)，或系统符号常量vbCrLf，实现多行文本的显示；后两个参数是可选参数，可以省略，但 如果仅仅只是省略第二个参数，则第二个参数前的逗号不能省 略。

InputBox函数的三种简化形式： （1）变量名=InputBox() （2）变量名=InputBox(,) （3）变量名=InputBox(, ,])【例3-3】用InputBox函数输入长 方形的长和宽，计算并输出长方 形的面积 3.4 数据输出 3.4.1 与输出有关的属性和方法 1．与输出有关的属性CurrentX、CurrentY属性用于设置或返回在窗体、图 片框或打印机上当前输出位置的横坐标、纵坐标 2．与输出有关的方法TextWidth、TextHeight方法分别返回文本或字符串的 宽度和高度，这两个返回值的大小与窗体、图片框或打印机的 字形属性有关TextWidth、TextHeight方法的语法格式如下 ：= [.]TextWidth (字符串)= [.]TextHeight(字符串)其中，可以是窗体、图片框或打印机，如果是 当前窗体可省略3.4.2 用Print方法输出数据 1．Print方法Print方法的语法格式如下： [.]Print [{Spc(n)|Tab(n)};][][{;|,}]说明： （1）可以是窗体、图片框或打印机，如果是当前 窗体可省略； （2）中的表达式可以是算术表达式、字符串表达式、关系表达式或布尔表达式。

如果是字符串，则原样输 出（将双引号去掉后直接输出）；如果是正数，在数值前有 一个空格； （3）当输出多个表达式时，如果表达式之间用逗号“,”分隔 ，则以标准格式（14个字符的宽度）输出；如果表达式之间 用分号“;”分隔，则以紧凑格式（连续）输出；（4）如果Print方法的行尾有逗号，则下一个Print方法的输 出内容，接着当前输出内容的后面，以标准格式输出；如果 Print方法的行尾有分号，则下一个Print方法的输出内容，接 着当前输出内容的后面，以紧凑格式输出；如果Print方法的 行尾，既没有逗号也没有分号，则自动换行； （5）如果省略表达式，则输出一个空行； （6）Print方法后的表达式是输出表达式的计算结果注意： （1）输入关键字Print时，可以只输入一个“？”，Visual Basic会自动将其转换为Print； （2）若要在Form_Load事件过程中，在窗体或图片框中使 用Print方法输出数据，则必须将窗体或图片框的AutoRedraw 属性值设为True（默认值为False），否则，在窗体或图片框 中使用Print方法输出的数据将消失例3-4】窗体输出在窗体的 中央位置输出“计算机等级考试” ，如图3-5所示。

【例3-5】图片框输出在窗 体上画1个图片框Picture1， 在图片框的中央位置输出“计 算机等级考试”，如图3-6所示 2．与Print方法有关的函数 （1）Tab(n)函数从输出对象左边的第n列或第n个字符的位置开始输出 （2）Spc(n)函数输出n个空格注意：在Print方法中，使用这两个函数时，输出表达式 之间要用分号作为分隔符 3．窗体或图片框的清除方法Cls方法可以清除窗体或图片框中用Print方法和图形方法 在程序运行时所产生的文本或图形，清除后的区域以背景色 填充Cls方法的语法格式如下： [.]Cls其中，可以是窗体或图片框，如果省略，则清 除当前窗体上用Print方法和图形方法在程序运行时所产生的 文本或图形例3-6】用Print方法在窗体上输 出，如图3-7所示 3.4.3 MsgBox函数MsgBox函数（消息框函数）用于实现信息提示以及与用 户的信息交互功能MsgBox函数的语法格式如下： 变量名=MsgBox([,][,])其中，是必选参数，是字符串，在其中可以 含有回车符Chr(13)、换行符Chr(10)，或系统符号常量vbCrLf ，实现多行文本的显示；后两个参数是可选参数，可以省略， 但如果仅仅只是省略第二个参数，则第二个参数前的逗号不能 省略。

由三个整数值组成：按钮类型、图标类 型、默认按钮，见表3-3，这三个数值可以用“+”号连接成一个 。