1樓：
private sub cmd1_click()dim i as integer
dim count as integer
dim myvalue as integerdim mysum as integer
dim mytext as string
mysum = 0 '求和
mytext = "" '顯示文字
cls '清除窗體
if isnumeric(text1.text) then '是數字if text1.text > 50 thenelse '小於50
count = text1.text
for i = 1 to count
myvalue = int((90 * rnd) + 10)mysum = mysum + myvaluemytext = mytext & space(1) & myvalue '連線顯示的字串
if i mod 5 = 0 then '滿5個顯示print mytext
mytext = ""
else
end if
next
print mytext '顯示不足5個的label3.caption = round(mysum / count, 2) '計算平均數並顯示，兩位小數
end if
end if
end sub
vb的問題.大家幫幫忙,小弟謝過了!
2樓：匿名使用者
不懂,不能幫你了~~
急求一道vb程式的閱讀，哪位高手能幫我讀一下
private sub form click dim n,j,k as integer,i as long 宣告四個變數 randomize 更新隨機種子 label1.visible false 隱藏labei1 for i 0 to 20 迴圈21次 n int rnd 26 65 26個大寫字...
留學問題啊煩惱啊高手進啊
1全部根據你提供的資金，給你列一個單子吧 1 韓國，語言期一年生活費加學費約5w，本科階段會降下來，因為你可以打工了，而且學費比語言期要便宜。加上中介服務費，也在8w之內。2 日本，跟韓國差不多，但是打工環境要好不少，雖然有學歷要求但是包容性沒有韓國強，現在看你的學歷是不受影響的。3 馬來西亞，比韓...
關於上古卷軸4的問題，高手進
你的配置玩這個遊戲沒有問題。至於這是一款什麼遊戲可以看這裡。tp 0 11 這個遊戲的自由度還是非常高的，畫面效果也非常精美，如果顯示卡不夠好的話，根本不敢開高效果，這個遊戲的特色就是mod,不單可以新增自己喜歡的人物，而且還能新增各種各樣的坐騎，還有衣服和 比如說將最終幻想裡的克勞德弄來當你的豬角...