InputBox

　　InputBox是讓用家輪入訊息的對話盒

接收傳回值的變數 = InputBox("問題", "標題", "預設內容", 出現的X軸位置, 出現的X軸位置)

例子：

Private Sub Command1_Click()
    a = InputBox("您叫甚麼名字?", "小小菜問您", "無名氏", 0, 0)
    If a = "" Then
        Print "您沒有名字"
    Else
        Print "您叫" & a
    End If
End Sub