版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
1、 2009年VB模擬考試一滿分:100分姓名:_1、單項選擇題(本題共計60分)1、_在用戶的應(yīng)用程序執(zhí)行期間發(fā)生,比如鼠標(biāo)單擊或敲擊鍵盤。 ( )A、方法B、屬性C、事件D、工程2、一只白色的足球踢進(jìn)球門,則白色、足球、踢、進(jìn)球門是_。 ( )A、屬性、對象、方法、事件B、屬性、對象、事件、方法C、對象、屬性、方法、事件D、對象、屬性、事件、方法3、_是接收用戶鼠標(biāo)或鍵盤輸入的能力。當(dāng)對象具有_時,可接受用戶的輸入。 ( )A、事件B、屬性C、焦點(diǎn)D、對象4、VisualBasic是一種面向_的程序設(shè)計語言。 ( )A、過程B、用戶C、方法D、對象5、能被對象所識別的動作與可執(zhí)行的活動分別稱
2、為對象的_。 ( )A、方法、事件B、事件、方法C、事件、屬性D、過程、方法6、VisualBasic是用于開發(fā)_環(huán)境下的應(yīng)用程序的工具。 ( )A、DOSB、WindowsC、DOS和WindowsD、UNIX7、VisualBasic中的窗體文件的擴(kuò)展名是_。 ( )A、.regB、.frmC、.basD、.vbp8、在程序中分別將變量Inta、Bl、St、D定義為整型、布爾型、字符串型和日期型,下列賦值語句在執(zhí)行時會出錯的是_。 ( )A、Inta=4.6B、Bl=#True#C、St=5 & 123.5D、D=#10/05/01#9、與數(shù)學(xué)表達(dá)式 (ab/3cd) 對應(yīng),VB的
3、不正確表達(dá)式是_。 ( )A、a*b/(3*c*d)B、a/3*b/c/dC、a*b/3/c/dD、a*b/3*c*d10、表達(dá)式16/4-25*8/4 MOD 5/2的值為_。 ( )A、14B、4C、20D、211、以下各項中,_不是一個合法的字符串。 ( )A、"Visual"B、""C、#Basic#D、"等級考試"12、賦值語句:a=123+MID("123456",3,2)執(zhí)行后,a變量中的值是_。 ( )A、"12334"B、123C、12334D、15713、要判斷&ld
4、quo;月收入在2000元以上(含2000元)且5000元以下(不含5000元)”的職工,應(yīng)該使用的邏輯表達(dá)式是_。 ( )A、M>2000 AND M<=5000B、M>2000 Or M<=5000C、M>=2000 AND M<5000D、M>=2000 Or M<500014、語句Print "5*20" 輸出的結(jié)果是_。 ( )A、"5*20"B、出現(xiàn)錯誤信息C、5*20D、10015、設(shè)M=3,N=5,P=4.5,Q=2.5,表達(dá)式(M*N+2)/(P-Q)的
5、計算結(jié)果為_。 ( )A、8B、9C、8.5D、8.016、下列語句中不能正常執(zhí)行的是_。 ( )A、print +32758+10B、print 5+9=15C、print "65"+12D、print "65"&1217、假定變量Logic類型是Boolean,下面賦值語句_是正確的。 ( )A、Logic = TrueB、Logic = .True.C、Logic = # True #D、Logic = 3<418、以下哪個是合法的變量名_。 ( )A、LenB、TestqwC、6cost_1D、count2s19、下面程序的運(yùn)行結(jié)果
6、是_。Private Sub Command1 Click ( )x=1: y=1For i=1 TO 3x=x+y: y=y+xNext iPrint x;yEnd Sub ( )A、6 6B、5 8C、13 21D、34 3520、VB也提供了結(jié)構(gòu)化程序設(shè)計的三種基本結(jié)構(gòu),三種基本結(jié)構(gòu)是_。 ( )A、遞歸結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)B、選擇結(jié)構(gòu)、過程結(jié)構(gòu)、順序結(jié)構(gòu)C、過程結(jié)構(gòu)、輸入、輸出結(jié)構(gòu)、轉(zhuǎn)向結(jié)構(gòu)D、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)、順序結(jié)構(gòu)21、下列程序運(yùn)行后的輸出結(jié)果是_。Private Sub Command1_Click()For i=1 TO 3For j=0 TO i-1k=k+1next
7、 jnext iprint kEnd Sub ( )A、6B、5C、4D、322、下列循環(huán)能正常結(jié)束循環(huán)的是_。 ( )A、i=5<BR /> Do<BR /> i=i+1<BR /> Loop Until i<0B、i=1<BR /> Do<BR /> i=i+2 <BR /> Loop Until i=10C、i=10<BR /> Do<BR /> i=i+1<BR /> Loop Until i>0D、i=6<BR /> Do<BR /
8、> i=i-2<BR /> Loop Until i=123、下列程序的輸出結(jié)果是_。<br />Dim y As Integer<br />y=10<br />Do While y<>0<br /> y=y-1<br />Loop<br />Print "y=" y ( )A、y=0B、y=1C、y=隨機(jī)值D、y=–124、執(zhí)行以下語句后,a的值為_。<BR />Dim a As Integer<BR
9、/>a=1<BR />Do Until a=100 <BR /> a=a+2 <BR />Loop ( )A、99B、100C、溢出D、10125、表達(dá)式X+1>X是_. ( )A、算術(shù)表達(dá)式B、非法表達(dá)式C、字符串表達(dá)式D、關(guān)系表達(dá)式26、計算機(jī)算法可以分為兩大類:一類是_算法,另一類是_算法。 ( )A、計算機(jī)輔助設(shè)計、財務(wù)B、數(shù)值計算、非數(shù)值計算C、步驟管理、通信D、排序、查找27、VisualBasic認(rèn)為下面_組變量是同一個變量。 ( )A、A1和a1B、Sum 和SummaryC、Aver 和 AverageD、A1 和A_1
10、28、下面語句運(yùn)行后的輸出結(jié)果是_.Private Sub Command1_Click()x=0Do While x<10x=x+1: x=x*xLoopPrint xEnd Sub ( )A、16B、19C、20D、2529、下面程序段運(yùn)行后,顯示的結(jié)果是_。Dim xIf x Then Print x Else Print x +1 ( )A、1B、0C、-1D、顯示出錯信息30、有如下程序:Private Sub Command1_Click( )score=65select Case scoreCase Is<60a$="F"Case 60 To 69
11、a$="D"Case 70 To 79a$="C"Case 80 To 89a$="B"Case elsea$="A"End SelectMsgBox a$End Sub程序運(yùn)行后,消息對話框中顯示的內(nèi)容為_。 ( )A、AB、BC、CD、D31、在過程中有語句ForI=N1 To N2 Step N3,在該循環(huán)體內(nèi)有下列四條語句,其中_會影響循環(huán)執(zhí)行的次數(shù)。 N1=N1+I N2=N2+N3 I=I+N3 N3=2*N3 ( )A、B、C、D、32、下列程序Private Sub Command1_Click(
12、)a=InputBox("請輸入")b=InputBox("請輸入")Print a+bEnd Sub運(yùn)行時輸入3和4輸出的結(jié)果是 _ 。 ( )A、7B、34C、3+4D、出錯33、如下二維數(shù)組聲明語句,_正確。 ( )A、Dim a3,4 As IntegerB、Dim a(3,4) As IntegerC、Dim a(n,n) As IntegerD、Dim a(34) As Integer34、在窗體模塊的通用聲明處用下面的語句聲明變量、數(shù)組,正確語句有_個。Public A(5) As IntegerPublic N As IntegerPub
13、lic St As StringPrivate b() As Integer ( )A、2B、3C、4D、135、在窗體的通用聲明處有語句Dim A() As Single,以下在某事件過程中重定義此數(shù)組的一組正確語句是:_。 ( )A、ReDim A(3,3)<BR /> ReDim A(4,4) As IntegerB、ReDim A (3,3)<BR /> ReDim Preserve A (4,4)C、ReDim A(3)<BR /> ReDim A(3,3) As IntegerD、ReDim A (3,3)<BR /> ReDim P
14、reserve A(3,4)36、對窗體編寫如下代碼:Option Base 1Private Sub Command1_Click( )a=Array(237,126,87,48,498)m1=a(1)m2=1For i=2 To 5If a(i)>m1 Thenm1=a(i)m2=iEnd IfNext iPrint m1;m2End Sub程序運(yùn)行后,按回車鍵,輸出結(jié)果為_。 ( )A、48 4B、237 1C、498 5D、498 437、下列有關(guān)數(shù)組的說法中,不正確的是_。 ( )A、在窗體模塊中不可以定義全局?jǐn)?shù)據(jù)組B、可以使用Erase語句釋放所有數(shù)組所占據(jù)的存儲儲空間C、語
15、句Dim X(3.6+2)As Integer定義了一個維上界是6的一維的整型數(shù)組D、形參數(shù)組的類型可以是定長符串類型38、在窗體上添加一個命令按鈕,名為Command1,事件過程如下。執(zhí)行結(jié)果是_。Sub pb(b( ) As Integer)For i=1 To 4B(i)=2*iNext iEnd SubPrivate Sub Command1_Click( )Dim a(1 To 4) As Integera(1)=5:a(2)=6: a(3)=7:a(4)=8pb aFor i=1 To 4Print a(i);Next iEnd Sub ( )A、2 4 6 8B、1 3 5 7C
16、、3 6 6 12D、4 8 12 1639、當(dāng)發(fā)生Command1_Clik事件后,下列程序的輸出結(jié)果是_。<br />Dim i As Integer<br />Dim a(10) As Integer<br />For i=9 To 0 Step–1<br /> a(i)=10–i<br />Next i<br />Print a(2);a(5);a(8) ( )A、2 5 8B、7 4 1C、8 5 2D、3 6 940、在窗體模塊的通用聲明處用下面的語句聲明變量、數(shù)組,正確
17、語句有_個。Public A(5) As IntegerPublic N As IntegerPublic St As StringPrivate b() As Integer ( )A、2B、3C、4D、141、以下有關(guān)數(shù)組的說明中,錯誤的是_。 ( )A、根據(jù)數(shù)組說明的方式,可將數(shù)組分為動態(tài)數(shù)組和靜態(tài)數(shù)組。B、在過程中,不能用Private語句定義數(shù)組。C、利用ReDim語句重新定維時,不得改變已經(jīng)說明過的數(shù)組的數(shù)據(jù)類型。D、數(shù)組重新定維后,原有的數(shù)組元素內(nèi)容將不予保留。42、當(dāng)發(fā)生Command1_Click事件后,程序輸出結(jié)果是_。<br />Option Base 1&l
18、t;br />Private Sub Command1_Click()<br />Dim a(4, 4) As Integer,i As Integer,s As Integer<br />s=0<br />Fori=1 To 4<br /> For j=1 To 4<br /> a(i, j) = (i-1)*4+j*2<br /> Next j<br />Next i<br />For i = 1 To 4<br /> s=s+a(i, i)<br />Next i
19、<br />Print s<br />End Sub ( )A、28B、32C、30D、4443、在窗體上畫一個命令按鈕,然后編寫如下事件過程:Option Base 1Private Sub Command1_Click( )Dim a As Varianta = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1s = s + a(i)*jj = j * 10Next iPrint sEnd Sub運(yùn)行上面的程序,單擊命令按鈕,其輸出結(jié)果是_。 ( )A、4321B、12C、34D、123444、如下二維數(shù)組聲明語句,_正確。 ( )
20、A、Dim a3,4 As IntegerB、Dim a(3,4) As IntegerC、Dim a(n,n) As IntegerD、Dim a(34) As Integer45、運(yùn)行以下程序段,輸出結(jié)果是<u> </u>。<br />Dim a(1 To 10)<br />Dim p(1 To 4)<br />k = 5<br />For i = 1 To 4<br />p(i) = i * 2<br />Next i<br />For i = 1 To 4<br />
21、k = k + p(i) * 2<br />Next i<br />Print k ( )A、48B、32C、30D、4546、當(dāng)發(fā)生Command1_Clik事件后,下列程序的執(zhí)行結(jié)果是_。<br />Private Sub Command1_Click()<br /> Dim a<br /> a = Array(1, 2, 3, 4, 5)<br /> For i = 1 To 4<br /> Print a(i) - a(i–1);<br /> Next i<br /
22、>End Sub ( )A、1 1 1 1 1B、1 1 1 1C、1 1 1D、2 2 247、以下有關(guān)Sub過程與Function過程的區(qū)別,正確的是_。 ( )A、Sub過程可以使用Call語句或直接使用過程名調(diào)用,而Function過程不可以B、Function過程可以有形參,Sub過程不能有形參C、兩種過程參數(shù)傳遞方式不同D、Sub過程沒有返回值,F(xiàn)unction過程能返回值48、<font size="2"><strong><font face="Times New Roman">在語句Public
23、Sub Sort(i As Integer)中i是一個按_傳遞的參數(shù)。</font> </strong></font> ( )A、<strong><font size="2">地址</font></strong>B、<strong><font size="2">值</font></strong>C、<strong><font size="2">變量</font><
24、/strong>D、<strong><font size="2">常量</font></strong>49、<font face="宋體" size="2"><strong>如果在被調(diào)用過程中改變了形參值,只影響副本,而不會影響實(shí)參的變量本身,這種參數(shù)傳遞方式稱為<u>        </u>傳遞。</s
25、trong></font> ( )A、<strong><font face="宋體" size="2">按值</font></strong>B、<strong><font face="宋體" size="2">按地址</font></strong>C、<strong><font face="宋體" size="2">ByRef</fo
26、nt></strong>D、<strong><font face="宋體" size="2">按形參</font></strong>50、下列定義Sub過程的語句中,正確的語句是_。 Private Sub Test(St As String * 8) Private Sub Test(Sarray( ) As String * 5) Private Sub Test(Sarray( ) As String) Private Sub Test(St As String) ( )A、B、C、
27、D、51、<font size="2"><strong>可以在窗體模塊的通用聲明段中聲明的是_。</strong></font> ( )A、<strong><font size="2">全局變量</font></strong>B、<strong><font size="2">全局常量</font></strong>C、<strong><font size="2&qu
28、ot;>全局?jǐn)?shù)組</font></strong>D、<strong><font size="2">全局用戶自定義類型</font></strong>52、窗體的Name屬性為Frm1,在窗體模塊通用聲明處和過程Sub1中分別用Public K As Integer,Dim K As Integer聲明了兩個同名變量K,則在過程Sub1中要訪問全局變量K,可采用 _。 ( )A、Frm1.KB、Form.KC、Form1.KD、K53、<font face="Times New Ro
29、man" size="2"><strong>假定已定義了一個過程Sub Add(a As Single, b As Single),則正確的調(diào)用語句是_。</strong></font> ( )A、<font face="Times New Roman" size="2"><strong>Add (12 , 12)</strong></font>B、<strong><font face="Times New
30、Roman" size="2">Call Add( 2 * x , Sin(1.57) ) </font></strong>C、<strong><font face="Times New Roman" size="2">Call Add x , y </font></strong>D、<strong><font face="Times New Roman" size="2">Call
31、Add(12 ,12, x)</font></strong>54、<font face="Times New Roman" size="2"><strong>在Cmdl_C1ick事件中有效的地址傳遞的調(diào)用語句是<u>              &
32、amp;#160;   </u> 。<br/>Public Sub Fl(n%)<br/>  <br/>  n =3*n+4<br/>  <br/>End Sub<br/>Private Sub Cmdl_Click()<br/>  Dim n%, m% <br/>  n=3 :m  =4<br/> 
33、;    <font color="#006633">'調(diào)用F1語句</font><br/>End Sub</strong></font> ( )A、<strong><font face="Times New Roman" size="2">F1 n+m </font></strong>B、<strong><font face="Times New Roma
34、n" size="2">F1 m </font></strong>C、<strong><font face="Times New Roman" size="2">F1 5 </font></strong>D、<strong><font face="Times New Roman" size="2">F1 m+5</font></strong>55、在窗體上畫一個
35、名稱Command1的命令按鈕和一個名稱為Text1的文本框,然后編寫如下程序:Private Sub Command1_Click()Dim x, y, z As Integerx = 5: y = 7: z = 0Text1.Text = ""Call p1(x, y, z)Text1.Text = Str(z)End SubPrivate Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)c = a + bEnd Sub程序運(yùn)行后,如果單擊命令按鈕,則在文本框中顯示的內(nèi)容是_。 ( )A、0B、12
36、C、Str(z)D、沒有顯示56、名為sort的Sub子過程的形式參數(shù)為一數(shù)組,以下的定義語句中正確的是_。 ( )A、Private Sub sort(A( )As Integer)B、Private Sub sort(A(10)As Integer)C、Private Sub sort(By Val A( ) As Integer)D、Private Sub sort(A( , )As Integer)57、在調(diào)用Sub過程或Function過程時,采用_傳送相應(yīng)過程的變量名、數(shù)組名、常數(shù)或表達(dá)式。 ( )A、形式參數(shù)B、實(shí)際參數(shù)C、對象參數(shù)D、數(shù)組參數(shù)58、<strong>&
37、lt;font face="Times New Roman" size="2">要從自定義對話框Form2中退出,可以在該對話框的“退出”按鈕的Click事件過程中使用的語句是<u>                  
38、    </u>。</font></strong> ( )A、<span lang="EN-US"><font face="Times New Roman" size="2"><strong>Unload Form2</strong></font> </span>B、<span lang="EN-US"><font face="
39、Times New Roman" size="2"><strong>Hide Form2</strong></font></span>C、<span lang="EN-US"><font face="Times New Roman" size="2"><strong>Unload.Form2</strong></font></span>D、<span lang="E
40、N-US"><font face="Times New Roman" size="2"><strong>Form2.Unload</strong></font></span>59、下面子過程語句說明合法的是_。 ( )A、Sub f1(ByVal n%()B、Sub f1(n%)As IntegerC、Function f1%(f1%)D、Function f1(ByVal n%)60、在多窗體的應(yīng)用程序中,當(dāng)前窗體模塊的Form_Click事件過程中包含如下語句,單擊該窗體,其
41、中_一定可以將Hello顯示在當(dāng)前窗體上。 ( )A、Forml.PrintHelloB、Me.PrintHelloC、Debug.PrintHelloD、Form2.PrintHello2、填空題(本題共計40分)1、已知A=7.5,B=2,C=-3.6,表達(dá)式 a>b and c>a or a<b and not c>b的值為_ false _.2、2Sinx+3Cosx+Tan2x+LnxLny的VB表達(dá)式為_2*sin(x)+3*cos(x)+tan(2*x)+log(x)*log(y)_3、下面程序的功能是判斷100999之間的所有素數(shù),所謂素數(shù)是指只能被1和
42、它本身整除的數(shù)。完善下列程序。Private Sub Form_Click( )Dim i As IntegerDim k As integerFor i=100 To 999For k=2 To i-1If _ i Mod k=0 _ThenExit For _End IfNext kIf _ k=I _ThenPrint iEnd IfNext iEnd Sub4、輸入任意長度的字符串,要求將字符順序倒置,例如,將輸入的"ABCDEFG"變換成"GFEDCBA"。Private Sub Command1_Click()Dim a$,i%,c$,d$a
43、=inputBox$("輸入字符串")n=_ Len(a) _For I=1 To _ n/2_c=Mid(a,I,1)Mid(a,I,1)=_ Mid(a,n-i+1)_ Mid(a,n-i+1)_=cNext iPrint aEnd Sub5、下列程序的運(yùn)行結(jié)果為_2 2_。Private Sub Command1_Click( )x = 1For k = 1 To 3If k = 1 Then a = x * xIf k<= 2 Then a = x * x+1If k >= 3 Then a = x * x+2Print a;Next kEnd Sub6、已知數(shù)組A(4,4),各個元素在運(yùn)行程序時,被賦值并打印,形成四階方陣。程序執(zhí)行后,產(chǎn)生一個轉(zhuǎn)置矩陣(即行列互換),仍放在數(shù)組A中,并打印出來。請完善下列程序。例如:1 2 3 4 ->1 1 1 11 2 3 4 ->2 2 2 21 2 3 4 ->3 3 3 31 2 3 4 ->4 4 4 4Private Sub Command1_Click( )Dim a(4,4)For k=1 To 4For j=1 To 4a(k,j)=j
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025版米廠水稻種植與電商平臺合作銷售合同4篇
- 2025年度智慧城市基礎(chǔ)設(shè)施承包安裝服務(wù)協(xié)議4篇
- 2025年度房地產(chǎn)交易會參展商服務(wù)保障協(xié)議3篇
- 2025版1A13365國際貿(mào)易實(shí)務(wù)操作手冊授權(quán)合同3篇
- 2024-2030年中國耐磨陶瓷涂料行業(yè)市場深度分析及發(fā)展趨勢預(yù)測報告
- 二零二五版海外科技園區(qū)勞務(wù)派遣與研發(fā)支持協(xié)議2篇
- 2025年房屋代持合同樣本與資產(chǎn)評估協(xié)議4篇
- 個性化私人借貸合同(2024版)版B版
- 2025版國家級屠宰場高品質(zhì)牛肉供貨合同范本下載3篇
- 2025年離職后研發(fā)成果保密及競業(yè)限制協(xié)議
- 中國成人暴發(fā)性心肌炎診斷和治療指南(2023版)解讀
- 新生兒低血糖課件
- 自動上下料機(jī)械手的設(shè)計研究
- 電化學(xué)儲能電站安全規(guī)程
- 幼兒園學(xué)習(xí)使用人民幣教案教案
- 2023年浙江省紹興市中考科學(xué)真題(解析版)
- 語言學(xué)概論全套教學(xué)課件
- 大數(shù)據(jù)與人工智能概論
- 《史記》上冊注音版
- 2018年湖北省武漢市中考數(shù)學(xué)試卷含解析
- 《腎臟的結(jié)構(gòu)和功能》課件
評論
0/150
提交評論