可視化程序設(shè)計(jì)(VB)模擬題1

、單項(xiàng)選擇題：（每小題2分，共24分）1、下列哪個(gè)符號(hào)能作為VB中的變量名（ ）。A、AB7B、7ABrC、IFD、A[B]72、“X是小于100的非負(fù)數(shù)”，用VB表達(dá)式表示正確的是（ ）。A、0<x<100B、0<=X<100C、0<XORX<100D、0<=XANDX<1003、數(shù)學(xué)式子Sin25°寫成VB表達(dá)式是( )。A、Sin25B、Sin(25°)C、Sin(25)D、Sin(25*3.14/180)4、下列哪組語句可以將變量A、B的值互換（ ）。A、A=B：B=AB、A=C：C=B：B=AA=A+B：B=A—B：A=A—BA=(A+B)/2：B=(A=B)/2

5、函數(shù)Int(Rnd(0)*10)是在哪個(gè)范圍內(nèi)的整數(shù)( )。(0,1)(1,0)(0,10)(1,9)6、一個(gè)對(duì)象可以執(zhí)行的動(dòng)作和可被對(duì)象識(shí)別的動(dòng)作分別稱為( )。A、事件、方法B、方法、事件C、屬性、方法D、過程、事件7、在窗體Form1的Click事件過程中有以下語句：Labell.Caption="歡迎使用VB”該語句執(zhí)行后標(biāo)簽控制的名稱屬性和Caption屬性取值分別為( )。A、Label，歡迎使用VBB、Label1，歡迎使用VBrC、Label1，CaptionD、Label1，Label18、在調(diào)用過程時(shí)，下述說明正確的是( )。A、只能使用Call語句用Sub過程B、調(diào)用Sub過程時(shí)，實(shí)參必須用括號(hào)括起來C、在表達(dá)式中調(diào)用Function過程時(shí)可以不用括號(hào)把實(shí)參括起來D、Function過程也可使用Call調(diào)用9、設(shè)S1、S2均為字符串變量，S1="VisualBasic”S2=“b”，則下面關(guān)系表達(dá)式中結(jié)果為True的是（ ）。A、A、len(S2)>len(S1)Chr(66)&Right(SI,4)="Basic”Left(S1,Left(S1,8)<S2Mid(S1,8,1)>S210、下面哪個(gè)關(guān)鍵字是將光標(biāo)設(shè)置到指定的文本框上（ ）。A、TextrB、NameselectrSetFocus11、在用菜單編輯器設(shè)計(jì)菜單時(shí)，必須輸入的項(xiàng)有（A、快捷鍵B、標(biāo)題C、索引D、名稱）為單位指定Timer事件之間的時(shí)間間隔。12、定時(shí)器的）為單位指定Timer事件之間的時(shí)間間隔。A、分B、秒C、毫秒D、微秒重置、填空題：（每空1分，共26分）1、1、VB程序執(zhí)行的基本方法是由來驅(qū)動(dòng)子程序的運(yùn)行。2、開發(fā)一個(gè)VB使用程序的步驟分別是3、在VB程序中，工程項(xiàng)目文件的擴(kuò)展名為3、在VB程序中，工程項(xiàng)目文件的擴(kuò)展名為，窗體文件的擴(kuò)展名為，模塊文件的擴(kuò)展名為，用戶控件文件的擴(kuò)展名為執(zhí)行文件的擴(kuò)展名為4、4、VB程序中，變量的作用域是指根據(jù)作用域的不同將變量分為5、VB中，常用的兩種說明變量類型的聲明語句是 1和6、VB中，用于處理文字信息的輸入和顯示信息的控件分別是用于處理圖形信息的控件分別是用于處理圖形信息的控件分別是7、VB中，在預(yù)定對(duì)話框里有兩種對(duì)話框分別稱為 1和它們所用函數(shù)分別為 1和一個(gè)多文檔界面的使用程序可以包含三類窗體分別是三、閱讀程序，寫出結(jié)果：（每小題6分，共30分）1、執(zhí)行下面的程序，單擊窗體后在窗體上顯示的三行結(jié)果。PrivateSubForm_Click()DimAstr,Astrl,Astr2AsStringAstr1="B"ForI=1To3Astr2=LCase(Astr1)Astr1=Astr1&Astr2Astr=Astr&Astr1PrintAstrAstr1=Chr(Asc(Astr1)+1)NextIEndSubill2、下面程序的功能是什么？PrivateSubCommandl_Click()S1=0:S2=0M1=0:M2=0N=1DowhileN<=100A=INT(101*RND)Ifamod2=0THENS1=S1+A:M1=M1+1ElseS2=S2+A:M2=M2+1EndifN=N+1LoopPrintS1,S2PrintM1,M2ENDSub3、下面程序的功能是什么？PrivateSubCommand1_Click()DimNAsInteger,IAsInteger,jAslong,SAslongN=Val(Text1.Text)J=0：S=0ForI=1TonJ=J+I：S=S+JNextILabel3.Caption=Str$(S)ENDSub4、執(zhí)行下面的程序，單擊命令按鈕Commandl后在窗體上顯示的圖形功能是什么？PrivateSubCommand1_Click()ClsPrintForn=1To8PrintTab(2*n+2);Form=1To8PrintSpc(1);"*";NextmPrintNextnEndSub5、下面程序的功能是什么？PrivateSubForm_Click()DimaAsIntegerDimbAsIntegerDimcAsIntegerDimsAsLongDimtotAsLonga=10b=6c=4Callfact(a,tot)s=totCallfact(b,tot)s=s/totCallfact(c,tot)s=s/totPrinta;"!/";b;"!/";c;"!=";sEndSubSubfact(mAsInteger,totalAsLong)DimIAsIntegertotal=1ForI=1Tomtotal=total*INextIEndSub/I /四、程序設(shè)計(jì)：（每小題10分，共20分）1、編寫程序：利用文本框檢查用戶口令，而且使用靜態(tài)變量來限制輸入口令的次數(shù)。界面如下圖所示：2、編寫程序：設(shè)計(jì)一個(gè)計(jì)時(shí)器，能夠設(shè)置倒計(jì)時(shí)的時(shí)間，并進(jìn)行倒計(jì)時(shí)。界面如圖所示：

