Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Executing a Function Procedure from a Subroutine

Sub EnterText()     Dim strFirst As String, strLast As String, strFull As String     strFirst = InputBox("Enter your first name:")     strLast = InputBox("Enter your last name:")     strFull = JoinText(strFirst, strLast)          MsgBox strFull End Sub Function JoinText(k, o)     JoinText = k + " " + o End Function