1、啟動vb後進入主介面新建一個exe檔案。

2、雙擊控制元件，在視窗介面建立一個物件。

3、進入程式碼編寫區選擇物件conmmand1過程為click。

4、輸入程式碼：Dim a As Integera = InputBox 請輸入一個數， 提示，5。

6、調整完成儲存工程即可完成操作。

1、先來看看inputbox的函式原型：

Sting inputbox(提示文字,[對話方塊標題],[輸入框文字],[視窗所在x軸],[視窗所在y軸],[幫助檔案],[幫助圖示主題])

[]內為可選引數

可見常用的引數只有3個，分別是提示文字、標題、輸入框文字。

當我們可選引數為空時，即input("")，如下，會繼承父視窗的標題。

2、我們可以把它理解為：inputbox(提示文字,標題,輸入框文字)

更方便記憶。

如果inputbox中有可選引數，這時必須要一個變數來獲得inputbox函式的返回值。雖然這點很奇怪，但是確實如此。

比如，程式碼如下：

inputbox("您今年幾歲了？","輸入年齡","18")

3、編譯器卻提示我們缺少=號。

4、因為這時需要變數來接收inputbox的返回值。

此時把程式碼改為：

Dim tmp As String

tmp = inputbox("您今年幾歲了？","輸入年齡","18")

5、這時才能成功執行。

這點很重要，如果inputbox只有一個必選引數時，無需變數來接收返回值。當標題和輸入框內的引數存在時，就必須要有一個變數來接收其返回值。

6、關於返回值。

我們可以這樣測試：

msgbox( inputbox("請輸入一個數據","請輸入","Hi"))

（即msgbox打印出inputbox的返回值）

結果是msgbox列印一個空字串。