VB的問題，一個VB的問題

1樓：木木的哥哥

以下**只需要按command1就可以同時顯示text1和text2了

option explicit

option base 1

private sub command1_click()dim a(15) as integer

dim i as integer

text1.text=""

for i = 1 to 15

a(i) = 100 * rnd

next i

text2.text=strreverse(text1.text)end sub

2樓：匿名使用者

你的怪怪的明天來幫你借答吧`

今天沒時間了

3樓：

text1.text = str(a(i))這句有問題for i = 1 to 15

a(i) = 100 * rnd

text1.text =text1.text & str(a(i))next i

vb的問題，vb的一個問題

private sub form queryunload cancel as integer,unloadmode as integer 點選右上角的關閉 dim a as integer a msgbox 確認關閉嗎？vbokcancel vbquestion,系統提示 if a vbok the...

VB基礎問題，VB一個基礎問題

private sub command1 click static i as integer dim a a array 小1 王2 小3 李4 太5 多6 了7 不8 寫9 了10 label1.caption a i if i 9 then i i 1end sub private sub co...

關於vb時鐘的問題，關於vb時鐘的一個問題

建立一個窗體,把borderstyle屬性設為0 none，在窗體上面繪製一個timer 一個label就可以了，不用修改其他屬性。開啟 區，寫下以下 dim x1,y1 as single private sub form load me.caption me.borderstyle 0 with...