控制结构vb.ppt

第4章 控制结构
顺序结构
选择结构
循环结构
GoTo型控制语句
应用举例
顺序结构
引例：程序运行时，首先打开一个窗体Form，提示用户输入考试成绩，输入成ox(提示[，标题][，缺省][，x 坐标位置][，y坐标位置])
（1）每执行一次InputBox函数只能输入一个值，输入的值如需保存则应将该函数的返回值赋给某个变量。如给a和b两个变量赋值，使用下面语句：
a= InputBox(“a=?”,”Input”,30,400,400)
b= InputBox(“b=?”,”Input”,40,400,400)
（2）格式中，除了“提示”为必选项，其它都是可选项，各参数必须一一对应，不选的可选项也须以逗号占位符隔开。如下面函数中省略了默认值，但必须以逗号留出相应的位置。
InputBox(“What’s your name?”,”Your name?”,,40,40)
顺序结构
【注意】
人机交互函数与过程
利用InputBox函数制作一个对话框，提示输入顾客姓名，默认值为“Wang”。对话框如下左图所示。
顺序结构
【例4-1】
人机交互函数与过程
【例4-2】
用InputBox函数做一个输入学生情况数据对话框 。对话框如上右图所示。
顺序结构
2. MsgBox函数、MsgBox过程
【格式】
【功能】打开一个信息框，显示用户指定的信息，等待用户选择相应按钮。
【返回值】MsgBox函数的返回值是一个整数。该整数与所选择的命令按钮有关，七种按钮对应的返回值分别是1~7，含义如表。
变量[%]=MsgBox (提示[,按钮][，标题])
人机交互函数与过程
MsgBox函数或MsgBox过程都可以产生一个提示用户的消息输出框，但MsgBox过程不象MsgBox函数那样会产生返回值。
MsgBox过程也可以写成语句形式，格式为：
MsgBox (提示[,按钮][，标题])
一般仅用于显示简单的提示信息。
MsgBox函数返回值与所选命令按钮对照表
返回值
符号常量
选择按钮
返回值
符号常量
选择按钮
1
vbOK
确定
5
vbIgnore
忽略
2
vbCancel
取消
6
vbYes
是
3
vbAbort
终止
7
vbNo
否
4
vbRetry
重试
顺序结构
人机交互函数与过程
人机交互函数与过程
顺序结构
MsgBox (提示[,按钮][，标题])
MsgBox函数参数，其含义如下。
（1）提示是在对话框中显示的消息内容，为长度不大于1024个字符的字符串型量。
（2）按钮参数指定在对话框中显示的按钮和图标的种类及数量。该参数是一个整数值或符号常量，其值由4类数据相加产生，这4类数据分别表示按钮的种类与数量、显示图标的样式、活动按钮的位置及消息框的样式。较常用的按钮参数的含义见表。
（3）标题参数指定消息框的标题，为可选项。省略标题时，对话框的标题为当前工程的名称。
例如：
1）显示“确定”按钮、“暂停”图标，默认按钮为“确定”。
type参数的数值为：0+16+0=16。
符号常量形式为：
vbOKOnly+ vbCritical+ vbDefaultButton1
2）显示“是”、“否”、“取消”3个按钮，显示“？”图标，默认按钮为“是”。
type参数的数值为：3+32+0=35。
符号常量形式为：
vbYesNoCancel+ vbQuestion + vbDefaultButton1
顺序结构
人机交互函数与过程
顺序结构
人机交互函数与过程
【例4-3】
实现下左图所示消息框。
【例4-4】
编写一个提示对话框。在对话框中显示“Are you continue to?”，对话框标题为“Operation Dialog Box”，显示“终止”、“重试”、“忽略”三个命令按钮和“？”图标，把第一个命令按钮作为默认活动按钮。对话框见上右图。
选择结构
实现语句有：
If-Then-else
Select Case/End Select
对给定的条件进行分析、比较和判断，并根据判断结果采取不同的操作。这样的程序结构就构成了选择结构。
4．2．1 条件语句If-Then-Else
选择结构