编辑: 静看花开花落 | 2019-07-02 |
第四章 控制结构 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 bb=21 b?true5)变量为字符型,表达式为非字符型时,表达式的结果自动转换为字符型后赋值给变量 Dim s as Strings=123 s?
123 使用赋值语句时应注意: 以下的赋值语句均是错误的:5=x+y 常量在左边x+y=5 表达式在左边Sin(x)=x+y不能在一句赋值语句中为多个变量赋值: 正确x=1y=1z=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人机交互函数和过程 应用模式系统模式
04096 VBApplicationModelVBSystemModel 模式 第1个按钮为默认第2个按钮为默认第3个按钮为默认