第四章VisualBasic的基本语句概论.ppt

* 第4章 Visual Basic的基本语句 4-1.1 赋值语句 格式：[Let] 变量名=表达式 对变量进行赋值 表达式为：算术表达式、字符串表 达式、关系表达式、逻 辑表达式。 首先计算赋值号“=”右面表达式的值，然后将结果保存到赋值号“=”左面的变量中。 例：Dim x As Integer, y As Integer Dim z As Integer x=3 y=4 z=x+y Print z 4-1.2 不同数据类型数据的赋值 在赋值语句中，我们要求赋值号“=”两边的数据类型应一致。 要求： 如果赋值号“=”两边的数据类型不一致，则系统会视具体情况做如下处理： 注意： 1、变量名=表达式 字符型 数值类型 先计算表达式的值，再将数值类型的结果转换成字符串赋值给字符型变量。 例： Private Sub Command1_Click() Dim x As String x = 1 + 6 Print x End Sub 结果：7 2、变量名=表达式 字符型 数值类型 ? 如果表达式的值为数字字符，则将数字转换成数值，结果赋值给数值型变量。 例： Private Sub Command1_Click() Dim x As Integer x = 12 + 34 Print x End Sub 结果：1234 ? 如果表达式的值为字符，则字符不能赋值给数值型变量，系统提示出错。 Private Sub Command1_Click() Dim x As Integer x = ABC Print x End Sub 3、变量名=表达式 数值类型 逻辑型 ? 当转换其他的数值类型为 Boolean 值时，0 会转成 False，而其他的数值则变成 True。 例： Private Sub Command1_Click() Dim x As Boolean x = 1 + 6 Print x End Sub 结果：True 4、变量名=表达式 数值类型 逻辑型 ? 当转换 Boolean 值为其他的数据类型时，False 成为 0，而 True 成为 -1。 例： Private Sub Command1_Click() Dim x As Single x = a b Print x End Sub 结果：0 5、变量名=表达式 字符类型 逻辑型 ? 当把逻辑值“True”赋值给一个字符型变量时，变量的值为“True”;把逻辑值“False”赋值给一个字符型变量时，变量的值为 “False”。 例： Private Sub Command1_Click() Dim y As String y = 1 6 Print y End Sub 结果：False 例： 在程序中将变量Inta、Bl、St、D分别定义为Interger类型、Boolean类型、String类型和Date类型，下列赋值语句中，正确的是 A. Inta = “333” + “ 22” B. D = #10/05/01# C. St = 5 + ”abc” D. Bl = #True# B 4-2 条件语句 一、If 语句(条件语句) 格式1：If e Then 语句1 [Else 语句2] 根据表达式的值有条件地执行不同的语句 解释：当e为True时，执行语句1； 为False时，执行语句2。 e ---- 为判决条件，它可以是逻辑变量、关系表达式或逻辑表达式。 注意：此格式中的语句必须在一行内书写。 例：从键盘上输入三个数，找出最大的数 窗体模块的对象为： 窗体模块的代码为： Option Explicit Private Sub Command1_Click() Dim x As Single, y As Single Dim z As Single Dim max As Single x = Val(Text1.Text) y = Val(Text2.Text) z = Val(Text3.Text) If x y Then max = x Else max = y If z max Then max = z Text4.Text = max End Sub 注意：以上在文本框中必须输入数字,否则无意义 格式2：If e Then 语句块1 [Else 语句块2] End If 解释：当e为True时，执行 语句块1；为False 时，