VB語言程序設(shè)計(jì)

1、VB語言程序設(shè)計(jì)(1/44)VB支持自定義數(shù)據(jù)類型,在某程序中我們定義了如下類型: Type Student     number  As string     name As String     age As IntegerEnd Type· 針對上述定義,如下幾項(xiàng)用法正確的是:( ) 正確答案：B· AS="張三"· BDim s  As Student "張紅"&#

2、183; CDim s As Type S="張三"· DDim s As T="張三"(2/44)· 以下能夠觸發(fā)文本框Change事件的操作是( ) 正確答案：D· A文本框失去焦點(diǎn)· B文本框獲得焦點(diǎn)· C設(shè)置文本框的焦點(diǎn)· D改變文本框的內(nèi)容(3/44)· 下面程序運(yùn)行后輸出的結(jié)果是(   )   正確答案：BDIM C1,C2   C1="CHINA"  

3、 C2=STRING$(2, C1)   PRINT Left(C1,1) + C2移除錯(cuò)題· ACHI· BCCC· CINA· DAAA(4/44)· 設(shè)窗體上有一個(gè)文本框,名稱為text1,程序運(yùn)行后,要求該文本框不能接受鍵盤輸入,但能輸出信息,以下屬性設(shè)置正確的是: 正確答案：B· Atext1.maxlength=0· Btext1.enabled=flase· Ctext1.visible=flase· Dtext1.width=0 (5/44)· 用于

4、返回窗體可用區(qū)域?qū)挾鹊膶傩允? ) 正確答案：A· AScaleWidth· BScaleLeft· CScaleHeight· DScaleTop(6/44)· Visual Basic提供的On Error Resume next錯(cuò)誤陷阱語句表示( ) 正確答案：C· A當(dāng)發(fā)生錯(cuò)誤時(shí)，使程序轉(zhuǎn)跳到語句標(biāo)號為0的程序塊· B當(dāng)發(fā)生錯(cuò)誤時(shí)，不使用錯(cuò)誤處理程序塊· C當(dāng)發(fā)生錯(cuò)誤時(shí)，忽略錯(cuò)誤行，繼續(xù)執(zhí)行下一語句· D當(dāng)發(fā)生錯(cuò)誤時(shí)，終止本過程執(zhí)行，繼續(xù)執(zhí)行下一過程(7/44)為了檢測到用戶按下鍵盤上的所有鍵,應(yīng)

5、該使用的鍵盤事件為( )· 正確答案：C· AKeyPress· BMouseDown· CKeyDown· DMouseUp(8/44)· 當(dāng)一個(gè)復(fù)選框被選中時(shí),它的Value屬性的值是( ) 正確答案：C· A3· B2· C1· D0(9/44)· 通用對話框控件和文件列表框控件中,都能根據(jù)文件的類型對要顯示的文件進(jìn)行篩選過濾,后者使用( )屬性進(jìn)行該項(xiàng)設(shè)置。正確答案：A· APattern· BPath· CFilter· DFileNa

6、me(10/44)· 語句DIM ARRAY(0 to 3,4,1 to 6)中定義的數(shù)組有( )個(gè)元素。正確答案：C· A12· B60· C120· D34511/44)· 把MsgBox的返回值轉(zhuǎn)換為數(shù)值應(yīng)該使用的函數(shù)是( ) 正確答案：D· ALog· BStr· CLen· DVal(12/44)· 用于設(shè)置通用對話框控件顯示文件類型的屬性是( ) 正確答案：A· AFilter· BPath· CPartern· DFoleName

7、(13/44)· 在窗體上放置一個(gè)命令按鈕,名稱為Command1。單擊命令按鈕時(shí),執(zhí)行如下事件過程: Private Sub Command1_C1ick()     a$="software and hardware"     b$=Right(a$,8)     c$=Mid(a$,1,8)     Msgbox a$,b$,c$,1End Sub 則在彈出的信息框的標(biāo)題欄中顯示的信息是( )正確答案：D· A

8、softWare and hardware· Bsoftware· Chardwafe· D出現(xiàn)錯(cuò)誤(14/44)   下列關(guān)于窗體上控件的基本操作錯(cuò)誤的是:· 正確答案：A· A下一次DEL鍵只能刪除一個(gè)控件· B按下一次DEL鍵可以同時(shí)刪除多個(gè)控件· C按住SHIFT鍵，然后單擊每個(gè)要選擇的控件，可以同時(shí)選中多個(gè)控件· D按住ALT鍵，然后單擊每個(gè)要選擇的控件，可以同時(shí)選中多個(gè)控件(15/44)·    下列關(guān)于屬性設(shè)置的敘述錯(cuò)誤的是: 正確答案：A·

