2023年秋浙江省高校計(jì)算機(jī)等級(jí)考試試卷-(二級(jí)Visual-BASIC)

2001年秋浙江省高校計(jì)算機(jī)等級(jí)考試試卷(二級(jí)VisualBASIC)說明：〔1〕考生應(yīng)將試題一至試題三的答案涂在答題卡上，將第四、五題的答案填寫在答卷上，否那么作無效處理；〔2〕請將你的準(zhǔn)考證號(hào)的后四位填寫在答卷的右下角指定位置內(nèi)；〔3〕考試時(shí)間為120分鐘。試題一、計(jì)算機(jī)根底題〔此題共15分〕〔一〕單項(xiàng)選擇題〔每題1分，共10分〕(1)下面(1)組設(shè)備包括輸入設(shè)備、輸出設(shè)備和存儲(chǔ)設(shè)備。 A、CRT、CPU、ROM B、鼠標(biāo)器、繪圖儀、光盤 C、磁盤、鼠標(biāo)器、鍵盤 D、磁帶、打印機(jī)、激光打印機(jī)(2)微型計(jì)算機(jī)的更新與開展，主要基于(2)的變革。A、軟件 B、微處理器 C、存儲(chǔ)器 D、磁盤的容量(3)內(nèi)存空間地址段為2001Ｈ——7000Ｈ，那么其存儲(chǔ)空間為(3)KB。A、20480 B、20.48 C、20 (4)(4)是Windows操作的特點(diǎn)。A、先選擇操作命令，再選擇操作對象B、先選擇操作對象，再選擇操作命令C、需同時(shí)選擇操作對象和操作命令D、需將操作對象拖到操作命令上(5)在Windows的資源管理器中，剛查看了A盤的目錄，假設(shè)在同一驅(qū)動(dòng)器中換了一張軟盤，想查看新的目錄，可用(5)命令。A、刷新 B、更改 C、顯示 D、重顯示(6)在使用Word文本編輯軟件時(shí)，要把文章中所有出現(xiàn)的“學(xué)生〞兩字都改成以粗體顯示，可以選擇(6)功能。A、樣式 B、改寫 C、替換 D、粘貼(7)在Word編輯文本時(shí)，為了使文字繞著插入的圖片排列，可以進(jìn)行的操作是(7)。A、插入圖片，設(shè)置環(huán)繞方式B、插入圖片，調(diào)整圖形比例C、建立文本框，插入圖片，設(shè)置文本框位置D、插入圖片，設(shè)置疊放次序(8)在GB2312-80漢字系統(tǒng)中，計(jì)算機(jī)把一個(gè)漢字表示為(8)。A、漢語拼音字母的ASCII代碼 B、十進(jìn)制數(shù)的二進(jìn)制編碼C、按字形筆劃設(shè)計(jì)的二進(jìn)制碼 D、兩個(gè)字節(jié)的二進(jìn)制編碼(9)使用電子郵件時(shí)，有時(shí)收到的郵件有乖僻字符，即出現(xiàn)了亂碼，這是由于(9)。A、病毒B、接收方操作系統(tǒng)有問題C、發(fā)送方計(jì)算機(jī)故障D、編碼未統(tǒng)一(10)根據(jù)病毒的傳染途徑可將病毒分為操作系統(tǒng)病毒、文件型病毒、網(wǎng)絡(luò)型病毒三種，其中文件型病毒往往附在.COM和.(10)文件中，當(dāng)運(yùn)行這些文件時(shí)，會(huì)激活病毒并常駐內(nèi)存。A、EXE B、FRM C、CPP D、DBC〔二〕雙選題〔每題1分，共5分〕注：從供選擇的答案中選兩個(gè)正確答案(11)設(shè)A盤處于寫保護(hù)狀態(tài)，以下可以進(jìn)行的操作是(11)。A、將A盤中某個(gè)文件改名B、將A盤中所有內(nèi)容復(fù)制到C盤C、在A盤上建立文件AA.CD、顯示A盤目錄樹(12)以下軟件中，(12)屬于系統(tǒng)軟件。A、CAD B、Word C、匯編程序D、C語言編譯程序(13)在Windows中利用“任務(wù)欄屬性〞對話框，可以進(jìn)行(13)操作。A、在“開始〞菜單中添加一個(gè)工程 B、在桌面上建立一個(gè)快捷方式 C、在任務(wù)欄上顯示輸入法指示器D、在任務(wù)欄上顯示時(shí)間(14)在Windows附件中，下面表達(dá)正確的是(14)。A、記事本中可以含有圖形 B、畫圖是繪圖軟件，不能輸入漢字C、寫字板中可以插入圖形D、計(jì)算器可以將十進(jìn)制整數(shù)轉(zhuǎn)換為二進(jìn)制或十六進(jìn)制數(shù)(15)在Word中，中選中了文本后，使用(15)命令可以使剪貼板內(nèi)容與選中的內(nèi)容一致。A、粘貼 B、剪切 C、復(fù)制 D、刪除試題二、語言根底題〔此題共25分〕〔一〕判斷題〔每題1分，共10分，選A表示正確，選B表示錯(cuò)誤〕(16)Variant是一種特殊的數(shù)據(jù)類型，Variant類型變量可以存儲(chǔ)除了定長字符串?dāng)?shù)據(jù)及自定義類型外的所有系統(tǒng)定義類型的數(shù)據(jù)。Variant類型變量還可具有Empty、Error和Null等特殊值。(17)窗體的Enabled屬性值為False時(shí)，該窗體上的按鈕、文本框等控件就不會(huì)對用戶的操作做出反響。(18)框架控件和形狀控件都不能響應(yīng)用戶的鼠標(biāo)的單擊事件。(19)在一個(gè)窗體的代碼中不能使用Unload語句來卸載本窗體，即一個(gè)窗體只能由其它窗體卸載。(20)對于文件系統(tǒng)控件，當(dāng)驅(qū)動(dòng)器控件Drive1中的驅(qū)動(dòng)器符改變時(shí)，文件夾列表控件Dir1中顯示的文件夾也作相應(yīng)改變，可以在Drive1中的Change事件中使用如下命令：Dir1.Path=Drive1.Drive(21)當(dāng)在一個(gè)簡單組合框的文本框中輸入一個(gè)它的列表框中沒有的條目時(shí)，組合框會(huì)自動(dòng)把這一條目添加到它的列表框中。(22)圖片框的Move方法不僅可以移動(dòng)圖片框，而且還可以改變該圖片框的大小，同時(shí)也會(huì)改變該圖片框有關(guān)屬性的值。(23)當(dāng)定時(shí)器控件的Interval屬性值設(shè)置為0時(shí)，會(huì)連續(xù)不斷地激發(fā)Timer事件。(24)VisualBASIC提供的幾種標(biāo)準(zhǔn)坐標(biāo)系統(tǒng)的原點(diǎn)都是在繪圖區(qū)域的左上角，如果要把坐標(biāo)原點(diǎn)放在其它位置，那么需使用自定義坐標(biāo)系統(tǒng)。(25)如果一個(gè)菜單項(xiàng)的Visible屬性為False，那么它的子菜單也不會(huì)顯示?！捕硢雾?xiàng)選擇題〔每題1分，共15分〕(26)一個(gè)對象可以執(zhí)行的動(dòng)作和可被對象識(shí)別的動(dòng)作分別稱為(26)。A、事件、方法B、方法、事件C、屬性、方法D、過程、事件(27)在窗體Form1的Click事件過程中有以下語句：Label1.Caption="VisualBasic"假設(shè)本語句執(zhí)行之前，標(biāo)簽控件的Caption屬性為默認(rèn)值，那么標(biāo)簽控件的Name屬性和Caption屬性在執(zhí)行本語句之前的值分別為(27)。A、"Label"、"Label"B、"Label1"、"VisualBasic"C、"Label1"、"Label1"D、"Caption"、"Label"(28)(28)對象不具有Caption屬性。A、LabelB、OptionC、FormD、Timer(29)Integer類型的變量可存的最大整數(shù)是(29)。A、255B、256(30)以下數(shù)據(jù)類型中，占用內(nèi)存最小的是(30)。A、BooleanB、ByteC、IntegerD、Single(31)(31)對象不能作為控件的容器。A、FormB、PictureBoxC、ShapeD、Frame(32)代數(shù)式的VisualBASIC表達(dá)式是(32)。A、a+b/Sqr(c+Log(a))+c/dB、(a+b)/(Abs(c+Log(a))+c/d)C、(a+b)/(Abs(c+Log(a))+c/d)D、(a+b)/(Sqr(c+Log(a))+c/d)(33)A、B、C中C最小，那么判斷A、B、C可否構(gòu)成三角形三條邊長的邏輯表達(dá)式是(33)。A、A>=BAndB>=CAndC>0B、A+C>BAndB+C>AAndC>0C、(A+B>=COrA-C<=C)AndC>0D、A+B>CAndA-B>CAndC>0(34)下面(34)是日期型常量。A、"12/19/99"B、12/19/99C、#12/19/99#D、(35)如果在圖片框上使用繪圖方法繪制一個(gè)圓，那么圖片框的(35)屬性不會(huì)對該圓的外觀產(chǎn)生影響。A、BackColorB、ForeColorC、DrawWidthD、DrawStyle(36)一個(gè)菜單項(xiàng)是不是一個(gè)分隔條，由(36)屬性決定。A、Name(名稱)B、CaptionC、EnabledD、Visible(37)下面(37)對象在運(yùn)行時(shí)一定不可見。A、LineB、TimerC、TextD、Option(38)形狀控件所顯示的圖形不可能是(38)。A、圓B、橢圓C、圓角正方形D、等邊三角形(39)以下(39)方式翻開的文件只能讀不能寫。A、InputB、OutputC、RandomD、Append(40)由Fork=35TO0Step3:Nextk循環(huán)語句控制的循環(huán)次數(shù)是(40)。A、0B、12C、-11D、-10試題三、程序填空題〔每空2分，共20分)仔細(xì)閱讀以下各小題的程序說明和相應(yīng)的程序，在每題提供的假設(shè)干可選答案中，挑選一個(gè)正確答案。1.【程序說明】本程序求3-100之間的所有素?cái)?shù)〔質(zhì)數(shù)〕并統(tǒng)計(jì)個(gè)數(shù)；同時(shí)將這些素?cái)?shù)從小到大依次寫入順序文件e:\dataout.txt；素?cái)?shù)的個(gè)數(shù)顯示在窗體Form1上?！境绦颉縋rivateSubCommand1_Click()DimcountAsInteger,flagAsBooleanDimt1AsInteger,t2AsInteger(41)count=0Fort1=3To100flag=TrueFort2=2ToInt(Sqr(t1))If(42)Thenflag=FalseNextt2(43)count=count+1Write#1,t1EndIfNextt1(44)Close#1EndSub(41)A、Opene:\dataout.txtForOutputAs#1B、Open"e:\dataout.txt"ForIntputAs#1C、Open"e:\dataout.txt"ForOutputAs#2D、Open"e:\dataout.txt"ForOutputAs#1(42)A、t2\t1=0B、t1Modt2=0C、t1\t2=0D、t2Modt1=0(43)A、IfflagThenB、Ift2>t1ThenC、Ift1>t2ThenD、Ift2>Int(Sqr(t1))Then(44)A、Form1.Print"素?cái)?shù)個(gè)數(shù)："countB、Print#1"素?cái)?shù)個(gè)數(shù)：";countC、Form1.Print"素?cái)?shù)個(gè)數(shù)：";countD、Form1.Print"素?cái)?shù)個(gè)數(shù)：":count2.【程序說明】由輸入對話框輸入n(設(shè)n為大于零且小于30的自然數(shù))，計(jì)算以下表達(dá)式的值，并在標(biāo)簽框Label1上顯示?！境绦颉縋rivateSubForm_Click()DimnAsInteger,sumAsDouble,kAsIntegern=Val(InputBox("n=","請輸入自然數(shù)n〔n>0且n<30〕"))Do(45)n=Val(InputBox("n=","請重輸"))Loopsum=0(46)Dok=k+1sum=(47)LoopUntilk>=nLabel1.Caption="sum="+Str(sum)EndSub(45)A、Whilen<=0Orn>=30B、Whilen<=0Andn>=30C、Untiln>0Orn<30D、Untiln>=0Andn<=30(46)A、k=2B、k=1C、(47)A、1/(k*(k+1))B、1/(k-1)*kC、sum+1/(k*(k+1))D、sum+1/k*(k+1)3.【程序說明】本程序用于處理文本框Text1.Text中的內(nèi)容，假設(shè)文本框中有偶數(shù)個(gè)字符。要求將文本框中的內(nèi)容從頭尾至中間依次各取字符，組成一個(gè)新的字符串Str2，并在窗體上輸出。例如：Text1.Text="12345678"，那么Str2="18273645"【程序】PrivateSubForm_Click()DimStr1AsString,Str2AsStringStr1=Text1.TextStr2=""m=0Do(48)Str2=Str2+(49)Str2=Str2+(50)m=m+1LoopForm1.PrintStr2EndSub(48)A、Whilem<Len(Str1)/2B、Whilem<=Len(Str1)/2C、Untilm>Len(Str1)/2D、Untilm<Len(Str1)/2(49)A、Mid(Str1,m,1)B、Mid(Str1,Len(Str1)-m,1)C、Mid(m,Str1,1)D、Mid(Str1,m+1,1)(50)A、Mid(Str1,Len(Str1)–m+1,1)B、Mid(Str1,m,1)C、Mid(Str1,Len(Str1)-m,1)D、Mid(Str1,Len(Str1)–m+1,m)試題四、程序閱讀題〔每題5分，共20分)閱讀以下程序，寫出運(yùn)行結(jié)果。1.(5分)PrivateSubCommand1_Click()n=0:x=1:y=0DoWhilex<20n=n+1y=x+yx=x*(x+1)LoopText1.Text="n="&Str(n)Text2.Text="x="&Str(x)Text3.Text="y="&Str(y)EndSub程序運(yùn)行時(shí)單擊Command1后，分別寫出文本框Text1、Text2和Text3的Text值。2.(5分)Functionchg(aAsInteger,bAsInteger)AsIntegerDimnAsIntegerForn=0To2a=a+bNextnchg=aEndFunctionPrivateSubForm_Click()DimaAsInteger,bAsInteger,zAsIntegera=1:b=1Forn=1To3z=chg(a,b)Form1.Print"n=";n,"z=";zNextnEndSub寫出程序運(yùn)行時(shí)單擊窗體后，F(xiàn)orm1上的輸出結(jié)果。3.(5分)PrivateSubForm_Click()Dimx(5)AsIntegerx(1)=8:x(2)=3:x(3)=1:x(4)=6:x(5)=4Fori=1To4Forj=i+1To5Ifx(i)<x(j)Thent=x(i):x(i)=x(j):x(j)=tNextj,iFork=1To5Form1.Print"x(";k;")=";x(k)NextkEndSub寫出程序運(yùn)行時(shí)單擊窗體后，F(xiàn)orm1上的輸出結(jié)果。4.(5分)PrivateSubForm_Click()Dima(2,3)AsIntegerFori=1To2Forj=1To3a(i,j)=2*i-jNextj,iForh=1To3Fork=1To2Form1.Printa(k,h),NextkPrintNexthEndSub寫出程序運(yùn)行時(shí)單擊窗體后，F(xiàn)orm1上的輸出結(jié)果。試題五、程序設(shè)計(jì)題(每題10分，共20分)1.用輸入對話框輸入x，根據(jù)下式計(jì)算對應(yīng)的y，并在窗體上輸出y的值。注：程序?qū)懺诿畎粹oCommand1的Click事件中。2．用戶界面如圖1所示，用于實(shí)現(xiàn)左右兩個(gè)組合框中數(shù)據(jù)的左移和右移功能。程序開始運(yùn)行時(shí)，在左邊組合框中生成10個(gè)由小到大排列的隨機(jī)三位正整數(shù)〔假設(shè)在設(shè)計(jì)階段該組合框的Sorted屬性值已設(shè)置為True〕，現(xiàn)要求完成：(1)單擊“>>〞鈕，左邊組合框中的10個(gè)數(shù)全部移到右邊組合框，并由大到小排列，同時(shí)使“<<〞鈕能響應(yīng)，“>>〞鈕不能響應(yīng)；(2)單擊“<<〞鈕，右邊組合框中的10個(gè)數(shù)全部移到左邊組合框，并由小到大排列，同時(shí)使“>>〞鈕能響應(yīng)，“<<〞鈕不能響應(yīng)；(3)單擊“結(jié)束〞按鈕，結(jié)束程序運(yùn)行。圖1局部程序代碼如下：PrivateSubForm_Load()DimiAsIntegerLabel1.Caption="組合框1"Label2.Caption="組合框2"CmdRight.Caption=">>"CmdRight.Enabled=TrueCmdLeft.Caption="<<"CmdLeft.Enabled=FalseCmdExit.Caption="結(jié)束"ComboLeft.Text=""Fori=1To10ComboLeft.AddItemInt(Rnd*900)+100NextiComboRight.Text=""EndSub請分別編寫三個(gè)命令按鈕的單擊事件。2001年秋浙江省高校計(jì)算機(jī)等級(jí)考試參考答案(二級(jí)VisualBASIC)試題一、計(jì)算機(jī)根底題〔此題共15分〕(一)單項(xiàng)選擇題〔每題1分，共10分〕題號(hào)ABCD題號(hào)ABCD題號(hào)ABCD(1)－(5)－(9)－(2)－(6)－(10)－(3)－(7)－(4)－(8)－(二)雙選題〔每題1分，共5分〕題ABCD題ABCD(11)－－(14)－－(12)－－(15)－－(13)－－試題二、語言根底題〔此題共25分〕〔一〕判斷題〔每題1分，共10分，答案用A表示正確，B表示錯(cuò)誤〕〔16〕A〔17〕A〔18〕B〔19〕B〔20〕A〔21〕B〔22〕A〔23〕B〔24〕A〔25〕A〔二〕單項(xiàng)選擇題〔每題1分，共15分〕〔26〕B〔27〕C〔28〕D〔29〕D〔30〕B〔31〕C〔32〕D〔33〕B〔34〕C〔35〕A〔36〕B〔37〕B〔38〕D〔39〕A〔40〕A試題三、程序填空題〔每空2分，共20分〕〔41〕D〔42〕B〔43〕A〔44〕C〔45〕A〔46〕D〔47〕C〔48〕A〔49〕D〔50〕C試題四、程序閱讀題〔每題5分，共20分)1.〔5分〕n=3x=42y=92.〔５分〕n=1z=4n=2z=7n=3z=103.(5