InputBox函數(shù)的使用方法

1、啟動Excel并打開Visual Basic編輯器，在工程資源管理器中鼠標右擊，選擇關(guān)聯(lián)菜單中的“插入”|“模塊”命令插入一個模塊。在該模塊的“代碼”窗口中輸入程序代碼，如圖1所示。具體的程序代碼如下所示：

Sub ConRound()

Const Pi=3.1415926 '定義常量Pi

Dim r As Double

Dim a As Double

r=InputBox("請輸入圓的半徑") '獲取圓半徑

a=Pi*r*r '計算圓周長

MsgBox("圓的面積為："&a) '顯示圓周長

End Sub

圖1　在“代碼”窗口中輸入代碼

2、按F5鍵運行程序?qū)⑹紫全@得輸入對話框要求輸入圓的半徑，如圖2所示。輸入半徑值后單擊“確定”按鈕，計算結(jié)果將在提示對話框中顯示，如圖3所示。

圖2　在對話框中輸入圓的半徑

圖3　獲得計算結(jié)果

提示

InputBox函數(shù)的語法結(jié)構(gòu)如下。

返回值=InputBox(Prompt,[title][,default][,xpos,ypos][,helpfile,context])

InputBox函數(shù)的返回值為文本框內(nèi)容的字符串，無論用戶在對話框中輸入的是數(shù)字還是字符，其返回值始終都是字符型。當用戶單擊“確定”按鈕時，將返回文本框中的內(nèi)容;單擊“取消”按鈕，將返回一個零長度字符串。該函數(shù)的調(diào)用格式中，參數(shù)數(shù)量較多，其中Prompt、Title和Default參數(shù)較為常用。Prompt參數(shù)用于指定顯示在輸入對話框中的提示信息，最大長度為1024個字符;Title參數(shù)用于指定輸入對話框的標題信息;Default參數(shù)用于指定文本框中默認的顯示內(nèi)容。