文件名称:InputBox函数-mathematical statistics with applications
文件大小:13.45MB
文件格式:PDF
更新时间:2024-06-22 07:59:52
excel,VBA
5.2 InputBox函数 当只需做出“是”、“否”、“确定”、“取消”等简单的回答时, M s g B o x函数非常好用。 但是,如果需要其他类型的输入,例如数字和文本时,就需要使用 I n p u t B o x函数。 I n p u t B o x函数显示一个对话框,并且提供便于用户输入的文本说明。 I n p u t B o x函数的语法 如下: I n p u t B o x (p r o m p t[ ,t i t l e] [ ,d e f a u l t] [ ,x p o s] [ ,y p o s] [ ,h e l p f i l e , c o n t e x t] ) I n p u t B o x函数必须具有的参数是 p r o m p t。和M s g B o x函数的p r o m p t参数一样,p r o m p t参数 的值是将显示在对话框中的字符串。 可选参数 t i t l e是显示在对话框标题栏中的字符串表达式。和在 M s g B o x函数中一样,如果 没有给t i t l e参数设定数值,标题栏将显示“ Microsoft Excel”。 为了节省用户的时间,你也许希望给可选参数 d e f a u l t设定数值。这个参数的值可设为一 个字符串表达式,当用户没有输入任何数据时,其值将显示在文本框中作为默认响应。如果 省略了这个参数,文本框将显示为空白。如果要求用户输入邮政编码,而且大部分顾客的邮 政编码都相同,那么应当提供一个邮政编码作为默认输入。 x p o s和y p o s也是可选参数,这两个参数决定输入框在屏幕上的显示位置。 h e l p f i l e和c o n t e x t这两个可选参数只有在为应用程序创建了帮助文件时才有用。 I n p u t B o x函数的返回值是用户在对话框上的文本框中输入的信息。要练习使用 I n p u t B o x函 数,请完成如下步骤: 1)在当前模块中插入新的名为 I B E x e r c i s e的过程。 2)为新的过程输入如下代码: Dim iResult As Integer iResult = InputBox("Please enter your favorite number: ") MsgBox iResult A c t i v e C e l l . Value = iResult 这些代码提示用户输入一个数字,接着在一个消息框中显示这个数字,同时它也将这个 数字显示在工作表上活动的单元格中。 3)将插入点指向该过程,按下 F 5键运行这个过程,显示出来的输入框如图 5 - 3所示。 4)输入一个数字并按回车键,显示出包含刚才输入数字的消息框。 5)单击“确定”按钮,退出消息框。 6)返回工作簿,应当在工作簿活动的单元格中看到输入的数字。 第5学时 用 户 输 入使用45