第5章VB程序设语句.ppt

第5章 VB程序设计语句 5.1 赋值语句 赋值语句是任何程序设计语言中最基本的语句。 格式：［LET］ 变量名=表达式 功能：它的作用是把右边表达式的值赋给左边的变量。 说明： (1)LET表示赋值，通常可以省略。 (2)表达式的类型应与变量的类型一致，即同时为数值型或同时为字符型。当是数值型且有不同精度时，强制转换成左边的精度。 5.1 赋值语句 例如：A%=6.3 ‘A为整型变量 A中的结果为6 在VB中，赋值语句通常是给变量赋值和设置对象属性值。 1.给变量赋值 例如： Dim A As Integer Dim B As String*10 A=100 B=我是中国人 可以将一个表达式的值赋给一个变量，所以下面的赋值语句是合法的： Dim S As Integer Dim P As Single S=600+1000 P=3.14*S+200*500 5.1 赋值语句 2.为对象设置属性值 在程序中可以用赋值语句为对象的属性设置属性值。 格式：对象.属性=属性值 例如：为命令按钮Command1的Caption属性设置值。 Command1.Caption=显示文本 为文本框Text1的FontName及FontSize属性设置值： Text1.FontName=“隶书” Text1.FontSize=32 5.2 条件语句 VB提供了多种形式的条件语句来实现选择结构。对条件进行判断，根据判断结果，选择执行不同的分支。 5.2.1 分支结构 1.单分支结构(If…Then语句)格式： (1) If〈条件〉Then 〈语句块〉 End If (2) If〈条件〉Then〈语句〉 功能： (1)如果〈条件〉为真，执行Then后面的〈语句块〉，如果条件为假，不执行Then后面的语句块，而执行End If后的语句。如图5.1所示。 (2)如果〈条件〉为真，执行Then后面的〈语句〉，如果条件为假，不执行Then后面的〈语句〉。 5.2.1 分支结构 2.双分支结构(If…Then…Else语句)格式： If〈条件〉Then 〈语句块1〉 Else 〈语句块2〉 End If 功能： 如果〈条件〉为真，执行Then后面的〈语句块1〉，如果〈条件〉为假，执行Else后面的〈语句块2〉。 【例5.1】计算分段函数。用双分支结构实现： y=sinx+(x2+1) x≠0 y=cos-x3+3x x=0 If x0 Then y=sin(x)+(x*x+1) Else y=cos(x)-x^3+3*x End If 5.2.1 分支结构 3.IIf函数 IIf函数可用来执行简单的条件判断操作，它是“If…Then…Else”结构的简写版本。 格式：result=IIf(〈条件〉，〈True部分〉，〈False部分〉) 功能：当〈条件〉为真时，IIf函数返回“True部分”，而当〈条件〉为假时，IIf函数返回“False部分”。 说明：result函数的返回值，〈True部分〉、〈False部分〉及结果变量的类型要一致。 IIf函数 例如： If x10 Then r=1 Else r=2 End If 而用IIf函数来代替,可以使程序大大简化。 r=IIf(x10,1,2) 【例5.2】某大学实行按学分收费，如果不超过12学分，应缴纳学费为4000元，如果超过12学分，每超过1学分，加收500元学费。输入学分U，输出学分U和应缴纳的学费T。 【例5.3】设计一个对输入整数求和的程序,输入0时程序结束运行。 5.2.1 分支结构 4.多分支结构(If…Then…ElseIf语句) 格式： If〈条件1〉Then 〈语句块1〉 ElseIf〈条件2〉Then 〈语句块2〉 …… Else 〈语句块n+1〉 End If 功能：这种结构称为多分支结构。先测试〈条件1〉，如果〈条件1〉为真，执行Then后面的〈语句块1〉；如果〈条件1〉为假继续〈条件2〉，如果〈条件2〉为真，执行后面〈语句块2〉；…。如此测试下去。如果所有条件都为假，则执行Else后面的〈语句块n+1〉。 【例5