第七章無答案常用控件

1、第七章 常用控件一、單選題1下列控件中沒有Caption屬性的是 _。A）框架 B）列表框C）復(fù)選框 D）單選按鈕2復(fù)選框的Value 屬性為 1 時(shí)，表示 _。A）復(fù)選框未被選中 B）復(fù)選框被選中C）復(fù)選框內(nèi)有灰色的勾 D）復(fù)選框操作有誤3用來設(shè)置斜體字的屬性是 _。A）FontItalic B）FontBold C）FontName D）FontSize4將數(shù)據(jù)項(xiàng)China添加到列表框List1中成為第二項(xiàng)應(yīng)使用 _語句。A）List1.AddItem China,1 B）List1.AddItem China, 2C）List1.AddItem 1, China D）List1.AddI

2、tem 2, China5引用列表框List1最后一個(gè)數(shù)據(jù)項(xiàng)，應(yīng)使用 _語句。A）List1.List(List1.ListCount) B）List1.List(ListCount)C）List1.List(List1.ListCount-1） D）List1.List(ListCount-1)6在窗體上畫一個(gè)文本框和一個(gè)計(jì)時(shí)器控件，名稱分別為Text1和Timer1，在屬性窗口中把計(jì)時(shí)器的Interval屬性設(shè)置為1000，Enabled屬性設(shè)置為False，程序運(yùn)行后，如果單擊命令按鈕，則每隔一秒鐘在文本框中顯示一次當(dāng)前的時(shí)間。以下是實(shí)現(xiàn)上述操作的程序：Private Sub Comma

3、nd1_Click()Timer1._End SubPrivate Sub Timer1_Timer()Text1.Text = TimeEnd SubTimer1控件的屬性及值為 _。A）Enabled=True B）Enabled=False C）Visible=True D）Visible=False7假定在圖片框Picture1中裝入了一個(gè)圖形，為了清除該圖形（不刪除圖片框），應(yīng)采用的正確方法是_。A）選擇圖片框，然后按Del鍵B）執(zhí)行語句Picture1.Picture=LoadPicture()C）執(zhí)行語句Picture1.Picture=D）選擇圖片框，在屬性窗口中選擇Pictu

4、re屬性，然后按回車鍵8在窗體上畫一個(gè)List1的列表框，一個(gè)名稱為Label1的標(biāo)簽，列表框中顯示若干個(gè)項(xiàng)目，當(dāng)單擊列表框中的某個(gè)項(xiàng)目時(shí)，在標(biāo)簽中顯示被選中的項(xiàng)目的名稱，下列能正確實(shí)現(xiàn)上述操作的程序是_。A) Private Sub List1_Click()Label1.Caption = List1.ListIndexEnd SubB) Private Sub List1_Click()Label1.Name = List1.ListIndexEnd SubC) Private Sub List1_Click()Label1.Name = List1.TextEnd SubD) Priv

5、ate Sub List1_Click()Label1.Caption = List1.TextEnd Sub9把窗體的KeyPreview屬性設(shè)置為True，然后編寫如下事件過程：Private Sub Form_KeyPress(KeyAscii As Integer)Dim ch As Stringch = Chr(KeyAscii)KeyAscii = Asc(UCase(ch)Print Chr(KeyAscii + 2)End Sub程序運(yùn)行后，按鍵盤上的A鍵，則在窗體上顯示的內(nèi)容是_。A）A B）B C）C D）D10對(duì)窗體編寫如下事件過程：Private Sub Form _M

6、ouseDown(Button As Integer, _Shift As Integer, X As Single ,Y As Single)If Button =2 ThenPrint AAAAAEnd IfEnd SubPrivate Sub Form _ MouseUp(Button As Integer, _Shift As Integer, X As Single, Y As Single)Print BBBBBEnd Sub程序運(yùn)行后，如果單擊鼠標(biāo)右鍵，則輸出結(jié)果為_。A）AAAAA B）BBBBB C）AAAAA D）BBBBBBBBBB AAAAA11在窗體上畫一個(gè)列表框和一

7、個(gè)文本框，然后編寫如下兩個(gè)事件過程：Private Sub Form_Load()List1.AddItem 357List1.AddItem 246List1.AddItem 123List1.AddItem 456Text1.Text=End SubPrivate Sub List1_ DblClick()a =List1.TextPrint a+Text1.TextEnd Sub程序運(yùn)行后，在文本框中輸入789，然后雙擊列表框中的456，則輸出結(jié)果為_。A) 1245 B) 456789 C) 789456 D) 012在窗體上畫一個(gè)列表框，然后編寫如下兩個(gè)事件過程：Private Su

8、b Form_Click()List1.RemoveItem 1List1.RemoveItem 3List1.RemoveItem 2End SubPrivate Sub Form_Load()List1.AddItem ItemAList1.AddItem ItemBList1.AddItem ltemCList1.AddItem ItemDList1.AddItem ItemEEnd Sub運(yùn)行上面的程序，然后單擊窗體，列表框中所顯示的項(xiàng)目為_。A) ItemA與ItemB B) ItemB與ItemDC) ItemD與ItemE D) ItemA與ItemC二、填空題1復(fù)選框2Gray

9、ed時(shí)，變成灰色，禁止用戶使用。2風(fēng)格的組合不允許用戶輸入列表框中沒有的選項(xiàng)。3滾動(dòng)條響應(yīng)的重要事件有Change。4當(dāng)用戶單擊滾動(dòng)條的空白處時(shí)，滑塊移動(dòng)的增量由5如果要求每隔15s產(chǎn)生一個(gè)Timer事件，則Interval屬性應(yīng)設(shè)置為。6在程序運(yùn)行時(shí)，如果將框架屬性設(shè)置為False，則框架的標(biāo)題呈灰色，表示框架內(nèi)的所有的對(duì)象均被屏蔽，不允許用戶對(duì)其進(jìn)行操作。7.下面的程序段是將列表框List1中重復(fù)的項(xiàng)目刪除，只保留一項(xiàng)。For i = 0 To List1.ListCount 1For j = List1.ListCount 1 To Step 1If List1.List(i) = List1.List(j) ThenEnd IfNext jNext i8.下列程序段是允許用戶按Enter鍵將一個(gè)組合框(CboComputer)中沒有的項(xiàng)目添加到組合框中。Sub CboComputer_Keypress(KeyAscii As Integer)Dim flag As BooleanIf KeyAscii = 13 Th