VB中for迴圈的問題,vb中一個簡單for迴圈的問題

2022-03-21 14:48:00 字數 6852 閱讀 2795

1樓:昆櫻亮

for a = 1 to 10

...next

樓主想一下,結束這個迴圈的條件是什麼?

是不是當a的值不符合條件的時候就結束?

那a等於多少才不符合條件呢?

當a遞增到11的時候就會結束迴圈啦!

所以最後a中儲存的值便是11!

2樓:武漢波光

你的for迴圈是個空的迴圈,即沒次迴圈 後a增加一到a=10時 迴圈完 此時a=11

然後執行 message.text=& a所以輸出結果為11

如果你想 列印出每個a的值

應該把message.text=& a 放在next 之前就是for ~~

表示式next

這種樣式

3樓:

for a=1 to 10

dosometing

next

a= 1

do until a>10

dosometing

a=a+1

loop

這兩段是一樣的

4樓:天地傲雪

首先你要明白for迴圈的過程,

第一步:自變數a加1,

第二步:用自變數與10進行比較,如a<=10那邊進入迴圈體,否則退出所以當a=10時,迴圈做最後一次,然後再加1與10比較,發現大於10,這才結束迴圈,所以此時a=11

5樓:匿名使用者

不是11你想要什麼呢,本來a 已遞值到11了。

6樓:銳振英慎汝

因為你的迴圈變數a是整型,不會去驗證-6.5。你可以改成單精度型別,步長改為0.5

private

subform_click()

dima

assingle

fora

=-100

to100

step

0.5if2*

a^2+

3*a+

6=71then

printa/

100print

"a=";

aend

ifnext

aendsub

7樓:鄢綠柳定羅

dimi

asinteger

dima

asinteger

dimn

asinteger

dimsum

asinteger

dims

asintegera=

2n=5

sum=0s

=0fori=1

tonsum=

sum+2*

10^(i-

1)'獲得每一個數s=

s+sum'把n個數加起來

next

print

s***********************************=

'根據觀察,總和可以看成有1個20000、2個2000…5個2組成dimi

asinteger

dima

asinteger

dimn

asinteger

dims

asintegera=

2n=5

s=0fori=

1tons

=s+2

*10^(i

-1)*(n

-i+1)

next

print

s******************************===你要那麼多答案幹什麼,都蠻好看懂的啊,我給你簡單註釋一下吧

8樓:寇同書訾妍

dima

asstring

dimn

asinteger

dimk

asstring

dims

asinteger

a="2"

n=5s=0

fori

asinteger

=1to

nforjas

integer=1toi

k=k&

anext

s=s+cint(k)

next

或者下邊的容易,易理解

dimb

asinteger

dima

asinteger

dimn

asinteger

dims

asinteger

b=0a=2

n=5s=0

fori

asinteger=1ton

b=b*10

+2s=s+b

next

方法有很多種,但都脫離不了這兩種思想。要想要別的,自己組合一下就可以了

9樓:

dimn,a,s

,temp,i

asinteger

'temp為臨時常數

,i為迴圈變數

i=0'從0開始迴圈

n=5'賦值

a=2forito

n-1(step

1)temp=temp+a*10^i

'求各個加數

10^i為乘方

s=s+temp

'求和next

iprint

s'輸出就隨便你了

10樓:員素蘭老辰

iftext1(0)

="admin"

then

form2.show

endif

在上一句,已經構成一個完整的if語句了

不需要加下面的那個endif了

11樓:晏智不書

是的,c裡也有for迴圈,不過vb中為什麼多寫一行i=i+2,直接在for迴圈中把步長改成3

for(i=1;i<=10;i=i++)

vb中一個簡單for迴圈的問題

12樓:匿名使用者

for迴圈的格式是:

for 迴圈變數=初值 to 終值 [step 步長][語句]

next[迴圈變數]

當步長預設時,預設值為1。

在visual basic中for迴圈屬於「先檢查後執行」語句,這種語句的執行過程:

當步長為正,「迴圈變數」首先取得「初值」,檢查是否超過「終值」,如果超過就一次也不執行而跳出迴圈。如果沒有超過就執行迴圈體內的語句;然後把「迴圈變數」+「步長」賦給「迴圈變數」;然後再與終值比較,如果小於終值則執行語句。重複上述過程,直到迴圈變數超過終值。

當步長為負,則要檢查「迴圈變數」是否小於「終值」。

所以,當k=10時,k值不超過終值10,程式會執行下一輪迴圈,當k=11時,11>終值10,程式不再迴圈,此時k已等於11。

13樓:

k=10的時候仍然符合迴圈要求,要進行一輪迴圈的。

只有到了11時才不符合迴圈要求,繼續執行next之後的操作。

14樓:匿名使用者

因為k等於10時條件滿足,迴圈繼續執行,執行next k ,這時k的值等於11,不滿足條件,迴圈結束。

15樓:匿名使用者

初值為1,執行了十次,就是11

vb中的for迴圈問題?

16樓:聽不清啊

這個問題中的x1片,還有一個數字,這是表示什麼意思呢?希望能夠講清楚,然後才能夠編寫程式的

17樓:匿名使用者

dim i as integer,v as double,sum as double

dim x as double

x=2:i=1

v = i/x ^i

do while v>0.000001

