Excel VBA系列之MsgBox与InputBox介绍

1. 打开Visual Basic，添加新模块和过程，称之为“test”。

Sub test()

End Sub

2. MsgBox是用于弹出一个信息框，其参数如图所示。

3. 如图在test过程中输入MsgBox “Hello World!”，然后执行后在Excel中就会出现一个弹窗。

Sub test()

MsgBox “Hello World!”

End Sub

4. InputBox是用于弹出一个可以输入信息的弹窗，其参数如图所示。

5. 如图在test1过程中输入InputBox “你是几班的？”，然后执行后在Excel会出现一个弹窗需要输入相应的信息。

Sub test1()

InputBox “你是几班的？”

End Sub

6. 将MsgBox与InputBox结合在一起使用，定义变量str为字符串，然后str赋值为InputBox，注意这里InputBox后面的参数需要加括号，否则就会报错，然后再执行MsgBox的信息将变量str用于返回的信息中。

Sub test2()

Dim str As String

str = InputBox(“你是几班的？”)

MsgBox “我是” & str & “班的”

End Sub

7. 执行以上代码后，先弹出一个InputBox的弹窗，如图。

8. 在空白处，我们随意输入，比如“A”。

9. 点击上面弹窗的“确定”后，会返回MsgBox的信息。

以上示例仅用于演示。