vb6.0-VB6.0中如何用inputbox函數實現輸入10個數字，求最大的哪一個？

VB6.0中如何用inputbox函數實現輸入10個數字，求最大的哪一個？

VB6.0中如何用inputbox函數實現輸入10個數字，求最大的哪一個？

最佳回答：

 dim max as integer
dim i as integer
dim x as integer
for i = 1 to 10
x = val(inputbox("請輸入第" & i & "個數"))
if x > max then max = x
next
msgbox max