Написание процедуры SubWriting a Sub procedure

Процедура Sub — это последовательность операторов Visual Basic, заключенных между операторами Sub и End Sub , которые выполняют действия, но не возвращают значение.A Sub procedure is a series of Visual Basic statements enclosed by the Sub and End Sub statements that performs actions but doesn't return a value. Процедура Sub может принимать аргументы, такие как константы, переменные или выражения, которые передаются вызывающей процедурой.A Sub procedure can take arguments, such as constants, variables, or expressions that are passed by a calling procedure. Если у процедуры Sub нет аргументов, оператор Sub должен включать пустой набор скобок.If a Sub procedure has no arguments, the Sub statement must include an empty set of parentheses.

Следующая процедура Sub содержит комментарии, объясняющие каждую строку.The following Sub procedure has comments explaining each line.

' Declares a procedure named GetInfo 
' This Sub procedure takes no arguments 
Sub GetInfo() 
' Declares a string variable named answer 
Dim answer As String 
' Assigns the return value of the InputBox function to answer 
answer = InputBox(Prompt:="What is your name?") 
 ' Conditional If...Then...Else statement 
 If answer = Empty Then 
 ' Calls the MsgBox function 
 MsgBox Prompt:="You did not enter a name." 
 Else 
 ' MsgBox function concatenated with the variable answer 
 MsgBox Prompt:="Your name is " & answer 
 ' Ends the If...Then...Else statement 
 End If 
' Ends the Sub procedure 
End Sub

См. такжеSee also

Поддержка и обратная связьSupport and feedback

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.