1樓:
dim p as integer, i as integer, n as integer
宣告p,i,n為整形變數,dim宣告的變數是動態變數,使用dim宣告的變數在過程執行後不會被儲存
p = 2: n = 20
對p,n進行賦值(不賦值的話,vb預設為0)
for i = 1 to n step p
進入迴圈 i 為迴圈變數,迴圈次數是1到n(也就是20)step是步長,表示這個迴圈體迴圈一次是1+步長,此程式步長為2
p = p + 2
p值為p+2,這個是累加(書上有介紹的,初學者有點困難,難理解累加是什麼意思,數學中這個表示式是錯誤的,但在vb中是正確的)
n = n - 3
n的值等於n-3
i = i + 1
i是迴圈變數
if p >= 10 then exit for
當p大於等於10是退出此迴圈(exit for)
next i
next 是迴圈變數的結束格式,i是可以省略的
'''迴圈語句的格式是
for(迴圈變數)=(初值)to(終值) step(步長)’當步長為1是 可省略
語句next (迴圈變數)
print i, p, n
列印i,p,n的值
2樓:vb妮可
private sub command1_click()'設定3個整型變數p,i,n
dim p as integer, i as integer, n as integer
'設定p和n的初值,分別為2和20
p = 2: n = 20
'讓i從1到n迴圈, 步長為p,也就是2
for i = 1 to n step pp = p + 2 '讓p=p+2
n = n - 3 '讓n=n-3
i = i + 1 '讓i=i+1
if p >= 10 then exit for '如果p大於或等於10的時候,跳出for的迴圈過程
next i
print i, p, n '在一行中列印i,p,n的值, 分隔為1tab寬度
end sub
3樓:
for...next 迴圈,
do...loop跳轉
太多了,自己找下資料
也就是附值,加減運算,條件判斷,
VB IF語句問題,vb中的if語句問題
if a 1 and a 2 and a 3.then 需要滿足所有條件則執行if if a 1 or a 2 or a 3.then 滿足其中個一就執行if if a 1 then按順序判斷條件,如滿足其中一條,則不執行下面的elseif elseif a 2 then elseif a 3 th...
不明白VB的一段語句,望解釋一下
mousedown事件捕獲滑鼠的按下,下面有幾個引數,button代表是按下了哪個按鍵,shift表示是否按下了shift鍵,x代表滑鼠所在的x軸座標,y代表y軸座標。如果按下了右鍵 button 2 就 彈出選單 fon vbpopupmenuleftalign 0 預設值 彈出式選單的左邊定位於...
VB如何連續使用IF語句,VB if語句中怎麼迴圈啊
第二個 if 結束應該是 end if 第二個if 沒有endif啊 vb if語句中怎麼迴圈啊 定義n為全域性變數或區域性靜態變數。區域性表態變數如下寫 private sub timer1 timer static n as intger if label4.fontsize 100 thenl...