Добавить заголовок в окно сообщения с несколькими строками - PullRequest
Новая
       23

Добавить заголовок в окно сообщения с несколькими строками

0 голосов
/ 10 декабря 2018

У меня есть окно сообщения о программе, которое, когда пользователь нажимает кнопку, открывает окно сообщения и печатает информацию о программном обеспечении в несколько строк.В попытке сделать его более аккуратным, я хочу удалить заголовок «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

Если кто-то может помочь, это будет очень ценно :) Удачного вечера:)

Джош

Ответы [ 2 ]

0 голосов
/ 10 декабря 2018

просто чтобы добавить (возможно) менее неуклюжий способ: 

MsgBox Join(Array("Name: gemUI", "Version: 1.0", "Build: 0001", "(C) 2018 Josh Face"), vbCrLf), , "About gemUI"
0 голосов
/ 10 декабря 2018

У вас слишком много скобок.Ether уберите внешние скобки, окружающие аргументы, или используйте ключевое слово 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)

, он пытается объединить несколько аргументов в одну вещь, и это не удается.

...