當按下按鈕時，該程序通過 輸入窗口（可使用InputBox函數）輸入一個自然數n，然后使用for……next結構計算從1+2+。。。+n的結果，最后在利用輸出窗口（可使用MsgBox函數）輸出計算結果?！?
2 回答
溫溫醬
TA貢獻1752條經驗 獲得超4個贊
MSGBOX主要功能是“提示”，用戶根據提示，點擊鼠標，程序接收這個用戶的選擇即INTEGER值（例如：VBYES,VBNO等等），程序根據用戶的選擇決定執行什么功能。
而INPUTBOX主要功能是“接收”，接收一個STRING變量，當然可以給INPUTBOX指定一個默認值。
另外，用戶點擊“取消”返回一個空值。 程序對用戶輸入的值進行處理，INPUTBOX返回的結果是程序下一步運行的參數。
切記：二者不可混為一談。
梵蒂岡之花
TA貢獻1900條經驗 獲得超5個贊
下面的代碼
Private Sub CommandButton1_Click()
Dim n As Integer, s As Double, s2 As Double
s = 1
s2 = 0
n = Val(InputBox("請輸入一個整數："))
For i = 1 To n
s = s * i
s2 = s2 + i
Next MsgBox n & "的階乘為：" & s & Chr(10) & Chr(13) & "1+..." & n & "的和
為：" & s2
End Sub
添加回答
舉報
0/150
提交
取消