文章責編:陶玉良
看了本文的網友還看了學歷| 高考 中考 考研 自考 成考 外語| 四六級 職稱英語 商務英語 公共英語 資格| 公務員 報關員 銀行 證券 司法 導游 教師 計算機| 等考 軟考
工程|一建 二建 造價師 監(jiān)理師 咨詢師 安全師 結構師 估價師 造價員 會計| 會計證 會計職稱 注會 經濟師 稅務師 醫(yī)學| 衛(wèi)生資格 醫(yī)師 藥師 [更多]
例如:有循環(huán):for I=n1 to n2 step n3 下列哪些語句會影響循環(huán)次數(shù)( )
A. n1=n1+I
B. n3=2*n3
C. n2=n2+n3
D. I=I+n3
2、Do------Loop (While,Until)
例如:運行下面的程序,單擊窗體后在窗體上的內容是( );若將程序中的A語句與B語句的位置互換,再次執(zhí)行程序,單擊窗體后在窗體上顯示的內容是( )
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 0: b = 0
Do While a <= 8
a = a + 2 'A語句
b = b + a * a 'B語句
Loop
Print a, b
End Sub
例如:窗體上顯示的結果:
Private Sub Form_Click()
Dim p As Integer, i As Integer, n As Integer
p = 2: n = 20
For i = 1 To n Step p
p = p + 2
n = n - 3
i = i + 1
If p >= 10 Then Exit For
Next i
Print i, p, n
End Sub
一、 InputBox函數(shù)
MsgBox函數(shù) (注意參數(shù)含義及順序)
x=InputBox(_____,______,_______)
寫出顯示下圖信息框的MsgBox函數(shù)
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |