vb程序設(shè)計語復(fù)習(xí)版_第1頁
已閱讀1頁,還剩5頁未讀, 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、1、在“考生”文件夾下有一個工程文件ITAT21.vbp,窗體上有兩個列表框,名稱分別為List1、List2,在List2中已經(jīng)預(yù)設(shè)了內(nèi)容;還有兩個命令按鈕,名稱分別為C1、C2,標(biāo)題分別為“添加”、“清除”,如下圖所示。程序的功能是在運(yùn)行時,如果選中右邊列表框中的一個列表項,單擊“添加”按鈕,則把該項移到左邊的列表框中;若選中左邊列表框中的一個列表項,單擊“清除”按鈕,則把該項移回右邊的列表框中。文件中已經(jīng)給出了所有控件和程序,但程

2、序不完整,請去掉程序中的注釋符,把程序中的“?”改為正確的內(nèi)容,但不能修改程序中的其他部分,也不能修改控件的屬性。最后把修改后的文件按原文件名存盤并提交。PrivateSubC1_Click()DimkAsIntegerk=0While(kList2.ListCount)IfList2.ed(k)=TrueThenList1.AddItemList2.TextList2.RemoveItemkEndIfk=k1WendEndSubPri

3、vateSubC2_Click()List2.AddItemList1.TextList1.RemoveItemList1.ListIndexEndSub2在“考生”文件夾中有一個工程文件ITAT21.vbp。程序的功能是通過鍵盤向文本框中輸入大、小字母及數(shù)字。單擊標(biāo)題為“統(tǒng)計”的命令按鈕,分別統(tǒng)計輸入字符串中的大寫、小寫字母及數(shù)字字符的個數(shù),并將統(tǒng)計結(jié)果分別顯示在標(biāo)簽控件數(shù)組x中,如圖所示。不得修改已經(jīng)存在的程序,最后把修改后的文件按

4、原文件名存盤。PrivateSubComm1_Click()DimnAsIntegerDimbAsIntegerDima(3)AsIntegers=RTrim(Text1.Text)n=Len(Text1.Text)Fi=1Tonb=((si1))CasebCase48To57a(0)=a(0)1Case65To90a(1)=a(1)1Case97To122a(2)=a(2)1EndNextFi=0To2x(i)=a(i)NextEnd

5、Sub3在“考生”文件夾下有一個工程文件ITAT22.vbp。窗體上的控件已經(jīng)設(shè)計完畢(不需修改它們的任何屬性),程序運(yùn)行后,如果單擊“變化”命令按鈕,則形狀控件shape1每隔1.5秒在形狀控件的6種形狀間作隨機(jī)變化(提示:使用隨機(jī)整數(shù)生成器),同時這6種形狀的名稱顯示在列表框中,下圖表示了它的變化。提供的窗體文件可以實現(xiàn)上述功能,但這個程序不完整,請補(bǔ)充。要求:把程序中的“?”改為適當(dāng)?shù)膬?nèi)容,使其正確運(yùn)行,注意:不得修改已經(jīng)存在的程

6、序,最后把修改后的文件按原文件名存盤并提交。PrivateSubComm1_Click()Timer1.Enabled=TrueEndSubPrivateSubTimer1_Timer()DimnAsIntegern=Int(Rnd6)List1.ed(n)=TrueShape1.Shape=nEndSub4編寫程序,完成以下功能:(1)利用窗體的Load事件,預(yù)先把兩位整數(shù)11、22、33、44、55、66、77、88、99依次存入a

7、數(shù)組中并顯示在文本框Text1中,界面設(shè)計如圖(a)所示;(2)運(yùn)行程序,單擊“插入”按鈕,會彈出一個輸入框(如圖(b)所示),由用戶輸入一個兩位整數(shù)并確定后,該整數(shù)被插入到數(shù)組的適當(dāng)位置,數(shù)組依然保持升序(從小到大次序)排列,并顯示在文本框Text2;(3)窗體文件保存為ITAT31.frm,工程文件保存為ITAT31.vbp,將所有文件壓縮并命名為“SF.rar”后提交。(a)(b)Dima(1To10)AsIntegerPriva

