請教VB問題

1樓：匿名使用者

'新增一個command1按鈕控制元件

private sub command1_click()dim i as integer,s as stringme.autoredraw = true

for i = 1 to 9

s = s & cstr（i）

me.print s

next i

'...

end sub

2樓：風雨兼程

很簡單：

private sub form_click()dim a$, i%, j%

for i = 1 to 9

a = ""

for j = 1 to i

a = a & j

next

print a

next

end sub

3樓：匿名使用者

private sub command1_click()dim i%, k%

for i = 1 to 9

for k = 1 to i

print cstr(k);

next k

print

next i

end sub

4樓：

dim numstr as string

dim i as integer

numstr="123456789"

for i=1 to 9

print left(numstr,i)

next

請教VB的問題，請教VB的一個問題

mod 取模運算2008 02 26 15 40print 4 mod 3 1 print 4 mod 3 1 print 4 mod 3 1 print 4 mod 3 1 print 7.8 mod 4.56 3 總結 mod就是求餘數或稱取模，結果是兩數相除後的餘數。規則 若參加運算的運算元不...

VB程式設計問題請教

if then語句有行語句和塊語句.你這樣寫,第2個if a1 375 then a2 0.571 是行語句 你看給你整理下.private sub command5 click if a1 0 and a1 1000 then if a1 375 then a2 0.571 elseif a1 4...

vb的小問題，關於vb的小問題

你在做執行程式時，不新增其他的退出按鍵就可以啊！關於vb的小問題 setmynum是一個變數。val表示把括號後面的數轉化為10進位制的數值形式。h是16進位制數字的開頭。寫在 裡面表示加上 h這兩個字元竄。如加號後面的數值 5的話，setmynum就等於val h5 這個意思。號後面的mid su...