【vb精品源码栏目提醒】:网学会员为广大网友收集整理了,【精品】VB第三章 - 大学课件,希望对大家有所帮助!
第三章 程序结构 南方医科大学生物医学工程学院 傅蓉 顺序结构程序 选择结构结构 循环结构3.6.1 顺序结构 程序中最基本、最简单的结构,也是任 何程序的基本结构。
程序执行时,从上 往下,逐条执行。
3.6.2 分支结构 一、基本概念 二、If语句 三、Select case语句 四、IIf函数 五、选择结构的转换和嵌套一、基本概念 程序设计时常常需要对给定的条件进行 分析、比较和判断,并根据判断的结果 执行不同的语句块。
当程序执行到具有分支结构的语句时, 先测试条件,然后根据测试结果从不同 的分支中选择某一分支执行。
这里作为 测试的条件又称条件表达式,其值只有 True/False两值。
二、If语句1. 单行结构If…Then 只能依据一个条件的值进行判断2. 块结构If…Then…Else 能依据多个条件进行判断3. 条件嵌套1.单行结构If…Then1 执行单语句2 执行语句块1)执行单语句 语法:If 条件表达式 Then 语句1 必须写在一行If Text1.Text “1” Then Label2.Caption “正确!程序1Private Sub Command1_ClickLabel2.Caption 错误!If Text1.Text 1 Then Label2.Caption 正确End Sub程序2 例3-5-1任意输入三个数a,b,c,找出三个中最大者。
要求:界面有两个按钮(“开始”完成判断,“结束”完成退出程序)、一个标签(提示信息)和一个文本框(结果显示)。
界面设计代码设计程序3:跑马灯Private Sub Timer1_TimerImage1.Left Image1.Left 100If Image1.Left Form1.ScaleLeft Width Then Image1.Left Form1.ScaleLeftEnd Sub2)执行语句块If 条件表达式 Then 语句1 其含义是: 若条件表达式的值为true时, 语句2 则依次执行语句1、语句2… …… 语句n后,再执行End if语句 后面的语句;否则,则直接 语句n 执行end if语句后面的语句。
End If当满足条件时,可以执行多条语句。
缩进!程序4 输入数字Private Sub Text1_KeyPressKeyAscii As IntegerIf KeyAscii 48 Or KeyAscii 57 Then MsgBox 输入数据非法 KeyAscii 0End IfEnd Sub2.块结构If…Then…Else块结构使程序能够依据多个条件值执行语句,其语法格式如下:If 条件表达式1 Then 语句块1ElseIf 条件表达式2 Then 语句块2 该语句的含义是:…… 如果条件1的值为true,则执行Else 语句块1;如果条件2的值为true 语句块n 则执行语句块2;所有条件为 False,执行Else后面的语句。
End If这种结构的逻辑结构图是: 真 条件表达式1 语句块 1 假 真 条件表达式2 语句块2 …… 假 真 条件表达式n 语句块n 假 Else语句块n1 End if语句If sngScore 85 Then Print 优秀ElseIf sngScore 85 And sngScore 70 Then Print 中等ElseIf sngScore 70 And sngScore 60 Then Print 合格ElseIf sngScore 60 And sngScore 0 Then Form1.ForeColor vbRed Print 不及格Else Print 成绩输入错误!End If3. 条件嵌套 程序设计时可能会遇到这种情况,当进 行条件判断后执行某个分支时,需要再 次进行新的条件判断,从而执行下一个 分支。
程序的结构有如树形。
这时可以 采用条件嵌套的方式,即在If结构内部 某个语句块中再次加入If结构。
If txtPassWord.Text 1234 Then Unload frmPassWord frmSystem.ShowElse MsgBox 密码错误!“ Count Count 1 If Count 3 Then txtPassWord.Enabled False cmdLogin.Enabled False End IfEnd If注意缩进!!! 例5