8、teSubComm1_Click()DimiAsInteger4.題干:下列關(guān)于Function過程的說法錯誤的是(C)。A聲明一個Function過程必須說明返回值的類型B在退出Function過程前必須設(shè)置返回值C因為Function過程有返回值,所以只能在表達(dá)式中調(diào)用,以將返回值賦給一個變量D可以使用Call語句調(diào)用Function過程11題干:退出F循環(huán)可使用的語句為(EndF)。12題干:窗體的標(biāo)題欄顯示內(nèi)容由窗體對象的(Ca

9、ption)屬性決定。13題干:若要向列表框添加列表項,可使用的方法是(AddItem)。14題干:關(guān)于過程的參數(shù)下列說法錯誤的是(D)。ASub過程和Function過程都可以有參數(shù)B可以使用Optional關(guān)鍵字聲明可選參數(shù)C如果指定了可選參數(shù),則參數(shù)表中此參數(shù)后面的其他參數(shù)也必是可選的D如果指定了可選參數(shù),則參數(shù)表中此參數(shù)后面的其他可選參數(shù)可不用再用Optional聲明15題干:下列關(guān)于VB中的過程控制的說法中錯誤的是(C)。A轉(zhuǎn)

10、支結(jié)構(gòu)可以使用Goto語句和Gosub語句BCase是一種條件結(jié)構(gòu)C如同C語言一樣,Case中各case子句都要有break語句D轉(zhuǎn)支結(jié)構(gòu)的一個重要用途是出錯處理,利用OnErrGoto語句16題干:在窗體上畫一個名稱為Comm1的命令按鈕,然后編寫如下程序PrivateSubComm1_Click()StaticXAsIntegerStaticYAsIntegerClsY=lY=Y5X=5XPrintX,YEndSub程序運(yùn)行時,單擊

11、三次命令按鈕Comm1后,窗體上顯示的結(jié)果為(B)。A1516B156C1515D5617題干:執(zhí)行以下程序后輸出的是(C)。PrivateSubComm1_Click()Ch$=”AABCDEFGH”Print(Right(ch$6)Len(left(ch$4))2)EndSubACDEFGHBABCDCFGDAB18題干:為達(dá)到把a(bǔ)、b中的值交換后輸出的目的,編程如下:PrivateSubComm1_Click()a%=10:b%=

12、20Callswap(ab)PrintabEndSubPrivateSubswap(ByValaAsIntegerByValbAsInteger)c=a:a=b:b=cEndSub在運(yùn)行時發(fā)現(xiàn)輸出結(jié)果錯了,需要修改。下面列出的錯誤原因和修改方案中正確的是(C)。A調(diào)用swap過程的語句錯誤,應(yīng)改為CallswapabB輸出語句錯誤,應(yīng)改為:Print”a””b”C過程的形式參數(shù)有錯,應(yīng)改為:swap(ByRefaAsIntegerByR

13、efbAsInteger)Dswap中3條賦值語句的順序是錯誤的,應(yīng)改為a=b:b=c:c=a19.題干:下列可獲得當(dāng)前系統(tǒng)日期的函數(shù)是(Date())。20題干:下列程序是用來計算并輸出7!(7的階乘)的值:PrivateSubComm1_Click()t=0Fk=7To2Step1t=tkNextPrinttEndSub執(zhí)行程序時,發(fā)現(xiàn)結(jié)果是錯誤的,下面能夠得到正確結(jié)果的修改方案是(把t=0改為t=1)。21題干:VB中可用(Msg

14、Box)語句產(chǎn)生消息框。22題干:下列不屬于VB程序合法的變量名的有(bc)。A:ab7B:7abc:IfD:abc23題干:下列有關(guān)VB中的變量命名規(guī)則,說法正確的有(bcd)。A:一個變量名的長度沒有限制B:變量名的第一個字符必須是字母C:變量名可以由字母,數(shù)字和下劃線組成D:VB中的保留字不能用作變量名24題干:剛建立一個新的標(biāo)準(zhǔn)EXE工程后,在工具箱中默認(rèn)出現(xiàn)的控件有(ABD)。A單選按鈕B圖片框C通用對話框D文本框25題干:下

15、列屬于VB程序的界面接口的有(AB)。A窗體B多文檔窗體C模塊D類模塊26題干:在VB中,為了定義變量的作用域,可以使用的變量范圍說明符有(AD)。APublicBAbstractCProtectedDPrivate27題干:在VB中檢查變量類型通常使用的函數(shù)有(BC)。ATypeOfBVarTypeCTypeNameDVarTypeOf28在“考生”文件夾下有一個工程文件ITAT21.vbp,在窗體上有一個命令按鈕(其名稱為Comm1

溫馨提示

  • 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. 眾賞文庫僅提供信息存儲空間,僅對用戶上傳內(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)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論