9、 A一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶不能改變· B一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶可以改變· C一個(gè)控件的屬性即可以在屬性窗口中設(shè)置，也可以用程序代碼設(shè)置· D一個(gè)控件的屬性在屬性窗口中設(shè)置，還可以利用程序代碼為其設(shè)置新值(16/44)對于復(fù)選框控件chkBoy,如果在程序中設(shè)置它為選中狀態(tài),下面語句正確的是( )· 移除錯(cuò)題正確答案：D· AchkBoy.Checked = true· BchkBoy.Value = true· CchkBoy.Selected = true· DchkB

10、oy.Value = 1(17/44)· 一個(gè)對象所能做的事情稱為對象的( ) 正確答案：D· A繼承· B屬性· C封裝· D方法(18/44)·    在窗體上畫一個(gè)名稱為Text1的文本框,然后畫一個(gè)名稱為HScroll1的滾動(dòng)條,其Min和Max屬性分別為0和100。程序運(yùn)行后,如果移動(dòng)滾動(dòng)框,則在文本框中顯示滾動(dòng)條的當(dāng)前值,以下能實(shí)現(xiàn)上述操作的程序段是(   ) · 正確答案：A· APrivate Sub HScroll_Change() Text1.Text=H

11、Scroll1.Value  End Sub· BPrivate Sub HScroll_Click() Text1.Text=HScroll1.Value  End Sub· CPrivate Sub HScroll_Change() Text1.Text=HScroll.Caption  End Sub· DPrivate Sub HScroll_Click() Text1.Text=HScroll.Caption  End Sub(19/44)· 設(shè)x=4,y=8,z=7,表達(dá)式

12、xz) Or z<x的值是< p="" style="box-sizing: border-box; margin: 0px; padding: 0px;"></x的值是<>正確答案：D· A1· B-1· CTrue· DFalse(20/44)· 在程序中,使用InputBox函數(shù)可以接受用戶的輸入,如果要把它的返回值轉(zhuǎn)換為數(shù)值型的數(shù)據(jù),應(yīng)該使用的函數(shù)是( ) 正確答案：A· AVal· BLen· CStr· DLog(21

13、/44)動(dòng)態(tài)數(shù)組因?yàn)樵诔绦蜻\(yùn)行前無法確定數(shù)組的大小,所以經(jīng)常根據(jù)程序的運(yùn)行情況,對數(shù)組進(jìn)行重新定義,以下關(guān)于VB中動(dòng)態(tài)數(shù)組的敘述中不正確的是( )· 正確答案：B· A可以用ReDim語句重新定義動(dòng)態(tài)數(shù)組，并且可以進(jìn)行多次重定義· B首次用Dim進(jìn)行動(dòng)態(tài)數(shù)組聲明的時(shí)候，必須指明它的類型和上下界· CPreserve為ReDim語句的可選參數(shù)，用于保留動(dòng)態(tài)數(shù)組原來的內(nèi)容· D當(dāng)對動(dòng)態(tài)數(shù)組使用Erase語句進(jìn)行釋放操作時(shí)，將釋放其內(nèi)存(22/44)· 在運(yùn)行時(shí),按TAB鍵跳過了一個(gè)可以獲得焦點(diǎn)的控件(如文本框),則可能是因?yàn)? ) 正確答

14、案：D· A該控件的TABSTOP屬性值為TRUE· B該控件的TABINDEX屬性值為FALSE· C該控件的ENABLED屬性值為TRUE· D該控件的ENABLED屬性值為FALSE(23/44)· 變量未賦值時(shí),數(shù)值型變量的值為( ) 正確答案：A· A0· B空· C1· D無任何值(24/44)· 以下語句的輸出結(jié)果是( ) Print Format$(32548.5, "000,000.00")正確答案：C· A32548.5· B325，4

15、85.00· C032，548，50· D32，548，50(25/44)· 以下關(guān)于MsgBox的敘述中,錯(cuò)誤的是( ) 正確答案：D· AMsgBox函數(shù)返回一個(gè)整數(shù)· B通過MsgBox函數(shù)可以設(shè)置信息框中圖標(biāo)和按鈕的類型· CMsgBox語句沒有返回值· DMsgBox函數(shù)的第一個(gè)參數(shù)是一個(gè)整數(shù)，該參數(shù)只能確定對話框中顯示的按鈕數(shù)量(26/44)· 語句DIM AA(3,4,5)中定義的數(shù)組有多少個(gè)元素( ) 正確答案：C· A12· B60· C120· D345(

16、27/44)在窗體上畫一個(gè)名稱為Command1的命令按鈕,然后編寫如下事件過程: Private Sub Command1_Click()    x=InputBox("Input")    Select Case x      Case 1,3        Print "分支 1"      Case Is >4   

