Question

我有一个关于消息框，当用户按下按钮时，一个消息框会打开并在多行上打印有关该软件的信息。为了使它看起来更整洁，我希望删除消息框的“ Microsoft Excel”标题。我要做的是在消息后加上两个逗号，通常这样做，但是只有一行文本，但是我不断收到带有等号或无效语法错误的表达式错误。有人可以帮忙吗？

这是我当前的代码：）

    Private Sub about_button_Click()
    MsgBox ("Name: gemUI" & vbCrLf & "Version: 1.0" & vbCrLf & "Build: 0001" & _
    vbCrLf & "(C) 2018 Josh Face", , "About gemUI")
    End Sub

如果有人可以提供帮助，将不胜感激:) 晚上好：）

乔什

Answer 1

您的括号太多。醚会删除参数周围的外部括号，或使用Call关键字。

Private Sub about_button_Click()
    MsgBox "Name: gemUI" & vbCrLf & "Version: 1.0" & vbCrLf & "Build: 0001" & _
        vbCrLf & "(C) 2018 Josh Face", , "About gemUI"
End Sub

或

Private Sub about_button_Click()
    Call MsgBox( "Name: gemUI" & vbCrLf & "Version: 1.0" & vbCrLf & "Build: 0001" & _
        vbCrLf & "(C) 2018 Josh Face", , "About gemUI")
End Sub

在VBA中，您可以使用以下任一方法调用子例程

MySub arg1, arg2, arg3

或

Call MySub(arg1, arg2, arg3)

撰写时

MySub (arg1, arg2, arg3)

它试图将多个参数组合为一件事，但失败了。

Answer 2

只是添加一种（也许）不太笨拙的方式：

MsgBox Join(Array("Name: gemUI", "Version: 1.0", "Build: 0001", "(C) 2018 Josh Face"), vbCrLf), , "About gemUI"

用几行将标题添加到消息框中

2 个答案: