vb第04章VB教学.pptx

第4章 Visual Basic的控制结构4.1 基本语句4.2 顺序结构程序设计4.3 选择结构程序设计4.4 循环结构程序设计4.1 基 本 语 句4.1.1 赋值语句[Let] 变量名 = 表达式[Let] [对象名.]属性名 = 表达式功能:把“表达式”的值赋给某个变量或某个对象的属性。Let关键字通常省略。“对象名”省略时默认为是当前窗体。注意：（1） 赋值号“=” 先计算再赋值。 ? cc=123456（2）赋值号左边必须是变量或对象的属性。（3）变量名或对象属性名的类型应与表达式的类型相容。Dim A As Integer, B As Single, C As Double, S As StringA = 100 类型相同S = 123.45 类型相同A = S 类型相容S = A 类型相容B = 12345.67A = B 高精度变量赋给低精度变量，类型相容C = 123456.789B = C 高精度变量赋给低精度变量，类型相容S = abcA = S 错误，类型不匹配ABC【例】交换两个变量的值。设变量A中存放1，变量B中存放2，交换两个变量的值，使变量A中存放2，变量B中存放1。②A = 1B = 2A =A+ BB =A-B A=A-BA = 1B = 2C = AA = BB = C③①4.1.2 数据输入 把要处理的初始数据从某种外部设备（例如键盘、磁盘文件）读取到内存中（如变量），以便进行处理，这就叫数据输入。 两种常用的数据输入方法：使用InputBox（输入框）函数使用TextBox控件1．用InputBox函数输入数据 InputBox(提示信息[,对话框标题][,默认值])功能：产生一个输入框，用户可以输入数据。单击“确定”按钮，则输入的数据作为InputBox函数的返回值，返回值为字符型；单击“取消”按钮，则InputBox函数的返回值为空串（）。注意：函数无括号起提示作用，无返回值。提示信息换行:回车符Chr(13)、换行符Chr(10)、回车与换行符的组合Chr(13) Chr(10)或系统符号常量vbCrLf，vbNewLine。【例】studNo = InputBox(请输入学号)【例】studNo = InputBox(请输入学号 vbCrLf 学号只能是8位数字, 注意,【例】studNo = InputBox(请输入学号, , 0000)注意：如果要省略InputBox函数的第2个参数而保留第3个参数，则中间的逗号不能省略。2．用TextBox控件输入数据 用文本框输入数据时，也就是将文本框的Text属性的内容赋值给某个变量。文本框中的内容默认为字符型。例1：将文本框Text1中输入的字符串赋给字符串变量Mystr Dim MyStr As String MyStr = Text1.Text例2：将文本框Text1中输入的字符串作为数值赋给整型变量 Dim r As Integer r = Val(Text1.Text)P108 1,2,14.1.3 数据输出数据的输出可以使用：TextBox（文本框）控件Label（标签）控件等MsgBox（消息框）函数Print方法1．用TextBox控件输出数据用文本框输出数据时，也就是将数据赋给文本框的Text属性。 Text1.Text = hello文本框的Text属性是字符串类型，因此如果输出数值型数据，可转换，也可由系统自动转换。 例： X=123 Text1.Text = str(X) Text1.Text =X2．用Label控件输出数据用标签控件输出数据，实际上就是将要输出的数据赋给标签的Caption属性。 例： Label1.Caption = hello标签的Caption属性是字符串类型，因此输出数值型数据，一般需要转换。 例：用标签Label1输出一个数值型数据 X = 125 Label1.Caption = Str(X) Label2.Caption = X 由于标签的Caption属性是字符串类型，只能接收一个字符串类型的值，显示多个数据时，用连接。例：用标签Label1输出两个数。 X = 3 ^ 3 y = 7 ^ 2 Label1.Caption = x= Str(X) _ vbCrLf y= Str(y) 3．用MsgBox函数输出数据格式：MsgBox(提示信息[,按钮类型][,对话框标题])功能：打开一个消息对话框（消息框），通过参数可以指定对话框中显示的文字、图标、按钮类型和对话框的标题。（1）提示信息：字符串表达式，用于指定显示在对话框中的信息。 （2）提示信息换行，使用回车符Chr(13)、换行符Chr(10)、回车与换行