if i mod 2=1 then sum = sum+vif i mod 2 =0 then sum = sum - vi=i+1

v = i/x ^i

loop

vb中的for迴圈的問題

18樓:翰林院裡掃地的

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)與a(3)、a(3)與a(4)進行比較,如果發現排列順序不對,則交換位置,這樣出了內迴圈之後,最大的元素會「沉」到最後一位成為新的a(4)。

而第二次則是i=3,在前三個元素中找到最大的(由於在上一個迴圈比較中a(4)已經是最大的了,所以就不需再拿a(4)出來比較,可將閣下的**中內迴圈改為for j = 1 to i-1),把它沉到第三位成為新的a(3)。同理,第三次是在前兩位進行排序。這樣當迴圈結束後,最小的元素就如水泡往上冒一樣,一步步冒到最上面來了。

樓上的yutuo5兄的內迴圈定義錯了,應該是for j = 1 to i-1 的。

(由於本人疏忽,發表答覆後進行了多次修改,深感抱歉。)

19樓:匿名使用者

只用一層迴圈不能完成排序。比如陣列為:

4321

一次排序後:3214

二次後:2134

三次後:1234

20樓:匿名使用者

首先,只用一層是不可以的,當你的資料很特殊的時候還有可能兩個迴圈是一種變化後的冒泡演算法

改成下面**應該更好

for i = 4 to 2 step -1for j = 1 to i

if a(j) > a(j + 1) thent = a(j + 1)

a(j + 1) = a(j)

a(j) = t

end if

next j

next i

21樓:

for i = 4 to 2 step -1

就是從4到2,每次迴圈遞減1的運算

「vb,do until」迴圈語句問題?

22樓:匿名使用者

數值0等同於布林值常量的false,而do until則是當表示式為真時跳出迴圈,這與do while剛好相反,所以:

do until 0

相當於do until false

相當於do while not(false)相當於do while true

所以,如果不在迴圈體中跳出迴圈或跳出所在過程或end或goto的話,這將是一個死迴圈.

自然,迴圈體將至少被執行一次.

vb中的for迴圈問題!

23樓:匿名使用者

i,j,k

1,1,1

1,1,2

1,1,3

2,1,1

2,1,2

2,1,3

2,2,2

2,2,3

3,1,1

3,1,2

3,1,3

3,2,2

3,2,3

3,3,3

剛好迴圈14次

24樓:

1、i=1時,j為1,k從1到3內部迴圈3次;

2、i=2時,j為1到2迴圈兩次,k從1到3次內部迴圈3次,k從2到3內部迴圈2次,3+2=5次;

3、i=3時,j為1到3迴圈三次。k從1到3內部迴圈3次,k從2到3內部迴圈2次,k從3到3內部迴圈1次。3+2+1=6次

內部迴圈總計數量是3+5+6=14次

25樓:酷口家讀書會

i=1時,j只能為1 j從1到3,執行3次i=2時,j能為1或2迴圈兩次, j從1到3,執行3次,j從2到3,執行2次 共為5次

i=3時,j能為1或2或3迴圈三次,j從1到3,執行3次,j從2到3,執行2次,j從3到3,執行1次,共為6次

3+5+6共14次

vb中的for迴圈語句問題??

26樓:匿名使用者

dim a, b as integer

for a = 100 to 300

if b mod 5 = 0 then print '判斷是否print 5個數了?如果是 則換行

print a,

b = b + 1 '統計print的個數next a

b的作用是為了計算打贏了資料的個數,也就是說沒5個數是一行,print 是換行,b mod 5 =0是指b如果等於5的倍數,b=b+1 是為了統計print的次數,一旦等於5就換行!

27樓:匿名使用者

1換行2。b的作用是計數

dim a, b as integer

定義變數,雖然這樣定義也沒錯,但是最好不要養成習慣,因為vb跟其他語言不同,一次只能定義一個

標準寫法為

dim a as integer, b as integerfor a = 100 to 300

迴圈,從100到300,共計201次迴圈

if b mod 5 = 0 then print假如b除以5餘數為0換行,即b=0,5,10,15....這些數字就換行

print a,

最後的逗號是打錯了吧,應該是分號之類的,作用是列印出a的值,加分號不換行

b = b + 1

b自加1,這樣才能實現每5個換行,不然b一直為0每個都會換行next a

vb迴圈問題,VB迴圈語句問題 for i 1 to

在你的控制控制元件的click事件中編寫 要控制控制元件的名稱.enable trun false 你說的迴圈可以通過開關控制 即通過一個變數判斷應該執行什麼 如 private sub command1 click if command2.enabled false then command2.e...

VB中RND函式的問題,VB中 rnd函式問題?

rnd 函式 返回一個包含隨機數值的 single。語法rnd number 可選的 number 引數是 single 或任何有效的數值表示式。返回值如果 number 的值是 rnd 生成 小於 0 每次都使用 number 作為隨機數種子得到的相同結果。大於 0 序列中的下一個隨機數。等於 0...

VB關閉窗體問題,VB中窗體關閉事件

private sub form unload cancel as integer if msgbox 確定退出嗎?vbyesno vbno then cancel 1 end if end sub就是 整個程式退出的方法用end。如果你是mdiform 拷貝這個到你的源 中 private sub...