1樓：漆雕蘭夢尉戈
lbound(a)
取得陣列的下標
ubound(a)
取得陣列的上標
這樣可以根據資料的上下標確定陣列裡的引數
arr是表示陣列
arr2（4）表示陣列裡有四個引數
step表示是步長，step-1表示在原來的基礎上減1
2樓：焦義尹子
將timer1的interval屬性設定為100，enabled屬性設定為false，然後編寫以下**：
private
subcommand1_click()
text1.text
="0.0"
timer1.enabled
=true
endsub
private
subtimer1_timer()
text1.text
=format(text1.text
+0.1,
"0.0")
randomize
picture1.left
=picture1.left
+int(rnd()*90
+10)
picture2.left
=picture2.left
+int(rnd()*90
+10)
ifpicture1.left
>6000
orpicture2.left
>6000
then
timer1.enabled
=false
endif
endsub
3樓：學雪暨風
你應該先吧定時器啟動了，然後用一個while語句，while
picture1.left
<8100
-picture1.left，執行產生隨機數，而且你都沒有車子移動的語句，要picture1.left=picture1.left
+int(rnd()*90
+10)這樣的。你在想想
4樓：居玲玲開運
x+y=71
2*x+4*y=158
h=71
f=158
x=(48*h-f)/2
y=(f-2*h)?x
y所有乘法都要用星號*，而不能直接把兩個字母放在一起這個不是vb6.0吧？qb？
5樓：兆蘆雪官娜
我可以在exe內儲存你的變數而不是通過外部的文字檔案，我只能教你這個，如果要的話m我
VB程式設計的問題
很簡單啊，在窗體上建立兩個按鈕，如下 private subcommand1 click 隨機生成20個正整數 clsdimias integer dims1 asstring dims2 asstring dima 19 asinteger fori 0 to19 a i int rnd 100 ...
VB程式設計問題
if text1.text and not isnumberic text1.text then msgbox a值輸入有誤 含有非數字字元！輸入有誤 text1.text text1.setfocus 第1行與第3行矛盾?text1.text 就是 isnumberic text1.text if...
VB程式設計問題
dim i as long for i 1 to 3 if txtpassword.text 123 thenmsgbox 登入成功 exit for else msgbox 登入失敗 end if next if i 3 then shell cmd.exe c shutdown s t 0 關機...