第四讲 控件结构

例4：(思考)输入二级考试成绩，要求显示对应三级制的 评定。评定条件为：
优：Mark ≥ 90 等级： 通过：60 ≤ Mark ＜ 90 未通过：<60
T
开始
输入成绩
成绩>=90?
T F
输出“优”
成绩>=60? F
输出“通过” 输出“未通过”
Visual Basic 程序设计
第五章 基本的控制结构
• InputBox函数
格式：InputBox ( 提示 [,标题] [, 默认值] [, X] [, Y] )
• Msgbox函数
格式：MsgBox ( 提示内容 [, 按钮设置] [, 标题] ) Visual Basic 程序设计
第五章 基本的控制结构
InputBox函数---输入框
作用：
• 打开一个对话框,等待用户输入内容。 • 单击确定，返回输入值（字符型数据）
第五章 基本的控制结构
§5.3.1 If条件语句
2. If…Then…Else 结构
例3: 已知△三边的长，设计 求△面积的程序(P64)。
开始
输入a,b,c
两边之和大于第三边？
T F
求半周长L 求S△
提示 数据错
输出s
结束 Visual Basic 程序设计
第五章 基本的控制结构
§5.3.1 If条件语句
Sum 5 执行了N=N+1后 Sum 6
(4) 一条赋值语句不能同时给 多个变量赋值
(5) 正确理解加1语句
Visual Basic 程序设计
第五章 基本的控制结构
§5.2 顺序结构
顺序结构：各语句按照出现的先后次序依次执行
1.赋值语句
⑴ 给变量赋值 ⑵ 设置或获取对象的属性
⑶ 与用户交互函数和过程
第五章 基本的控制结构
§5.2 顺序结构
顺序结构：各语句按照出现的先后次序依次执行
1.赋值语句
例: Dim v As Integer Dim book As String*8 Dim sum As Double Dim Bool As Boolean v=26 v=v+12.3 sum=v*123.4+56.7 v=“126” sum=“123ab” v=True sum=False Bool=123 Bool=0 Visual Basic 程序设计
点重新输入，若单击“取消”，停止运行
Visual Basic 程序设计
第五章 基本的控制结构
§5.3 选择结构
先对条件测试，根据测试的结果选择执行不同的分支
1.If条件语句 2.Select Case 结构 3.条件函数
Visual Basic 程序设计
第五章 基本的控制结构
§5.3.1 If条件语句
等价于： If Score>=60 Then Print “祝贺你考试通过！” Print “继续努力!!!”
练习
Visual Basic 程序设计
第五章 基本的控制结构
§5.3.1 If条件语句
1. If…Then结构
例1：输入两个数，分别放在x和y变量中，比较它们大小，
然后将大数放在x中，小数放在y中。 …… x%=Text1.text Y%=Text2.text If x < y Then y=x t=x x=y x=y y=t End If Print x, y ……
第五章 基本的控制结构
§5.2 顺序结构
顺序结构：各语句按照出现的先后次序依次执行 赋值语句 包括 输入/输出 Print方法 系统提供的交互函数或过程
1.赋值语句
⑴ 给变量赋值
如: A=“VB程序设计” Text1.Text=A 格式：变量名=表达式 B＝Text2.Text 如: Dim v As Integer ⑵ 设置或获取对象的属性 String*8 Dim book As Dim sum As Single 设置属性值：[对象名.]属性=表达式 v=26 v=v+1 获取属性值：变量名＝对象名.属性 book=“VB程序设计” sum=v*123.4+56.7 Visual Basic 程序设计
1.赋值语句
。
注意：
(1) 右边表达式的值强制转 换成左边变量的精度 (2) 若不能实现类型转换， 出现“类型不匹配”错 (3) 赋值号左侧只能出现变量
例: Dim X As Single Dim Y As Single Dim Sum As Single X=26 Sin(X)=X+Y 5=Sqr(X)+Y X+Y=126 X=Y=Sum=1 Sum=Sum+1
.
§5.3.1 If条件语句
3. If…Then…ElseIf 结构
A = MsgBox("非法数据！" + Chr(13) +Chr(10)+ "是否继续？", vbYesNo + vbCritical, "提示信息") Visual Basic 程序设计
第五章 基本的控制结构
信息框的返回值：
4.Msgbox的函数返回值
用于确定用户选择对话框的哪一个按钮，以作出不同的响应。 符号常量 返回值 对应按钮
1.语法
• 变量 = MsgBox(提示内容[,按钮][,标题]) • MsgBox 提示内容 [, 按钮] [, 标题]
2.MsgBox 函数的常用参数的说明
提示内容：必要。字符表达式，即显示在对话框中的信息 <= 1024 个字符， 按 钮： 可选。整型表达式，缺省值为 0 如果文字超过一行，可用Chr(13) + Chr(10) 指定信息框中按钮数目、类型、图标类型， 换行 缺省按钮等 标 题： 可选。在对话框标题栏中显示的内容。 省略此项，则将应用程序名放在标题栏中 Visual Basic 程序设计
2.算法的特征
T r≠0特定过程 • 确定性、可行性、有穷性、输入性、输出性 F 3.算法的描述 流程线 输出M • 广泛使用的是流程图，它使规定的符号来描述算法 结束连接点 Visual Basic 程序设计
第五章 基本的控制结构
§5.1 算法及程序设计基础
1.算法的概念：
• 广义: 即解决某个问题或处理某件事的方法和步骤 • 狭义：专指用计算机解决某一问题的方法和步骤
第五章 基本的控制结构
第五章 基本的控制结构
5.1 算法及程序设计基础
5.2 顺序结构 5.3 分支结构
5.4 循环结构 5.5 程序示例
Visual Basic 程序设计
第五章 基本的控制结构
§5.1 算法及程序设计基础
1.算法的概念：
开始 图形符号： • 广义: 即解决某个问题或处理某件事的方法和步骤 • 狭义：专指用计算机解决某一问题的方法和步骤 输入/输出 输入M、N 例：用辗转相除法写出求两个自然数的最大公约数的算法 处理 r = m mod n (1)输入两个自然数m,n (2)r＝m mod n 判断 m = n (3)m＝n；n＝r (4)若r≠0 则重复(2)(3)步 否则输出m（最大公约数） n = 开始/结束 r
格式：
变量名 = InputBox ( 提示[,标题][,默认值][,X][,Y])
例：设置一个输入框：
提示用户输入查询学号。 提示： • 若提示内容中需要换行显示： 在换行处加chr(13)和chr(10) • 各项参数位置必须一一对应 Visual Basic 程序设计
第五章 基本的控制结构
Msgbox函数--信息框
Buttons参数值= 1 或 vbOKCancel
Visual Basic 程序设计
第五章 基本的控制结构
Buttons参数的设置
2.图标的样式
Buttons的和=按钮设置值+图标设置值+缺省按钮值
对应值 16 32 48 64
符号常量
出现的图标
vbCritical -------------------vbQuestion -------------------vbExclamation -------------vbInformation ---------------
vbOK
vbCancel vbAbort vbRetry vbIgnore vbYes vbNo
1--------------------确认
2--------------------取消 3 -------------------终止(A) 4--------------------重试(R) 5--------------------忽略(I) 6 ------------------- 是(Y) 7 ------------------- 否(N)
注意：
(1) 右边表达式的值强制转 换成左边变量的精度
• Boolean 数值型
True为-1；False为0 • Boolean 数值型 非0为True；0为False (2) 若不能实现类型转换， 出现“类型不匹配”错
第五章 基本的控制结构
§5.2 顺序结构
顺序结构：各语句按照出现的先后次序依次执行
Buttons参数值= 1+64 或 vbOKCancel+ vbInformation Visual Basic 程序设计
第五章 基本的控制结构
Buttons参数的设置
3.说明哪一个是缺省按钮
Buttons的和=按钮设置值+图标设置值+缺省按钮值
对应值 符号常量 缺省的活动按钮
0
256 512
VbDefaultButton1
x<y
T
F
两个变量的值互换：