1、第 3章 分支结构程序设计 3.1 关系、逻辑运算符及其表达式3.2 If 语句3.3 Select Case 语句3.1 关系、逻辑运算符与表达式 要实现分支结构,一般先需要判断给要实现分支结构,一般先需要判断给定的条件,然后再根据判断的结果进行相应定的条件,然后再根据判断的结果进行相应的处理。在判断条件时,最常用的运算符是的处理。在判断条件时,最常用的运算符是关系运算符和逻辑运算符。关系运算符和逻辑运算符。 【 例 3.1】 在窗体上添加两个命令按钮 。单击单击编写代码 :数值型关系表达式实例 Private Sub cmdNum_Click()ClsPrint “ 关系运算实例关系运算实
2、例 “PrintPrint “ 54“, 5 4Print “ (10-8)1“, True 1=0“, 3 1 = 0End Sub字符型关系表达式 实例Private Sub cmdChar_Click()ClsPrint “ 关系运算实例关系运算实例 “PrintPrint “ abc=abc“, “abc“ = “abc“Print “ adeabcf“, “ade“ “abcf“Print “ abcdab“, “abcd“ “ab“End Sub说明:q关系运算是对运算符左右两边的表达式进行比较关系运算是对运算符左右两边的表达式进行比较,而且比较的结果只能为,而且比较的结果只能为
3、“ 真真 ” 或或 “ 假假 ” ;q对于数值型数据按其数值大小比较,在对于数值型数据按其数值大小比较,在 VB中中 True对应的数值为 -1, False对应的数值为 0;q对于字符型数据从字符串的第一个字符开始,逐对于字符型数据从字符串的第一个字符开始,逐个按其个按其 ASCII码值进行比较。码值进行比较。【 例 3.2】 在窗体上添加 3个命令按钮。单击单击单击程序代码:逻辑与运算 Private Sub cmdAnd_Click()Cls Print Tab(12); “逻辑运算实例 “PrintPrint “31 And 1=0“; Spc(8); 3 1 And 1 = 0Pri
4、nt “True 1 And FalseEnd Sub逻辑或运算 Private Sub cmdOr_Click()ClsPrint Tab(12); “逻辑运算实例 “PrintPrint “abCAC“; Spc(4); “abc“ “AC“Print “ 35 Or False=0“; Spc(6); 3 5 Or False = 0End Sub逻辑非运算 Private Sub cmdNot_Click()ClsPrint Tab(12); “逻辑运算实例 “PrintPrint “Not(False=0)“; Spc(7); Not (False = 0)Print “Not(35)“; Spc(11); Not (3 5)End Sub