vb数据的输入输出及赋值.docx

vb数据的输入输出及赋值数据的赋值及输入输出 一、赋值语句 格式 左边=右边 功能 将右边的值赋给左边 说明 1“=”此时为赋值号，左右不可交换 2左边是变量名或控件的属性名 3右边可以是常量、变量或表达式等 注意 1 最好让左右两侧数据类型一致 2 当左右数据类型不一致时，当两类型“相容”时，系统自动将右侧的数据类型转换成左侧数据类型后，赋给左边 3 当左右数据类型不一致时，且两类型“不相容”时，可以用系统函数等进行人为转换。 二、输入语句 功能从键盘获取数据给相应变量。 用InputBox函数和赋值语句合成完成输入 格式 变量名=InputBox(“提示信息”,) 说明 InputBox有7个参数，只有第一个不能省。 说明 1由InputBox函数输入的内容默认为字符型，输入时不需要加双引号。 2当输入的内容是数字字符串时，系统可以自动转换成数值后赋给左侧数值型变量。 3系统会将非0数值当成True来用，将0当成False来用。但是，当True参加算术运算时当-1用；False当0用。 三、用文本框完成输入/输出 由TextBox文本框控件与赋值语句合成 格式 变量名=文本框控件Name值.Text 说明 1由此句输入的内容默认为字符型，输入时不需要加双引号。 2可将此句最右侧的“.Text”省略 3此句还可以用来输出程序运行结果 使用格式： 文本框Name值.Text=输出表达式 注意 当用于输出时，若在同一个文本框中多行输出时，首先要将其属性MultiLine设为True，然后再使用字符串连接符&连接上vbCrLf系统常量或 Chr(13) & Chr(10) 举例 例1输入质量求重量。 Option Explicit Private Sub Command1_Click Const g As Single = 9.8 Dim GG!, m! m = InputBox("请输入质量:kg") GG = m * g Print "重量是:" GG; "牛顿" End Sub Option Explicit Private Sub Command1_Click Const g! = 9.8 Dim GG!, m! m = Text1.Text GG = m * g Text2.Text = GG End Sub 例2. 输出一个由*构成的等腰三角形。 Private Sub Command1_Click Print " *" Print " *" Print " *" Print "*" End Sub Private Sub Command1_Click Text1 = " *" & vbCrLf & " *" & vbCrLf & "*" End Sub 四、输出语句 用Print 方法实现输出 格式 Print 若干输出对象 说明 1此句功能是将“输出对象”输出到窗体等对象上 2当输出对象为多个时，用逗号或分号作分隔符 3逗号隔得开一些，分号靠的紧些 4仅有Print没有输出对象时，表示输出一个空行 5若前一个Print语句最后以分号或逗号结束时，下一个Print语句的内容接着在同一行输出。 注意 Print的完整使用格式： 控件的Name属性值.Print 输出对象 功能将结果输出到控件上，省略左侧“控件的Name属性值.”时默认输出到当前窗体上。