8.2.5 输入框与输出框
程序中有时需要接收用户输入的数据进行计算，计算后又需要将结果输出，在VBA中处理数据的输入利用输入框，结果的输出利用输出框。
（1）输入框
输入框就是利用系统提供的输入函数InputBox（）实现的，运行函数，弹出一个对话框，显示提示信息，等待用户输入数据，按下“确定”按钮，返回输入的数据信息。
输入框由提示信息，标题、默认值、位置坐标等组成。
输入函数的格式如下：
InputBox（Prompt［，Title］［，Default］［，Xpos］［，Ypos］）
参数说明，如表8-3所示。
表8-3 Inputbox参数表
通过输入框，输入学生姓名，程序如下：
Public Sub message（）
Dim name As String
name=InputBox（"请输入学生姓名："，"输入框"，""）
End Sub
运行代码后，弹出输入框，如图8-4所示，当输入姓名后，单击“确定”按钮，返回输入值赋值给name变量。
（2）输出框
输出框就是利用MsgBox（）输出函数或MsgBox输出过程实现的，运行输出函数／过程，弹出输出框，输出信息。
输出框由标题栏信息、提示信息和一个或多个命令按钮3部分组成，图标的形式及命令按钮的个数可以由用户设置。
输出函数的格式如下：
图8-4 输入框
MsgBox（Prompt［，Buttons］［，Title］）
参数说明如表8-4所示、buttons参数如表8-5所示。
表8-4 MsgBox参数说明
表8-5 buttons参数值
输出框如果不加括号，输出过程，不返回任何值。如果加括号，为输出函数，单击输出框中不同按钮，返回不同的值，输出函数的返回值，如表8-6所示。
表8-6 输出函数的返回值
通过输出框，输出学生信息，程序如下：
Public Sub message（）
Dim student As String
student="姓名："&"王洁茹"&vbCrLf &"性别："＿
&"女"&vbCrLf &"出生日期："&＃9／23／1992＃
MsgBox student，vbOKCancel+vbInformation，"学生信息"
End Sub
运行代码后，弹出输出框，如图8-5所示。
图8-5 输出框