程序控制结构1.pptVIP

VB程序控件结构;课程计划;重点回顾;变量在未赋值前，变量的系统默认值 数值型 例：Dim a As Integer 或长整型/单精度/双精度等 a = a + 1 字符型 例：Dim b As String b = b + Ta 逻辑型 例：Dim c As Boolean c = c + 1 ;重点回顾;目 录;4.1 顺 序 结 构;逻辑型到数值类型时True为-1,False为0；反之非0转换为True，0转换为False 当表达式是数字字符串，左边变量是数值类型，自动转换为数值类型再赋值，当表达式有非数字字符或空串时，出错。 例：n%= 1a23 n为整型，%为整型声明 n%= 任何非字符类型转换为字符类型，自动转换为字符类型 例：n$=False n为字符型，n的结果为字符串False;——最基本、最简单的程序控制结构，是构成程序框架的基础部分，任何程序都包含顺序结构。;例：单击窗体，在屏幕上显示图示的对话框：;2. 消息输出对话框——MsgBox函数和MsgBox过程 过程形式：MsgBox 提示[,按钮][,标题] 函数形式：变量[%] = MsgBox(提示[,按钮][，标题]) ;[P78 例4.9]利用InputBox输入用户密码，当用户输入123456时是合法用户，并显示验证的结果。 ; 1、If…Then…Else (单/双分支结构) P84 多行格式: If 条件 Then 语句块1 [ Else 语句块2 ] End If 单行格式: If 条件 Then 语句块1[ Else 语句块2] [区别]：多行格式的End If不可省略；而单行格式则不充许加End If。 [注意]：多个多行格式的End If以就近原则。 单行格式中，语句块若不止一条语句时，则必须用：冒号分隔。;单分支结构示例：已知两个数A和B，比较它们的大小，使得A大于B。 Dim A As Integer, B As Integer, T As Integer A = InputBox(请输入A的值：) B = InputBox(请输入B的值：) If A B Then A与B的值互换 T = A A = B B = T End If 在VB书写语句中规定，一行为一条语句，以回车结束。若一行有多条语句，用语句分隔符（冒号：）。 或 If A B Then T = A: A = B: B = T;双分支结构示例：通???键盘输入数x，判断其奇偶性！ Dim x As Integer x = InputBox(请输入x的值：) If x Mod 2 =1 Then Msgbox x 是奇数! Else Msgbox x 是偶数! End If 在VB书写语句中，一行为一条语句，以回车结束。若两行为一条语句，用续行符（空格下划线 _）连接，表下行与这行是同一条语句。常出现在内容较长语句。 或 If x Mod 2=1 Then Msgbox x 是奇数! _ Else Print x 是偶数!;2. If…Then…ElseIf语句(多分支结构) P89 If 条件1 Then 语句块1 ElseIf 条件2 Then 语句块2 … [ Else 语句块 n+1 ] End If;x≥90 ;计算机公共课教研室 · 2010年·邓秀华修改;已知百分制成绩mark，显示对应的五级制成绩哪些正确，哪些错误？（排除不合理分值）;P91 例5-6 已知变量strC中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。 用多分支结构实现: If Ucase(strC) =A And Ucase (strC) =Z Then Print strC + 是字母字符 对象为本窗体可省略 ElseIf strC =0 And strC