輸入N個數值，然後印出最小的數值。
如題這個輸入N個數值我做不出來.....
2006-10-14 10:03:33 · 4 個解答 · 發問者 no_nickname 2 in 電腦與網際網路 ➔ 程式設計
謝謝丫弟，可是我要的是讓它一直輸入直到輸入一個東西之後就不能輸入了，還有你的inputbox("輸入第&i&個數值")<---他會原封不動的輸出.....
2006-10-14 10:32:23 · update #1
順便問一下inputbox可以按取消就跳出去嗎???
2006-10-14 10:47:09 · update #2
好利害喔...都看不懂....
2006-10-14 11:41:01 · update #3
'好吧!我稍微註解一下>_<||Private Sub Command1_Click() Dim Min As Single, S As String, N As String, I As Integer Do N = InputBox("請輸入第" & I + 1 & "個數值,按[取消]鍵結束輸入") '若輸入是數值的話 If IsNumeric(N) Then '若I>0時 If I Then '若N
2006-10-14 11:01:28
·
answer #1
·
answered by W.J.S. 7
·
0⤊
0⤋
那樣的寫法,表示 條件判斷為"真" 就執行..
2006-10-15 11:13:08 · answer #2 · answered by ? 6 · 0⤊ 0⤋
為什麼你的第六行程式沒寫If I怎樣就then呢？這樣也可以喔？代表什麼意思？
2006-10-14 20:08:26 · answer #3 · answered by no_nickname 2 · 0⤊ 0⤋
dim a() as integer
N = inputbox("輸入數值N")
redim a(n)
for i = 1 to n
a(i) = inputbox("輸入第 & i & 個數值")
next i
這樣就會輸入N個數值到 a 陣列裡面嚕 N表示妳要輸入幾個數字
2006-10-14 10:11:33 · answer #4 · answered by 阿弟 1 · 0⤊ 0⤋