调用sub或者function的call可以省略
Sub main()
Call outputData(inputData)
End Sub
Public Function inputData() As String
inputData = CStr(InputBox("Please enter the input data"))
End Function
Public Sub outputData(a As String)
MsgBox a & vbLf, vbOKOnly, "OutPutData"
End Sub
这里的main实际上可以写成下面这个样子
Sub main()
Dim info As String
info = inputData
Call outputData (info)
End Sub