VB 第四章 顺序分支与循环结构课件.ppt

第四章 基本的控制结构;4.1 顺序结构;二. 与用户交互函数和过程 1.InputBox函数 P80 InputBox(提示[，标题][，缺省][，x 坐标位置][，y坐标位置]) 其中:提示 提示信息，标题 对话框标题，缺省输入区缺省值 函数返回字符类型.;2. MsgBox函数和MsgBox过程P81 函数形式:变量[%] = MsgBox(提示[,按钮][，标题]) 过程形式: MsgBox 提示[,按钮][,标题] 按钮值如下: 函数返回所选按钮整数值:;例4.1 编一帐号和密码检验程序。 要求: 帐号不超过6位数字,有错,清除原内容再输入. 密码输入时在屏幕上以 “*”代替; 若密码错，显示有关信息，选择“重试”按钮，清除原内容再输入，选择“取消”按钮，停止运行。 分析: 帐号6位,MaxLength为6 , LostFocus判断数字IsNumeric函数 密码PassWordChar为“*”,MsgBox函数设置密码错对话框.;常见错误; 4.2 选择结构 1. If…Then语句(单分支结构)P100 If 表达式 Then 语句块 End If 或 If 表达式 Then 语句 ;单分支结构实现: y=cos(x)－x^3+3*x If x0 Then y=sin(x)+sqr (x*x+1) ;2. If…Then…Else语句(双分支结构)P101 If 表达式 Then 语句块1 Else 语句块2 End If 也可以写为一行，格式为： If 表达式 Then 语句1 Else 语句2;3．If语句的嵌套P102 If语句的嵌套是指If或Else后面的语句块中又包含If语句。 形式如下： If 表达式1 Then If 表达式11 Then … End If … End If ;4. If…Then…ElseIf语句(多分支结构)P106 形式: If 表达式1 Then 语句块1 ElseIf 表达式2Then 语句块2 … [Else 语句块 n+1 ] End If;例4.2 已知变量strC中存放了一个字符，判断字符是字母字符、数字字符还是其他字符。注：Ucase()小写变大写，Lcase()相反 用多分支结构实现: If Ucase(strC) =A And Ucase (strC) =Z Then Print strC + 是字母字符 ElseIf strC =0 And strC =9 Then Print strC + 是数字字符 Else Print strC + 其他字符 End If;例4.3 已知百分制成绩mark，显示对应的五级制成绩 哪些正确，哪些错误？;利用If语句的嵌套改写前面评分的错误程序如下：;表达式列表：与变量或表达式同类型的下面四种形式之一： 表达式 例: A 一组枚举表达式(用逗号分隔) 2,4,6,8 表达式1 To 表达式2 60 To 100 Is 关系运算符表达式 Is 60;例4.5 变量strC中存放了一个字符，判断字符类型。 在例4.2中用多分支结构实现: If Ucase(strC) =A And Ucase (strC) =Z Then Print strC + 是字母字符 ElseIf strC =0 And strC =9 Then Print strC + 是数字字符 Else Print strC + 其