一、数据输入
1.InputBox函数
InputBox(提示信息[,标题][,默认值][,x,y])
显示一个能接受用户输入的对话框,对输入数据给予提示信息并输入数据。返回用户输入的数据。当文本框中未输入值时,“默认值”为空。InputBox函数返回值为字符串,所以,此函数常和Val联合使用。x,y为InputBox框左上角距离屏幕的距离。
具体位置
小练习
模仿上述代码,写一个输入对话框。
二、数据输出
1.MsgBox函数
MsgBox(提示信息[,按钮][,标题])
(1)按钮设置值及意义
一共有四组,即为4项之和“按钮数目值”+“图标类型值”+“默认按钮值”+“模式值”。一种是直接用4个取值相加,另一种是用4个内部常量相加。
按钮数目
| 内部常量 | 取值 | 描述 |
|---|---|---|
| vbOkOnly | 0 | 只显示确定按钮(默认) |
| vbOkCancel | 1 | 显示确定与取消按钮 |
| vbAbortRetryIgnore | 2 | 显示终止、重试与忽略按钮 |
| vbYesNoCancel | 3 | 显示是、否与取消按钮 |
| vbYesNo | 4 | 显示是与否按钮 |
| vbRetryCancel | 5 | 显示重试与取消按钮 |
图标类型
| 内部常量 | 取值 | 描述 |
|---|---|---|
| vbCritical | 16 | 显示关键信息图标(红色Stop标志) |
| vbQuestion | 32 | 显示询问信息图标(?) |
| vbExclamation | 48 | 显示警告信息图标(!) |
| vbInfomation | 64 | 显示普通信息图标(i) |
缺省按钮
| 内部常量 | 取值 | 描述 |
|---|---|---|
| vbDefaultButton1 | 0 | 第一个默认按钮 |
| vbDefaultButton2 | 256 | 第一个默认按钮 |
| vbDefaultButton3 | 512 | 第一个默认按钮 |
模式
| 内部常量 | 取值 | 描述 |
|---|---|---|
| vbApplicationModel | 0 | 应用模式 |
| vbSystemModel | 4096 | 系统模式 |
(2)函数返回值
| 响应按钮 | 内部常量 | 返回值 |
|---|---|---|
| 确定 | VbOk | 1 |
| 取消 | VbCancel | 2 |
| 终止 | VbAbort | 3 |
| 重试 | VbRetry | 4 |
| 忽略 | VbIgnore | 5 |
| 是 | VbYes | 6 |
| 否 | VbNo | 7 |
(3)小练习
写一个MsgBox函数语句。有二个按钮,分别是【是】、【否】,图标类型为显示信息图片(?)。
2.Print方法
[object].Print[{Spc(n)|Tab(n)} expression][,|;]
-
Object 为输出的目标,可以是立即窗口、指定窗口等。如果是立即窗口,用“Debug”,如果是窗体或图片框,则是窗体或图片框的名称。该项目省略则将结果输出在当前窗体。
-
Spc(n) 表示输出空格,n为空格。
-
Tab(n) 表示输出到指定列上,n为列号。
-
expression 为输出的字符表达式或数值表达式,个表达式之间的分隔用“;”或“,”。当采用“,”分隔时,前后的输出到两个标准分区,每个分区的长度为14个字符宽度;如果采用“;”分隔时,前后两个输出项将紧凑输出。 默认情况下,每执行一个Print方法都会换行。为了能在同一行上输出下一个Print方法的内容,可以在末尾加上“,”或“;”,其含义同上。
小练习 增加一个按钮,点击按钮把执行一下代码
Print "000000000100000000020000000003"
Print Spc(12); "Welcome to VB"
Print Tab(12); "Welcome to VB"
思考
1.写一个InputBox函数的语句。标题为“我是一个输入框”,提示语为“请输入1到100的数字”。
2.写一个MsgBox函数语句。有三个按钮,分别是【是】、【否】、【取消】,图标类型为警告信息图标(!)。
3.写一个Print函数语句。在立即窗口里显示“我会利用Print方法了”。