信息技術(shù)vb免費(fèi)試題及答案信息技術(shù)VB試卷一、單項(xiàng)選擇題（每題2分，共30分）1.在VB中，以下屬于字符串常量的是（）A.12345B."12345"C.12/31/2023D.12.3452.要在VB中聲明一個(gè)整型變量a，正確的語(yǔ)句是（）A.DimaAsIntegerB.Dima=IntegerC.aAsIntegerD.Integera3.以下VB表達(dá)式的值為T(mén)rue的是（）A.5>3And2<1B.5>3Or2<1C.Not(5>3)D.5<3And2>14.若有語(yǔ)句：a=3:b=4:c=5，執(zhí)行后變量c的值是（）A.3B.4C.5D.不確定5.在VB中，要將文本框Text1中的內(nèi)容清空，可使用的語(yǔ)句是（）A.Text1.Text=""B.Text1.Caption=""C.Text1.Value=""D.Text1.Name=""6.以下能觸發(fā)文本框Text1的Change事件的操作是（）A.單擊文本框B.雙擊文本框C.在文本框中輸入字符D.按下文本框上的回車(chē)鍵7.若要在列表框List1中刪除所有項(xiàng)目，可使用的方法是（）A.List1.RemoveItemB.List1.ClearC.List1.AddItemD.List1.RemoveAll8.以下關(guān)于VB中函數(shù)的說(shuō)法，錯(cuò)誤的是（）A.函數(shù)可以有參數(shù)B.函數(shù)可以有返回值C.函數(shù)必須有函數(shù)名D.函數(shù)只能在事件過(guò)程中調(diào)用9.在VB中，以下哪個(gè)控件可以用來(lái)顯示圖像（）A.LabelB.TextBoxC.PictureBoxD.CommandButton10.若要將一個(gè)字符串變量s轉(zhuǎn)換為數(shù)值類(lèi)型，可使用的函數(shù)是（）A.StrB.ValC.ChrD.Asc11.以下VB語(yǔ)句中，循環(huán)體執(zhí)行次數(shù)為5次的是（）A.Fori=1To5Step1PrintiNextiB.Fori=5To1Step-1PrintiNextiC.Fori=1To5Step2PrintiNextiD.Fori=5To1Step1PrintiNexti12.在VB中，要判斷一個(gè)變量x是否為偶數(shù)，可使用的表達(dá)式是（）A.xMod2=0B.x/2=0C.x\2=0D.x=2013.以下關(guān)于VB中數(shù)組的說(shuō)法，正確的是（）A.數(shù)組的下標(biāo)必須從0開(kāi)始B.數(shù)組的元素類(lèi)型必須相同C.數(shù)組一旦定義，其大小不能改變D.數(shù)組不能作為函數(shù)的參數(shù)14.若有數(shù)組定義：Dima(1To5)AsInteger，該數(shù)組包含的元素個(gè)數(shù)是（）A.4B.5C.6D.不確定15.在VB中，要打開(kāi)一個(gè)名為“data.txt”的文本文件進(jìn)行讀操作，可使用的語(yǔ)句是（）A.Open"data.txt"ForWriteAs1B.Open"data.txt"ForAppendAs1C.Open"data.txt"ForInputAs1D.Open"data.txt"ForBinaryAs1二、填空題（每題3分，共30分）1.在VB中，注釋語(yǔ)句以______開(kāi)頭。2.若要將變量x的值四舍五入到小數(shù)點(diǎn)后兩位，可使用的函數(shù)是______。3.文本框的______屬性用于設(shè)置文本框中顯示的文本內(nèi)容。4.列表框的______屬性用于返回列表框中當(dāng)前被選中項(xiàng)目的索引。5.函數(shù)過(guò)程定義中，使用______語(yǔ)句返回函數(shù)值。6.要判斷一個(gè)字符串s是否為空，可使用的表達(dá)式是______。7.若有循環(huán)語(yǔ)句：DoWhilei<10，該循環(huán)是______循環(huán)（填“當(dāng)型”或“直到型”）。8.數(shù)組定義：Dimb(3,4)AsInteger，該二維數(shù)組包含的元素個(gè)數(shù)是______。9.在VB中，要將一個(gè)數(shù)值變量n轉(zhuǎn)換為字符串類(lèi)型，可使用的函數(shù)是______。10.若要關(guān)閉一個(gè)已打開(kāi)的文件，可使用的語(yǔ)句是______。三、程序分析題（每題10分，共20分）1.分析以下程序，寫(xiě)出程序運(yùn)行后在窗體上輸出的結(jié)果。```vbPrivateSubForm_Click()DimaAsInteger,bAsInteger,cAsIntegera=3b=4c=a+bPrint"a+b=";cEndSub```2.分析以下程序，寫(xiě)出程序運(yùn)行后在文本框Text1中顯示的內(nèi)容。```vbPrivateSubCommand1_Click()DimsAsStrings="Hello,VB!"Text1.Text=sEndSub```四、程序設(shè)計(jì)題（每題10分，共20分）1.編寫(xiě)一個(gè)VB程序，實(shí)現(xiàn)輸入兩個(gè)整數(shù)，計(jì)算并輸出它們的和。要求使用文本框輸入數(shù)據(jù)，標(biāo)簽顯示結(jié)果。2.編寫(xiě)一個(gè)VB程序，使用For循環(huán)計(jì)算1到100之間所有奇數(shù)的和，并將結(jié)果顯示在窗體上。答案一、單項(xiàng)選擇題1.B。字符串常量需要用雙引號(hào)括起來(lái)，A是數(shù)值常量，C是日期常量，D是數(shù)值常量。2.A。在VB中聲明變量的語(yǔ)法是“Dim變量名As數(shù)據(jù)類(lèi)型”。3.B。“5>3”為T(mén)rue，“2<1”為False，“Or”表示或關(guān)系，只要有一個(gè)為T(mén)rue結(jié)果就為T(mén)rue。4.C。根據(jù)語(yǔ)句依次賦值，最后c的值為5。5.A。文本框的內(nèi)容通過(guò)Text屬性設(shè)置，清空即賦值為空字符串。6.C。在文本框中輸入字符會(huì)改變文本框的內(nèi)容，觸發(fā)Change事件。7.B。List1.Clear方法用于清空列表框中的所有項(xiàng)目。8.D。函數(shù)可以在其他函數(shù)或通用過(guò)程中調(diào)用，不只是事件過(guò)程。9.C。PictureBox控件用于顯示圖像。10.B。Val函數(shù)用于將字符串轉(zhuǎn)換為數(shù)值類(lèi)型。11.A。該循環(huán)從1到5，步長(zhǎng)為1，循環(huán)體執(zhí)行5次。12.A?！癕od”是取模運(yùn)算符，判斷一個(gè)數(shù)是否為偶數(shù)即看它除以2的余數(shù)是否為0。13.B。數(shù)組元素類(lèi)型必須相同；數(shù)組下標(biāo)可以指定起始值；動(dòng)態(tài)數(shù)組大小可以改變；數(shù)組可以作為函數(shù)的參數(shù)。14.B。數(shù)組定義為“Dima(1To5)AsInteger”，包含5個(gè)元素。15.C?！癋orInput”表示以讀模式打開(kāi)文件。二、填空題1.Rem或單引號(hào)（'）。2.Round。3.Text。4.ListIndex。5.Return（在VB中是“Function函數(shù)名=返回值”）。6.s=""。7.當(dāng)型。當(dāng)型循環(huán)是當(dāng)條件滿足時(shí)執(zhí)行循環(huán)體。8.20。二維數(shù)組元素個(gè)數(shù)為行數(shù)乘以列數(shù)，即4×5=20。9.Str。10.Close文件號(hào)。三、程序分析題1.程序運(yùn)行后在窗體上輸出的結(jié)果是：```a+b=7```程序先定義了三個(gè)整型變量a、b、c，然后給a賦值3，b賦值4，計(jì)算c=a+b得到7，最后使用Print語(yǔ)句輸出結(jié)果。2.程序運(yùn)行后在文本框Text1中顯示的內(nèi)容是：```Hello,VB!```程序定義了一個(gè)字符串變量s并賦值為“Hello,VB!”，然后將該值賦給文本框Text1的Text屬性。四、程序設(shè)計(jì)題1.```vbPrivateSubCommand1_Click()Dimnum1AsInteger,num2AsInteger,sumAsIntegernum1=Val(Text1.Text)num2=Val(Text2.Text)sum=num1+num2Label3.Caption="兩數(shù)之和為："&sumEndSub```設(shè)計(jì)思路：在窗體上添加兩個(gè)文本框Text1和Text2用于輸入兩個(gè)整數(shù)，一個(gè)命令按鈕Command1用于觸發(fā)計(jì)算，一個(gè)標(biāo)簽Label3用于顯示結(jié)果。點(diǎn)擊命令按鈕時(shí)，將文本框中的內(nèi)容轉(zhuǎn)換為數(shù)值，計(jì)算它們的和，并將結(jié)果顯示在標(biāo)簽上。2.```vbPrivateSubForm_Click()DimiAsInteger,sumAsInteger