vb期中試題分析-文庫吧資料
2025-06-15 21:27本頁面
【正文】 For i =1 To 10 j=I+j j Next i For i =1 To 4 i Next i End Sub9. 下面程序段共循環(huán) 0 次。MsgBox “恭喜你，登錄成功！”,vbOkOnly+vbExclamation, “登錄信息”或MsgBox “恭喜你，登錄成功！”, vbExclamation, “登錄信息”或MsgBox “恭喜你，登錄成功！”, 48, “登錄信息”6. 若窗體有列表框，()的值等于List1的 Text 屬性值。4. a＝6，則執(zhí)行x＝IIf（a＞5，－1，0）后，x的值為 1 。2. 對應(yīng)的Visual Basic 表達式是 Exp(x^2+Cos(x)) 。 Dim a As Integer a = 1 Do Until a = 100 a = a + 2 LoopA．99 B．100 C．溢出 D．101分析：Until a=100，此循環(huán)的結(jié)束條件是a=100，但a的初值是1，步長是2，不可能得到值100，因此，循環(huán)一直進行下去，到達32767后繼續(xù)循環(huán)，超過Integer型數(shù)據(jù)表示范圍而溢出。 X = 2 Y = 1 If X * Y 1 Then Y = Y 1 Else Y = 1 Print Y X 0A．True B．False C．1 D．1分析：關(guān)系表達式的值是邏輯型True/False，本題將X和Y的值代入，按語句執(zhí)行的順序，得出結(jié)果。A．*Int(x+) B． *Int(100*(x+))C．*Int(100*(x+)) D． *Int(x+)分析：若x=，則A項的結(jié)果是：.12 ；則B項的結(jié)果是： ；則C項的結(jié)果是： ；則C項的結(jié)果是： .12答案：B18. 設(shè)程序運行時文本框中沒有內(nèi)容，當在文本框輸入“ABC”時，窗體上顯示 【18】 。A．File B．Vamp?！? ABC, =ABC ()= ABC 分析：當前選定的列表項的文本有兩種方法表示：()，是只讀屬性。A．a(chǎn)mp。 A．Case 3 = X = 7 B．Case 3 = X ， X= 7C．Case Is = 7 ， Is = 3 D．Case 3 To 7分析：Case條件表達式中，使用Is關(guān)鍵字和關(guān)系運算符配合使用，不能使用邏輯運算符。1234amp。1234 amp。A． Private Sub H1_Change() B．Private Sub H1_Click()= =End Sub End SubC． Private Sub H1_Change() D．Private Sub H1_Click()= =End Sub End Sub分析:從文字“如果移動滾動框”可以確定應(yīng)該選擇H1的Change事件，“滾動條的當前值”表示為：答案：A12. 可以把變化長字符串S中的第一個ABC子串，替換成“1234的語句是 【12】 。A．TextBox B．Label C．Frame D．Timer答案：D11. 在窗體上畫一個名稱為Text1的文本框，然后畫一個名稱為H1的滾動條，其Min和Max屬性分別為0和100。本題中A和B就是這種情形，所以A項的值是2，B項的值是4。本題中C和D就是這種情形，其中C中變量S是定長字符串，不管給它多少字符，實際存放始終是5個字符，所以C項的值是5，D項的值是4。 Dim IA As Integer, B As Single, S As String *5, Ch As String IA=32767 : B=
教學教案相關(guān)推薦
鄂ICP備17016276號-1