Вопрос : Сообщения утверждения

В настоящее время, я имею мое утверждение setup настолько после этого оно concatinates шнур и после этого даю сообщение всех полей которые не заполнены внутри сразу на случае BeforeUpdate.  Здесь Кодий:

затемняет valMessage как valInvolvement String
тусклое как valFirstName String
тусклое как valLastName String
тусклое как valMessage String

=

"" если valMessage IsNull (Me.txtInvolvement.Value) Then
= valMessage & «запутанность, «конец If


если valMessage IsNull (Me.txtFirstName.Value) Then
= valMessage & «имя, «конец If


если valMessage IsNull (Me.txtLastName.Value) Then
= valMessage & «фамилия, «конец If

, то
если Len (valMessage) > 0 valMessage Then
MsgBox & «необходимо заполнить вне, то прежде чем персона сможет быть сохранено. «сообщение ошибки If

The конца Sub
Cancel
= выхода True
посмотрит как это:

Involvement, имя, фамилию, необходимо заполнить вне прежде чем персона сможет быть saved.
But я хотел был бы сообщение для того чтобы посмотреть как это: поля

These необходимо заполнить вне прежде чем персону можно сохранить:

Involvement
First Name
Last Name

Where оно перечисляет все поля на их собственной линии.  Любая консультация на как сделать это? class=

Ответ : Сообщения утверждения

Используйте vbCRLF о положите возвращение carraige и линию питание между этими.

       Затемните valMessage как шнур
        Затемните valInvolvement как шнур
        Затемните valFirstName как шнур
        Затемните valLastName как шнур

        valMessage = ""

        Если IsNull (Me.txtInvolvement.Value) после этого
            valMessage = valMessage & «запутанность» & crlf
        Закончитесь если

        Если IsNull (Me.txtFirstName.Value) после этого
            valMessage = valMessage & «имя» & crlf
        Закончитесь если

        Если IsNull (Me.txtLastName.Value) после этого
            valMessage = valMessage & «фамилия» & crlf
        Закончитесь если

        Если Len (valMessage) > 0 после этого
            MsgBox «эти поля необходимо заполнить вне прежде чем персону можно сохранить: » & crlf & crlf & valMessage
            Cancel = True
            Выходите подводная лодка
        Закончитесь если