VBA在Excel中的应用(11)

VBA

buttons参数用于指定消息框显示按钮的数目及形式、图标样式和缺省按钮等. 组合使用参数值可以显示多种不同风格的消息框; 省略buttons参数时, 消息框只显示一个确定按钮, 如图3.1.1所示.

3.2 如何利用InputBox输入

程序中往往需要用户输入很多内容, 例如数字、日期或文本等, 这就需要使用InputBox获取用户的输入. 使用VBA提供的InputBox函数可以实现用户输入, 其语法格式为:

InputBox (prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])

输入框中必须显示相关的提示信息, 即prompt参数, 否则用户无法知道需要输入什么样的内容. 设置输入框的标题, 即title参数, 使得输入框更接近Excel的内置对话框风格; 如果省略该参数, 则输入框的标题为”Microsoft Excel”.

者的用法基本相同. 区别在于Inputbox方法可以指定返回值的数据类型. 其语法格式为: InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextId, Type) 例2. 利用InputBox方法输入员工号信息

步骤1 打开一个新的工作簿文件, 按<Alt+F11>组合键切换到VBE窗口. 步骤2 在工程窗口插入”模块”, 修改其名称为”InputBoxDemo”. 步骤3 在模块InputBoxDemo中写入如下代码. Sub ExcelInputBoxDemo() '定义变量

Dim newID As Integer Do

'提示用户输入员工号

newID = Application.InputBox("请输入员工号（四位数字）：", "员工信息管理系统", Type:=1) '如果输入的是四位员工号就退出循环 Loop Until Len(CStr(newID)) = 4 '显示信息框

MsgBox "您输入的员工号为 " & newID, vbInformation, "提示信息"

End Sub

步骤4 返回Excel界面, 运行宏ExcelInputBoxDemo, 将显示如图3.2.1所示的输入框; 如果输入”abcd”后单击”确定”, 将显示如图3.2.2所示的消息框. 由此可以看出, 使用InputBox方法, 系统将根据Type参数判断输入的数据类型是否符合要求.

图3.2.1员工号输入框

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库VBA在Excel中的应用(11)在线全文阅读。