第四章 控制結构.pptVIP

第四章 控制结构 4.1顺序控制结构 顺序结构就是各语句按出现的先后次序执行。一般的程序设计语言中，顺序结构的语句主要是赋值语句、输入/输出语句等。在VB中也有赋值语句，而输入/输出可以通过文本框、print方法等实现，也可以通过系统提供的函数和过程来实现。 4.1.1赋值语句 赋值语句的一般形式如下： 变量名=表达式 对象.属性=表达式 程序执行时，先计算右边表达式的值，然后将值赋给左边的变量或属性。 ?例如： X=100?????????????????? ??? ‘ 把数值赋给变量X； Text1.Text= VB欢迎你??????? ‘把字符串赋给Text1的Text属性 Label1.Caption = Date（）?? ‘把Date函数的结果赋给Label1的Caption属性 Label1.Top = Label1.Top - 100??‘把表达式的值赋给Label1的Top属性?? 在赋值语句中，赋值运算符“=”代表赋值操作，而不代表等量关系。? 注意：当表达式的类型与变量的类型不一致时，强制转换成左边的精度 变量名=表达式 表达式可以是任何类型的表达式，一般与左边的变量类型一致 例如：Dim i as Integer i=3＋2 如果右边表达式类型与左边变量类型不同，则： 1）表达式均为数值型，但精度不同时，表达式结果自动转换成左边的精度在赋值给变量。如：i%=3.56 ? i=4 2)变量为数值型，表达式为字符串时，若表达式为数字型字符串，则自动转换为数值型在赋值给变量。 x%=“123” ?x=123 x%=“abc” 出错 x!=“” 出错 3)变量为数值型，表达式为逻辑型时，true转换成－1，false转换成0后赋值给变量 x%=true x?-1 4)变量为逻辑型，表达式为数值型时，非0转换成true，0转换成false后赋值给变量 Dim Boolean b b=21 b?true 5)变量为字符型，表达式为非字符型时，表达式的结果自动转换为字符型后赋值给变量 Dim s as String s=123 s?”123” 使用赋值语句时应注意： 以下的赋值语句均是错误的: 5=x+y 常量在左边 x+y=5 表达式在左边 Sin(x)=x+y 不能在一句赋值语句中为多个变量赋值： 正确 x=1 y=1 z=1 错误：x=y=z=1 4.1.2人机交互函数和过程 Vb程序与用户之间的直接交互可以通过InputBox ( )函数、MsgBox ( )函数和Msg过程进行。 1.InputBox（）函数 InputBox（）函数可以产生一个对话框，这个对话框作为输入数据的界面,等待用户输入数据，当用户单击“确定“按钮或回车时，函数返回输入的值，类型为字符型。函数格式如下： 变量$＝InputBox（Prompt[,Title][,Default][,XPos][,YPose]） 例4-1 应用InputBox函数进行患者信息的输入，运行界面如图 程序代码如下： Private Sub Form_Click() Dim cl$, msg1$, msg2$, msg3$, msg$, I$ cl = Chr(13) + Chr(10) ‘回车、换行 msg1 = 请输入患者姓名 msg2 = 输入后单击确定按钮 msg3 = 或按回车键 msg = msg1 + cl + msg2 + cl + msg3 I = InputBox (msg, 患者信息输入框, 张三, 400, 400) End Sub 注意　 各项参数次序必须一一对应，Prompt项不可省略， 其他项可以省略，但处于中间的默认参数要用逗号占位符跳过 该函数返回的值为字符型，如果需要输入数值并参加运算时，在运算前运用Val(c)函数将其类型转换为数值类型 例：inputBox.vbp 2.MsgBox（）函数和MsgBox过程 MsgBox（）函数可以产生一个消息框，等待用户选择按钮，当用户单击某个按钮时，函数返回按钮的值，类型为整型。函数格式如下： 变量％＝MsgBox （Prompt[,Type] [,Title]） Promp:字符串表达式，用于提示信息 Type：消息框类型 Title：字符串表达式，在标题栏中显示 4.1.2人机交互函数和过程 分组 内部