vb期中試題分析(編輯修改稿)
2025-07-06 21:27 本頁面
【文章內(nèi)容簡介】 ) D． *Int(x+)分析：若x=，則A項的結(jié)果是：.12 ；則B項的結(jié)果是： ；則C項的結(jié)果是： ；則C項的結(jié)果是： .12答案：B18. 設(shè)程序運行時文本框中沒有內(nèi)容，當(dāng)在文本框輸入“ABC”時，窗體上顯示 【18】 。 Private Sub Txtinput_KeyPress() Print End SubA．AABABC B．AAB C．A D． AB A ABC AB分析：文本框的KeyPress事件是在按鍵字符顯示之前執(zhí)行的答案：D19. 下列程序段的執(zhí)行結(jié)果是 【19】 。 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é)果。答案：B20. 執(zhí)行以下語句后，a的值為 【20】 。 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ù)表示范圍而溢出。答案：C二、填空題 〖每空2分，共計50分〗；1. 產(chǎn)生[10,37]之間的隨機整數(shù)Visual Basic表達是 Int(Rnd*28+10)或Int(Rnd*28)+10 。2. 對應(yīng)的Visual Basic 表達式是 Exp(x^2+Cos(x)) 。3. 在Visual Basic 中，日期/時間型常量要用 括起來。4. a＝6，則執(zhí)行x＝IIf（a＞5，－1，0）后，x的值為 1 。5. 要顯示如右圖所示的信息提示框，應(yīng)使用語句： 【25】 。MsgBox “恭喜你，登錄成功！”,vbOkOnly+vbExclamation, “登錄信息”或MsgBox “恭喜你，登錄成功！”, vbExclamation, “登錄信息”或MsgBox “恭喜你，登錄成功！”, 48, “登錄信息”6. 若窗體有列表框，()的值等于List1的 Text 屬性值。7. 有如下程序段，寫出運行后的輸出結(jié)果為 16 Private Sub mand1_click() a = 1: b = 2: c = 3 a= a + b: b = b + a: c = b + a If a 3 Or b 3 Then a = b a: b = c a: c = b + a End If Print a + b + c End Sub8. 執(zhí)行下面的程序，當(dāng)單擊Command1時，列表框List1的第2列表項內(nèi)容是3 ，第4列表項內(nèi)容是 15 ，第5列表項內(nèi)容是 28 。 Private Sub Command1＿Click（） Dim i As Integer，j As Integer For i =1 To 10 j=I+j j Next i For i =1 To 4 i Next i End Sub9. 下面程序段共循環(huán) 0 次。a=100 : b=100While ab a=a+1 : b=b+1Wend10. 下列
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號-1