急求VB程式設計

1樓：匿名使用者

private sub command1_click()dim a%(20),i%

for i = 1 to _20____ '給陣列a(1-20)賦值

a(i)=__inputbox("請輸入一個整型數:") '用inputbox輸入整數

print a(__i_);

if i__mod__5 = 0 then __print____ '5個數一行。轉行

next i

end sub

2樓：匿名使用者

private sub command1_click()dim a%(20), i%

for i = 1 to 20

a(i) = inputbox("請輸入一個整型數:")print a(i);

if i mod 5 = 0 then printnext i

end sub

3樓：學古箏

20inputbox

imod print vbcrlf

4樓：匿名使用者

測試過，完全符合你的要求

private sub command1_click()dim a%(20), i%

for i = 1 to 20

a(i) = inputbox("請輸入一個整型數:")print a(i);

if i mod 5 = 0 then

print chr$(13) & chr$(10)end if

next i

end sub

求VB畢業課程設計，VB程式設計

給分解決不了這種問題的。vb程式設計 80 我自能給親說一下思路，如圖所示，應該建立2個form，第一個用於成績顯示查詢，當然前提應該把成績的資料庫匯入進去，如果這是老師要求的作業，用access資料庫簡單編幾個資料就好了。當點選 生成圖表 按鈕時，form1隱藏，form2出現，座標軸事先用lin...

求解下面這三道程式設計題vb謝謝，急求！一道VB程式設計題 謝謝！

程式設計題1 option explicit private sub form load dim strinput as stringdim bytidx as byte dim strrank 1 to 3 as stringdim sngnum as singlestrrank 1 st str...

VB程式設計

第一種比較容易看的 private sub command1 click dim req as vbmsgboxresult req msgbox are you continue to?vbabortretryignore vbquestion,功能測試 print req end sub 第二種...