4 /I參考答案I、單項(xiàng)選擇題（每小題2分，共24分）123456789101112ADDCCBBDBDDC、填空題（每空1分，共26分）1、事件2、設(shè)計(jì)用戶界面；設(shè)置屬性；編寫事件過程代碼；運(yùn)行3、?VBP；?FRM；?BAS；?CLS；?EXE4、變量的有效范圍；全局變量和局部變量5、Dim變量名（as數(shù)據(jù)類型）和static變量名（as數(shù)據(jù)類型）6、文本框；標(biāo)簽框；圖片框；圖像框7、消息框；輸入對(duì)話框；Msgbox；Inputbox函數(shù)

8、MDI父窗體（MDI窗體，即主窗體）；MDI子窗體8、MDI父窗體（MDI窗體，稱標(biāo)準(zhǔn)窗體）三、閱讀程序，寫出結(jié)果：（每小題6分，共30分）1、程序運(yùn)行后，窗體上顯示的結(jié)果為：第一行結(jié)果：Bb；第二行：BbCc；第三行結(jié)果：BbCcDd。2、程序的功能是：找出101間能被2整除的隨機(jī)數(shù)并且累加出和。3、程序的功能是：分兩重循環(huán)，內(nèi)循環(huán)求1-N的累加，外循環(huán)求內(nèi)循環(huán)的每次累加結(jié)果的形式：S=1+（1+2）+（1+2+3）+…+（1+2+3+…+n）4、顯示的圖形為：由“*”號(hào)組成的平行四邊形。5、程序的功能是：^=^-=210利用子程序計(jì)算階乘為： 6!*四、程序設(shè)計(jì)：（每小題10分，共20分）1、編寫文本框Text1的KeyPress事件代碼：PrivateSubText1_KeyPress（KeyAsciiAsInteger）StaticnAsIntegerIfKeyAscii=13ThenIfLCase(Text1.Text)="longxb"ThenLabel1.Caption="歡迎使用本系統(tǒng)"Elsen=n+1Ifn=3ThenLabel1.Caption="對(duì)不起，您無權(quán)使用Text1.Enabled=FalseElseLabel1.Caption="對(duì)不起，口令錯(cuò)"Text1.SelStart=0Text1.SelLength=Len(Text1.Text)EndIfEndIfEndIfEndSub2、程序代碼如下：PrivateSubCommand1_Click()Timer1.Enabled=TrueTimer1.Tag=Text1.Text*60Frame1.Caption="現(xiàn)在開始倒計(jì)時(shí)”EndSubPrivateSubTimer1Timer()

Timeri.Tag=Timer1.Tag-1Ifm<0ThenTimeri.Enabler=FalseMsgBox“預(yù)定的