1樓：風雪劍無痕
我先隨意提交,如果我發不出**,我就私信給你,覺得好就把我採納^_^private sub command1_click()print "生成的10個隨機數為:"
static s(9) as integer, afor i = 0 to 9
s(i) = int(rnd * 99 + 1)if s(i) mod 3 = 0 then a = a + 1pjz = pjz + s(i) / 10print s(i)
next
print "能被3整除的數有" & a & "個" _; vbcrlf & "這些數的平均值為:" & pjzend sub
我數學不是太好,不管你採納不採納,我都要慶祝一下**沒被遮蔽^_^
請教各位大神關於VB退出迴圈的問題
根據追加做了修改 簡單方法 在迴圈中加入doevents即可 doevents對迴圈速度有一定影響,如果要減少.可以用一個變數儲存迴圈時間,過一段時間響應一次事件.start gettickcountt 500 時間間隔 do while 1 if loop flag true thenexit d...
關於vb的問題！關於VB的問題
在文字框的text屬性裡設為 中國。不就ok了。剛測試過，沒問題的，你在form里加個command1，點選後，可以實現你說的效果，有問題，訊息問我。private declare sub sleep lib kernel32 byval dwmilliseconds as long private...
vb入門問題，關於vb的小問題
也不知道你是不是喜歡學習程式設計。如果不喜歡就應付考試就可以了。喜歡的話，一開始不知道看什麼就上圖書館找書看去吧，看得多了，你就慢慢知道學什麼了。慢慢來吧，做一些實用的小程式，為以後工作打基礎吧。關於vb的小問題 setmynum是一個變數。val表示把括號後面的數轉化為10進位制的數值形式。h是1...