2014年計(jì)算機(jī)二級(jí)VB模擬試題及答案（3）

　　11、窗體上有1個(gè)名稱(chēng)為L(zhǎng)ist1的列表框，其中已經(jīng)輸入了若干個(gè)項(xiàng)目，如圖所示;還有2個(gè)文本框，名稱(chēng)分別為T(mén)ext1、Text2，1個(gè)名稱(chēng)為Command1的命令按鈕，并有下列事件過(guò)程。

　　Private Sub Co mmand1_Click()

　　Di mstr As Stri ng ，s As Stri ng ，k As Integer

　　s =Text1

　　str =""

　　For k =List1.ListCount -1To 0Step -1

　　If InStr(List1.List(k)，s)>0Then

　　str =str &List1.List(k)&""

　　End If

　　Next k

　　If str =""Then

　　Text2="沒(méi)有匹配的項(xiàng)目" Els

　　e Text2=str

　　End If

　　End Sub

　　程序運(yùn)行時(shí)，在Text1中輸入"京"，單擊命令按鈕，則在Text2中顯示的內(nèi)容是(　　)。

　　A.京

　　B.北京南京

　　C.南京北京

　　D.沒(méi)有匹配的項(xiàng)目

　　12、執(zhí)行以下程序段后，變量c$的值為(　　)。

　　a$="Visual Basic Programi ng"

　　b$="Quick"

　　c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，11)

　　A.Visual BASICProgrami ng

　　B.Quick Basic Programi ng

　　C.QUICK Basic Programi ng

　　D.Quick BASICProgrami ng

　　13、剛建立一個(gè)新的標(biāo)準(zhǔn)EXE工程后，不在工具箱中出現(xiàn)的控件是(　　)。

　　A.單選按鈕

　　B.圖片框

　　C.通用對(duì)話(huà)框

　　D.文本框

　　14、關(guān)于MDI 窗體，下列說(shuō)法正確的是(　　)。

　　A.一個(gè)應(yīng)用程序可以有多個(gè)MDI 窗體

　　B.子窗體可以移到MDI 窗體以外

　　C.不可以在MDI 窗體上放置按鈕控件

　　D.MDI 窗體的子窗體不可以擁有菜單

　　15、在窗體(Name 屬性為Form1)上畫(huà)兩個(gè)文本框(其N(xiāo)ame 屬性分別為T(mén)ext1和Text2)和一個(gè)命令按鈕(Name屬性為Co mmand1)，然后編寫(xiě)如下兩個(gè)事件過(guò)程：

　　Private Sub Co mmand1_Click()

　　a=Text1.Text +Text2.Text Print a

　　End Sub

　　Private Sub Form_Load()

　　Text1.Text ="" Text2.Text =""

　　End sub

　　程序運(yùn)行后，在第一個(gè)文本框(Text1)和第二個(gè)文本框(Text2)中分別輸入123和321，然后單擊命令按鈕，則輸出結(jié)果為(　　)。

　　A.444

　　B.321123

　　C.123321

　　D.132231

　　16、在C盤(pán)當(dāng)前文件夾下建立一個(gè)名為SDat .txt 的順序文件。要求用InputBox 函數(shù)輸入5名學(xué)生的學(xué)號(hào)(StuNo)、姓名(StuName)和英語(yǔ)成績(jī)(StuEng)。則在下列橫線處應(yīng)填入的語(yǔ)句是(　　)。

　　Private Sub Form_Click()

　　Open "C：\SDat .txt"For Output As 1

　　For i =1To 5

　　StuNo =InputBox("請(qǐng)輸入學(xué)號(hào)")

　　StuName =InputBox("請(qǐng)輸入姓名")

　　StuEng =Val(InputBox("請(qǐng)輸入英語(yǔ)成績(jī)"))

　　Next i

　　Close #1

　　EndSub

　　A.Input #l ，StuNo ，StuName ，StuEn

　　B.Put #l ，StuNo ，StuName ，StuEn

　　C.Write #1，StuNo ，StuName ，StuEn

　　D.Get #1，StuNo ，StuName ，StuEn

　　17、目錄列表框Path 屬性所表示的含義是(　　)。

　　A.當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的路徑

　　B.當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的某目錄下的文件列表

　　C.根目錄下的文件列表

　　D.指定路徑下的文件列表

　　18、有下列函數(shù)過(guò)程：

　　Function Func2(a As Integer ，b As Integer)As Integer

　　Static m As Integer ，i As Integer

　　m=0

　　i =2

　　a=i +m+1

　　b =i +a+b

　　Func2=m

　　End Function

　　在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)下列事件過(guò)程：

　　Private Sub Co mmandl_Click()

　　Di m P As Integer ，k As Integer ，m As Integer

　　k =4

　　m=1

　　P=Func2(k ，m)

　　Print k ;m

　　P=Func2(km)

　　Print k =m End Sub

　　程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是(　　)。

　　A.3 63 6

　　B.3 63 11

　　C.3 113 6

　　D.3 113 11

　　19、在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)，所打開(kāi)的窗口是(　　)。

　　A.工程資源管理器窗口

　　B.工具箱窗口

　　C.代碼窗口

　　D.屬性窗口

　　20、下列敘述菜單設(shè)計(jì)的語(yǔ)句正確的是(　　)。

　　A.菜單也是一個(gè)控件，存在于工具箱中

　　B.菜單也有外觀和行為的屬性

　　C.菜單設(shè)計(jì)在"菜單編輯器"中進(jìn)行，因此它不是一個(gè)控件

　　D.菜單的屬性也是在"屬性窗口"中設(shè)置的