VBA在Excel中的应用(10)

VBA

第3部分 与Excel进行交互

在Excel中, 系统提供了各式各样的对话框与用户进行交互; 在使用VBA编写程序时, 为了提高代码的灵活性和程序的友好度, 也经常需要实现用户与Excel的交互功能. 本章将介绍如何使用InputBox和MsgBox实现输入和输出信息, 以及如何调出Excel的内置对话框.

3.1 使用MsgBox输出信息

MsgBox函数通常应用于如下几种情况:

输出代码最终运行结果. 产生一个消息框用于提醒用户.

在代码运行过程中显示某个变量的值, 用于调试代码.

MsgBox函数的语法格式如下:

MsgBox(prompt [,buttons] [, title] [,helpfile, context])

prompt参数用于设置消息框的提示文本信息, 最大长度为1023个字符. 显然那么多的字符无法显示在同一行, 如果代码中没有使用强制换行, 系统将按照每行102个字符进行自动换行处理, 多数情况下这并不符合用户的使用习惯.

在文本信息中使用vbCrLf或vbNewLine常量可以进行强制换行. 例1. 显示多行文本信息

步骤1打开一个新的工作簿文件, 按<Alt+F11>组合键切换到VBE窗口 步骤2

在工程窗口中插入”模块”, 修改其名称为”MsgBoxDemo”. 步骤3在模块MsgBoxDemo中写入如下代码. Sub MultiLineDemo() '定义变量

Dim MsgStr As String '生成提示信息

MsgStr = "欢迎加入Excel Home论坛！" & vbCrLf

MsgStr = MsgStr & "Excel Home是微软技术社区联盟成员" & vbCrLf MsgStr = MsgStr & "Let's do it better!" '显示消息框

MsgBox MsgStr, , "欢迎"

End Sub

步骤4 返回Excel界面, 运行宏MultiLineDemo, 将显示如图3.1.1所示的消息框.

图3.1.1显示多行文本信息

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