1樓：匿名使用者
private sub command1_click()x = 0 '給變數x賦值do while x 《跡銀旁 50 '迴圈，條件是當x小姿橡於50時x = x + 2) *x + 3) '1、x=0時(x小於50迴圈)，x=6；2、當x=6時(x小於50迴圈)，x=8*9=72；3、當x=72時(x大於50，不再搏罩迴圈，退出)n = n + 1 '1、x=0時，n=1；2、x=6時，n=2； = str(n) 'text1= = str(x) 'text2=72end sub
2樓：匿名使用者
程式寬扮執行爛好後，private sub command1_click() 單擊command1x=0 'x的值為零，do while x<50 'x小於50的話就執行以下**（do迴圈）x=(x+2) *x+3) n=n+1'第一次迴圈 x=（0+2）*（0+3）=6 x的值就變為6，n=n+1 n的值為1，由於x還是小於50，因此飢巧鉛繼續執行迴圈， 第二次迴圈， x=（6+2）*（6+3）=72，n=n+1 n的值變為2，此時x大於50，所以退出迴圈。 'text1就等於 'text2就等於72解釋完畢，清楚木有？
vb迴圈計算問題
3樓：網友
這很容易，你把每期的資料都列出來，我幫你寫。
4樓：網友
首先必須有雙色球每期的資料，如果從03年到現在，可能有1200多條資料，如果你提供這些資料，可能比較容易實現。
思路：1、計算每一期的奇偶個數，個數比就是奇偶比。
2、計算每一期的大數和小數的個數，個數比就是大小比。
3、將計算結果儲存在資料庫。
5樓：網友
你要求說清楚，我可以試試，沒研究過彩票。
vb迴圈計算的問題
6樓：天涯客家學子
直接把**放到程式裡執行下。
7樓：散評
這種就題就是一步步的代。沒有好方法。有快捷方法，愛出錯。
怎樣計算迴圈,vb中
8樓：網友
比如97，k=int(sqr(97))=9
就用97/(2..3.. 9)都不能整除，則97是素數！
**就是這個意思，這個程式是求3-99的所有奇數中的素數！
9樓：無聊de幻想
首選在第乙個for迴圈得到第乙個k的數值是3,同時n=k,只是型別不同而已，轉入第二個迴圈for i = 2 to 3,得到i的數值範圍是2到3,然後用k整除i,來驗證n,相當於驗證k,如果符合，就轉入最後乙個if語句看看i是否大於k,如果是就輸出n是素數，然後再重頭再來，不過這個時候算n的時候要+2,就是這樣，我也是學vb不到1年，有什麼錯請高手指出！
vb迴圈計算
10樓：
private sub command1_click()
dim a as integer, b as integer, c as integer
dim d as integer, e as integer, f as double
a = 20
b = 30
c = 225
for d = 0 to 453 'd的上限為452
for e = 0 to 37 'e的上限為36
你可以簡單計算一下，你可以把它都設為1000，不過那樣執行很慢，半小時之久吧。即使設定這個上限執行也比較久。
f = (e - b) *c + a) / a + d - a
if f <= 65 then
d & "," & e & ":" & f & vbcrlf
end if
next e
next d
end sub
執行到最後的結果。
8607種可能：前面的省略。
11樓：萍水e相逢
你的式子。
f=(e-30)(225+20)/20+d+20<=65簡化49(e-30)/4+d<=45
這是個 線性方程，滿足條件的 不少哦。
程式設計問題 簡單。
祝你順利。
12樓：網友
所給條件不足，有無陣列答案，故無法給出程式。
vb迴圈題
13樓：星語鑫鑫願
迴圈體在執行第五次時，並且剛進入迴圈體時，i值為9，執行i=i+1後，i值為10 ．第六次進入迴圈體，i值自動加1，此時i值為11，大於迴圈結束值10，所以不執行迴圈體，而執行next 語句後的指令。
for to step next 這種迴圈結構，在變數值等於或小於結束值時，會執行迴圈體，否則不執行而直接跳出。
14樓：紅綠藍的那個黃
next 本來就是i+1了，你又認為的加了1，因此迴圈只是進行了
五次，所以j只為5，正確的應該是：
for i = 1 to 10 step1j=j+1
nextprint i,j
又是vb中for迴圈的計算問題。
15樓：網友
i=1 時，j迴圈只有一次(1 to 1)，k迴圈3次(1 to 3)
i=2時，j迴圈兩次(1 to 2)，k迴圈5次(1 to 3),(2 to 3)
i=3時，j迴圈三次（1 to 3),k迴圈6次(1 to 3),(2 to 3),（3 to 3)
故一共迴圈了3+5+6=14次也就是執行了14 次a=a+1
16樓：網友
要說這個確實做著很讓人覺得頭疼的問題。
樓主好好想一下巢狀迴圈是怎麼做的。
然後照著執行的方式一步一步的相加（首先要有耐心）這是個簡單迴圈巢狀相加的問題。
由於一次只加了乙個1，所以這題主要是看迴圈的次數。
樓主把迴圈的次數加出來，a的值就相對的出來了。
那麼，當i＝1的時候的迴圈次數是：1*1*3那麼，當i＝2的時候的迴圈次數是： 2*2*3那麼，當i＝3的時候的迴圈次數是：3*3*3將這3次的迴圈次數加起來a的值就求出來了。
17樓：網友
不過，a 為什麼沒有初始化呢？
vb迴圈題目
18樓：網友
答案是 1 6
因為是 step -2 ，所以要求 k 的初值大於 終值，不滿足要求根本就沒有迴圈。
關於vb迴圈次數的問題？急，VB計算迴圈的次數
誤差造成 請看這段程式 private sub form click dim i as single for i 0.2 to 1 step 0.1 print i next end sub 輸出結果是 2.3 4.5 6.7 8000001 9000001 你可以把程式放入vb除錯一下，最後2行也...
VB程式For迴圈問題，VB中的For迴圈的問題
把if條件換下就可以了，試試下面的程式 for j 1 to rows 行 for i 1 to columns 列 if j scan int j scan 1.99 then print 1,print 1,str int j scan 0.99 pin1 cstr i print 1,desi...
VB中的For迴圈的問題，VB中FOR迴圈STEP的問題
step 1 表示每一步減1，也就是迴圈第一次是i 4,然後是i 3,i 2 這是稱為 冒泡法 的排序方法，可以這樣理解 外迴圈表示需進行幾輪比較，對4個元素進行比較排序，需要進行3輪比較，所以for i 4 to 2 step 1。而內迴圈則可以這樣說 第一次是i 4，a 1 與a 2 a 2 與...