17、0;    Print "分支 2"      Case Else       Print "Else 分支 "    End Select End Sub · 程序運(yùn)行后,如果在輸入對話框中輸入2,則窗體上顯示的是(   ) 正確答案：C· A分支1· B分支2· CElse分支· D程序出錯(cuò)(28/44)· VB應(yīng)用程序的運(yùn)行模式是(

18、 ) 正確答案：C· A解釋運(yùn)行模式· B編譯運(yùn)行模式· C兩者都有· D匯編模式(29/44)設(shè)菜單中有一個(gè)菜單項(xiàng)為“Open”。若要為該菜單命令設(shè)計(jì)訪問鍵,即按下Alt及字母O時(shí),能夠執(zhí)行“Open”命令,則在菜單編輯器中設(shè)置“Open”命令的方式是( )· 正確答案：A· A把Caption屬性設(shè)置為&Open· B把Caption屬性設(shè)置為O&pen· C把Name屬性設(shè)置為&Open· D把Name屬性設(shè)置為O&pen(30/44)運(yùn)行時(shí),當(dāng)用戶向文本框輸入新的內(nèi)

19、容,或在程序代碼中對文本框的TEXT屬性進(jìn)行賦值從而改變了文本框的TEXT屬性值時(shí),將觸發(fā)文本框的( )事件。· 正確答案：D· ACLICK· BDBLCLICK· CGOTFOCUS· DCHANGE (31/44)· 下列關(guān)于控件畫法的敘述錯(cuò)誤的是( ) 正確答案：D· A單擊一次工具箱中的控件圖標(biāo)，只能在窗體上畫出一個(gè)相應(yīng)的控件· B按住CTRL鍵后單擊一次工具箱中的控件圖標(biāo)，可以在窗體上畫出多個(gè)相同類型的控件· C雙擊工具箱中的控件圖標(biāo)，所畫控件的大小和位置是固定的· D不合用工具箱中

20、的控件工具，不可以在窗估上畫出圖形對象，但可以寫入文字字符(32/44)· 以下( )程序段可以實(shí)施X、Y變量值的變換( ) 正確答案：C· AY=X：X=Y· BZ=X：Y=Z：X=Y· CZ=X：X=Y：Y=Z· DZ=X：W=Y：Y=Z：X=Y(33/44)· 決定標(biāo)簽(Label)顯示的屬性是( ) 正確答案：C· AText· BName· CCaption· DAlignment(34/44)·    關(guān)于滾動(dòng)條控件,下面說法錯(cuò)誤的是: 正確答案：D&#

21、183; A點(diǎn)擊滾動(dòng)條的箭頭，可以改變它的value值，從而引發(fā)Change事件· B拖動(dòng)滾動(dòng)框，可以觸發(fā)Scroll事件· C通常，水平滾動(dòng)條的值從左向右遞增，垂直滾動(dòng)條的值自上而下遞增· D拖動(dòng)滾動(dòng)框，可以觸發(fā)Change事件，而且是連續(xù)觸發(fā)的(35/44)·    在運(yùn)行階段,要在文本框TEXT1獲得焦點(diǎn)時(shí)選中文本框中所有內(nèi)容,對應(yīng)的事件過程是( ) 正確答案：A· APrivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)

22、End Sub· BPrivate Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub· CPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub· DPrivate Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub(36/44)· 一個(gè)工程中包含

23、兩個(gè)名稱分別為Form1、Form2的窗體,一個(gè)名稱為mdlFunc的標(biāo)準(zhǔn)模塊。假定在Form1、Form2和mdlFunc中分別建立了自定義過程,其定義格式為: 正確答案：B     Form1中定義的過程:     Private Sub frmfunction1()     End Sub     Form2中定義的過程:     Public Sub frmfunction2()     End S

24、ub     mdlFunc中定義的過程:     Public Sub mdlFunction()     End Sub在調(diào)用上述過程的程序中,如果不指明窗體或模塊的名稱,則以下敘述中正確的是( )· A上述三個(gè)過程都可以在工程中的任何窗體或模塊中直接被調(diào)用· B只有mdlFunction過程能夠被工程中各個(gè)窗體或模塊直接被調(diào)用· Cfrmfunction1只能在form1中調(diào)用，而frmfunction2 則可以在所有模塊或窗體中被直接調(diào)· D上述三個(gè)過程都只

25、能在各自被定義的模塊中直接調(diào)用(37/44)· 計(jì)時(shí)器(Timer)控件用于每隔一段時(shí)間自動(dòng)觸發(fā)一次Timer事件,可以有規(guī)律地重復(fù)執(zhí)行一段程序,它用于設(shè)置兩次事件時(shí)間間隔的屬性是( ) 正確答案：A· AInterval· BSmallChange· CLargeChange· DMax(38/44)· 為了防止用戶隨意將光標(biāo)置于控件上,應(yīng)( ) 正確答案：D· A將控件的TABINDEX屬性設(shè)置為0· B將控件的TABSTOP屬性設(shè)置為TRUE· C將控件的TABSTOP屬性設(shè)置為FALSE· D將控件的ENABLED屬性設(shè)置為FALSE