输出数据和输入数据
1、VB提供了多种输出数据的方法,以下是主要几种:
A用对象Print方法输出数据 B用标签Label控件输出文本 C用文本框TextBox控件输出文件 D用MsgBox函数输出数据。
2、Print 方法用于在窗体、立即窗体、图片框、打印机等对象上显示文本字符串或表达式的值。Print方法的格式为:
[对象名.]Print [表达式表][,|;](表达式可能有问题)
Print为该语句的关键字,必须写。
[对象名]为可选项,若选择该项,则指定输出的对象,可以为窗体、图片框等对象;若省略该选项,则数据输出在当前窗体对象上。
[表达式表]为可选项,“表达式表”是由写在同一行上的若干表达式组成的,表达式之间用逗号或分号分隔;若不选,语句的执行结果为输出一空行。
[,|;]为可选项,表示数据的输出格式。其中逗号“,”表示以分区格式输出数据,即按打印区输出数据,每隔14列为一个打印区。分号“;”表示以紧凑格式输出数据。两者可以混合使用。
Chr(13):换行符
3、VB提供了多种输入数据的方法,以下是主要几种:
A用文本框TextBox控件输入数据 B用列表框、组合框控件输入数据 C用复选框、单选框控件输入数据的选择 D用InputBox函数输入数据。
4、InputBox函数用“输入对话框”的形式满足输入文本数据的基本需求。语法格式为:
变量名=IntputBox(提示内容,[对话框标题],[默认输入值])
其中“提示内容”为对输入数据的解释或说明。
“[对话框标题]”为可选项,指定输入对话框的标题。
“[默认输入值]”为可选项,指定输入值的默认值。
在程序中是用InputBox函数是,系统将自动显示输入对话框。
例:对给定的任意半径,求圆的周长和面积?
程序代码如下:
Private Sub Command1_Click()
Cls
Const Pi = 3.1415926
Dim strR As String
Dim r As Single
Dim l As Single, s As Single
strR = InputBox("请输入圆的半径", "半径输入对话框")
r = Val(strR)
s = Pi * r ^ 2
l = 2 * Pi * r
Print "圆的半径r=" & strR & Chr(13) & "圆的周长l=" & l & Chr(13) & "圆的面积s=" & s
End Sub