VB语言程序的设计选择结构程序的设计.pptVIP

选择结构程序设计;本章内容;1.关系运算符及关系表达式（简单条件）;关系表达式说明;关系表达式说明;2.逻辑运算符及逻辑表达式（复杂条件）;2.逻辑运算符及逻辑表达式;例：检查变量x是否大于等于3且小于等于7 正确： 3=x And x =7 ( x = 3 And x =7 ) 错误： 3=x=7 或 3=x Or x=7 ;a 小数;表达式的组成及种类;运算符的优先级;例：判断某一年是否是闰年，条件是：能被4整除，但不能被100整除；或者能被400整除。 y Mod 4=0 ;条件语句;正例: If cj 60 Then Print “成绩不及格” 正例: If cj 60 Then Print “成绩不及格” End If 错例：If cj 60 Then Print “成绩不及格” End If;正例: If cj = 60 Then n=n+1 : Print “成绩及格” 正例: If cj = 60 Then n=n+1 Print “成绩及格” End If;两个数的交换;格式1：If 条件 Then 语句1 Else 语句2 格式2：If 条件 Then 语句1 Else 语句2 End if 功能：如果“条件”成立(其值为True)或为非0值，则执行“语句1”；否则，执行“语句2” 。;双分支结构; (1)创建应用程序的用户界面和设置对象属性 (2)编写程序代码 功能要求：用户在“a=”文本框(Text1)、“b=”文本框(Text2)和“c=”文本框(Text3)中输入数据，单击“判断”按钮后，则在“最大数＝”文本框(Text4)中输出结果 ; Private Sub Command1_Click() Dim a As Integer, b As Integer Dim c As Integer, m As Integer a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) If a b Then m = a Else m = b End If If c m Then m = c Text4.Text = m End Sub;IIf 函数; Then和Else后面的语句块包含另一个条件语句 1.一般格式 If 条件1 Then If 条件2 Then … End If Else … End If 使用条件语句嵌套时，???定要注意If与Else，If与End If的配对关系。;例;Private Sub Form_Load() Dim h As Integer Show 使print输出在窗体上的内容可见 h = Hour(Time()) 取系统的时间 FontSize = 30 : ForeColor = RGB(255, 0, 0) BackColor = RGB(255, 255, 0) If h 12 Then Print 早上好！