1樓:匿名使用者
按照你的意思,相當於把陣列按正序和反序分別輸出。編寫程式如下:
dim a(1 to 20) as integer,i as integer
for i=1 to 20
a(i)=inputbox("請輸入第"+str(i)+"個數:")next i
for i=1 to 20
print a(i);
next i
for i=20 to 1 step -1print a(i);
next i
2樓:匿名使用者
private sub form_click()dim a(1 to 20)
for i = 1 to 20
a(i) = val(inputbox(""))next i
print "原來的陣列是:"
for i = 1 to 20
print a(i);
next i
for i = 0 to 9
t = a(i + 1): a(i + 1) = a(20 - i): a(20 - i) = t
next i
print "調換後的陣列是:"
for i = 1 to 20
print a(i);
next i
end sub
你怎麼問兩遍???
3樓:該使用者忘記取暱稱了
先用個迴圈
for i=1 to 10
temp=a(i) 'temp為臨時變數,需要自己定義的a(i)=a(20-i+1)
a(20-i+1)=temp
next
然後print a(1 to 20)
4樓:匿名使用者
太難了 估計等我博士畢業才能解決
5樓:匿名使用者
影子老爺的回答完全正確
求1道小學VB程式設計題目謝謝,急求!一道VB程式設計題 謝謝!
private sub form click dim i j s i 1,j 0 do while s 2000 j i j s s j i i 1 loop print n i print s s end sub 有點不記得了 大概是這樣的 你自己除錯一下哈!private sub form cl...
急求!一道VB程式設計題謝謝,10道VB題 急求答案!!!謝謝高手了
private sub procmin a as integer,byval amin as integer dim i amin0 for i lbound a to ubound a print a i amin0 a lbound a if a i amin0 then amin a i ne...
求解一道VB題目,一道vb題目求解。
由圖上 經執行所得值如下 a 3,2 的值是 1,a 1,2 的值是9,a 2,3 的值是 7.如下圖所示 我只能看懂vb vb的除錯那些不太熟。我用c語言寫了乙個一樣的程式,把每一步的計算過程輸出出來了,你看一下。下面是c語言的 有興趣你可以自己去執行一下看看。include int main 宣...