《VB語言程序設計在線作業(yè)(共11頁).doc》由會員分享，可在線閱讀，更多相關(guān)《VB語言程序設計在線作業(yè)(共11頁).doc（11頁珍藏版）》請在匯文網(wǎng)上搜索。

1、精選優(yōu)質(zhì)文檔-傾情為你奉上VB語言程序設計_在線作業(yè)_3一、單選題(每題5分,共20道小題,總分值100分)1.通過設置Line控件的什么屬性，可以繪制虛線、點劃線等多種樣式的直線（D）。(5分) A.Style B.DrawStyle C.FillStyle D.BorderStyle是否存疑2.在窗體上畫兩個單選按鈕，名稱分別為Option1和Option2，標題分別為“宋體”和“黑體”；一個復選框，名稱為Check1，標題為“粗體”；一個文本框，名稱為Text1，Text屬性為“改變文字字體”。要求程序運行時，“宋體”單選按鈕和“粗體”復選框被選中，則能夠?qū)崿F(xiàn)上述要求的語句序列是（C）。

2、(5分) A.Option1.Value = True Check1.Value = False B.Option1.Value = True Check1.Value = True C.Option1.Value = True Check1.Value = 1 D.Option2.Value = False Check1.Value = True是否存疑3.下列可以把當前目錄下的圖形文件pic1.jpg裝入圖片框Picture1中的語句為（A）。(5分) A.Picture1. Picture = LoadPicture(pic1.jpg) B.Picture.Handle = pic1.j

3、pg C.Picture = LoadPicture(pic1.jpg) D.Picture = pic1.jpg是否存疑4.設a = 2，b = 3，c = 4，d = 5，下列表達式Not a = c Or 4 * c = b 2 And b a + c的值是（D）。(5分) A.1 B.True C.-1 D.False是否存疑5.假定有以下循環(huán)結(jié)構(gòu)Do Until條件循環(huán)體Loop則正確的描述是（C）。(5分) A.如果“條件”是一個不為0的常數(shù)，則至少執(zhí)行一次循環(huán)體 B.不論“條件”是否為“真”，至少要執(zhí)行一次循環(huán)體 C.如果“條件”是一個為0的常數(shù)，則無限次執(zhí)行循環(huán)體 D.如果“條

4、件”是一個為0的常數(shù)，則一次循環(huán)體也不執(zhí)行是否存疑6.確定一個控件在窗體上的位置的屬性是（D）。(5分) A.Width和Height B.Width或Height C.Top或Left D.Top和Left是否存疑7.在窗體上畫兩個名稱分別為Label1和Label2的標簽，然后編寫如下事件過程：Private Sub Form_Click()x = -5: s = -5Select Case sCase Is 0y = x + 1Case Is = 0y = x + 2Case Elsey = x + 3End SelectLabel1.Caption = xLabel2.Caption

5、= yEnd Sub程序運行后，單擊窗體，標簽Label1和Label2中顯示的內(nèi)容分別是（D）。(5分) A.-5和-4 B.-5和-3 C.-5和-5 D.-5和-2是否存疑8.以下程序段的輸出結(jié)果是（B）。a = Sqr(3)b = Sqr(2)c = a bPrint c(5分) A.-1 B.True C.False D.0是否存疑9.閱讀下面的程序：Function F(a As Integer)Static cb = 0b = b + 1c = c + 1F = a + b + cEnd FunctionPrivate Sub Command1_Click()Dim a As I

6、ntegera = 2For i = 1 To 3Print F(a)Next iEnd Sub運行上面的程序，單擊命令按鈕，輸出結(jié)果為（C）。(5分) A.4 6 8 B.4 4 4 C.4 5 6 D.4 7 9是否存疑10.對一個磁盤上的順序文件進行讀操作，打開方式為（C）。(5分) A.Random B.Output C.Input D.Append是否存疑11.圖像框控件有一個屬性，可以自動調(diào)整圖像框的大小，以適應圖像的尺寸，這個屬性是（A）。(5分) A.Stretch B.Appearance C.AutoRedraw D.AutoSize是否存疑12.為了把窗體上的某個控件變?yōu)?/p>

7、活動的，應執(zhí)行的操作是（D）。(5分) A.單擊窗體的邊框 B.雙擊窗體 C.雙擊該控件 D.單擊該控件的內(nèi)部是否存疑13.下列可作為VB的變量名的是（C）。(5分) A.3*Delta B.AB C.PrintChar D.Abs是否存疑14.在顯示菜單時，菜單的哪個屬性為True時將用灰色顯示該菜單項標題（B）。(5分) A.Visible B.Enabled C.Checked D.Caption是否存疑15.下列程序段的執(zhí)行結(jié)果為（D）。x = 2: y = 1If x * y 0(5分) A.-1 B.1 C.True D.False是否存疑16.對用MsgBox顯示的消息框，以下敘

8、述中錯誤的是（B）。(5分) A.可以有兩個按鈕 B.可以有任意多個按鈕 C.可以有一個按鈕 D.可以有三個按鈕是否存疑17.閱讀下面的程序：Sub subP(b() As Integer)For i = 1 To 4b(i) = 2 * iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As Integera(1) = 5: a(2) = 6: a(3) = 7: a(4) = 8subP a()For i = 1 To 4Print a(i)Next iEnd Sub運行上面的程序，單擊命令按鈕，輸出結(jié)果為（D）。(5分) A.

9、程序出錯 B.5 6 7 8 C.10 12 14 16 D.2 4 6 8是否存疑18.閱讀下面的程序：Private Sub Form_Click()Dim Check, CounterCheck = TrueCounter = 0DoDo While Counter 20Counter = Counter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoopLoop Until Check = FalsePrint Counter, CheckEnd Sub程序運行后，單擊窗體，輸出結(jié)果為（C）。(5分) A.15 0 B.10 True C.10 False D.20 -1是否存疑19.當窗體最小化時縮小為一個圖標，設置這個圖標的屬性是（C）。(5分) A.MousePoint B.Picture C.Icon D.MouseIcon是否存疑20.使文本框獲得焦點的方法是（A）。(5分) A.SetFocus B.LostFocus C.GotFocus D.Change專心-專注-專業(yè)