输入与输出

462 阅读3分钟

一、数据输入

1.InputBox函数

InputBox(提示信息[,标题][,默认值][,x,y])

显示一个能接受用户输入的对话框,对输入数据给予提示信息并输入数据。返回用户输入的数据。当文本框中未输入值时,“默认值”为空。InputBox函数返回值为字符串,所以,此函数常和Val联合使用。x,y为InputBox框左上角距离屏幕的距离。

具体位置 image.png

小练习

模仿上述代码,写一个输入对话框。

二、数据输出

1.MsgBox函数

MsgBox(提示信息[,按钮][,标题])

(1)按钮设置值及意义

一共有四组,即为4项之和“按钮数目值”+“图标类型值”+“默认按钮值”+“模式值”。一种是直接用4个取值相加,另一种是用4个内部常量相加。

按钮数目

内部常量取值描述
vbOkOnly0只显示确定按钮(默认)
vbOkCancel1显示确定与取消按钮
vbAbortRetryIgnore2显示终止、重试与忽略按钮
vbYesNoCancel3显示是、否与取消按钮
vbYesNo4显示是与否按钮
vbRetryCancel5显示重试与取消按钮

图标类型

内部常量取值描述
vbCritical16显示关键信息图标(红色Stop标志)
vbQuestion32显示询问信息图标(?)
vbExclamation48显示警告信息图标(!)
vbInfomation64显示普通信息图标(i)

缺省按钮

内部常量取值描述
vbDefaultButton10第一个默认按钮
vbDefaultButton2256第一个默认按钮
vbDefaultButton3512第一个默认按钮

模式

内部常量取值描述
vbApplicationModel0应用模式
vbSystemModel4096系统模式

(2)函数返回值

响应按钮内部常量返回值
确定VbOk1
取消VbCancel2
终止VbAbort3
重试VbRetry4
忽略VbIgnore5
VbYes6
VbNo7

(3)小练习

写一个MsgBox函数语句。有二个按钮,分别是【是】、【否】,图标类型为显示信息图片(?)。

2.Print方法

[object].Print[{Spc(n)|Tab(n)} expression][,|;]

  1. Object 为输出的目标,可以是立即窗口、指定窗口等。如果是立即窗口,用“Debug”,如果是窗体或图片框,则是窗体或图片框的名称。该项目省略则将结果输出在当前窗体。

  2. Spc(n) 表示输出空格,n为空格。

  3. Tab(n) 表示输出到指定列上,n为列号。

  4. 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方法了”。