vb大題上機(jī)總結(jié)

《vb大題上機(jī)總結(jié)》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在學(xué)術(shù)論文-天天文庫。

1、在考生文件夾下有一個工程文件sj44.vbp（扣應(yīng)的窗體文件名為sj44.frm）,賦:功能是通過調(diào)用過程Sort將數(shù)織按降序H序，訪裝入該文忭。程序運行后，在四個文本框中各嫩入一個整數(shù)〈如圖1所示），然后單擊命令按鈕，即可使數(shù)組按降序摶序，并在文本樞屮顯示出來（如閣2所示〉。這個程序不完瘀，W把它補(bǔ)充完糧.并能:1卜:確運行，要求:去掉稈序中的注釋符，把柺序中的？改為正碥的內(nèi)祥，使其實現(xiàn)上述功能，但不能修改程序屮的邡他部分。敁后把修改后的文件按原文件名存盤。圖2本題的考査的是數(shù)組的應(yīng)用,通過調(diào)用過程Sort將數(shù)組按降序祥序,UboundO函數(shù)是用來獲得數(shù)組的上界,Lboi

2、mdO函數(shù)是獲得數(shù)組的下界，打開工程文件sjt4.vbp和相應(yīng)的窗體文件名為幻13.frin,在代碼府口屮補(bǔ)充如下代碼：PrivateSubSort(a()AsInteger)DimStartAsInteger,FinishAsIntegerDimiAsInteger,jAsInteger,tAsIntegerStart=LBound(a)Finish=UBound(a)Pori=FinishTo2Step-1Forj=1ToFinish-1Tfa(j>=tEndIfNextjNexti(調(diào)換)KndSub

3、按耍求保存文件即完成本題。氺*木氺本氺傘*木本*氺本氺**?木氺*氺**?本**本氺*窣*木本*氺本氺氺本氺氺傘氺*本氺*本氺*木氺*氺本木辛氺氺本?本?本氺本氺木本*氺氺*氺在考生文件夾下有一個工權(quán)文件sj54.vbp.說體中已經(jīng)給出了所苻控件，如網(wǎng)1所示，其功能是：單擊“顯示”命令按鈕.則把考生文件夾下的incd5.txt文件中的所介英文字符放入Textl（可多行姑示〉，如閣2所示；如果黽擊“統(tǒng)計”命令按鈕，則統(tǒng)汁文本框屮7?母A、B、C、D各自出現(xiàn)的次數(shù)，并把結(jié)果在文本框中掹示出來，如閣3所示；如澩中.缶“保存”命令按鈕，則把統(tǒng)計結(jié)采存入考生文件夾下的outcd5.t

4、xt文件中。文件中已給出了“顯示”和“保存”按鈕的Click事件過程*話編寫“統(tǒng)計”按鈕的Click事件過程，（pl29）要求：1）統(tǒng)汁毎個字母出現(xiàn)的次數(shù)時，不區(qū)分大小寫，2）統(tǒng)計后的甸個字付的次數(shù)必須存入考生文件夾下的ouud5.txt文件中，否則沒有成亂在文件中的格式為：字母A出現(xiàn)的次數(shù)為xx字母B出現(xiàn)的次數(shù)為xx字母C出現(xiàn)的次數(shù)為xx字埒I）出現(xiàn)的次數(shù)為XX注?。翰荒苄薷囊呀?jīng)給出的程序部分：在結(jié)來裎序運行之前，必須啦擊“保存”按鈕，把結(jié)果存入outcd5.txt文件.荇則無成績。遜后把修改后的文件按股文件名存盌。Wi閣2PrivateSubCommand1Click0

5、Open*in5.txt*ForInputAs#1DoWhileNotE()F(1)Inputa$s=s&打開的文件數(shù)據(jù)放入變量中，數(shù)組｝LoopClose1Textl.Text=sEndSubPrivateSubCoromand2Click()1)Fori=1ToLen(Textl.Text)SelectCaseMidS(Textl.Text,i,a+1b+1c+1d+1CaseY,'V:aCase"b","B":bCasec,C:cCase"d’，▼!)*:(!EndSelectNextiTextl.Text=”字母A出現(xiàn)的次數(shù)為"&Format(a,DTextl.Te

6、xt=Textl.Text&vbCrLf&#字母B出現(xiàn)的次數(shù)為"&Format(b,"00")Textl.Text=Textl.Text&vbCrLf&#字母C出現(xiàn)的次數(shù)為〃&Format(c,"00")Textl.Text=Textl.TexttvbCrLf&M字母D出現(xiàn)的次數(shù)為"&Format(d,*00")EndSubPrivateSubCoirmand3ClickOOpen*out5.txt*ForOutputAs#1PrintSI,Text1.TextClose1EndSub冰本本氺本本本氺本本木氺本冰氺本冰本本本本本氺水本冰水木氺氺本冰本本本本本氺本本氺本本氺氺

7、本冰水本本冰本本冰本本氺水本氺水氺本氺氺本氺本冰*本（2）在名稱為Porml的窗體上畫一個名稱Shapel的形狀控件，在屬性窗口中將其設(shè)累為圓形。畫一個名稱為Listl的列表框，并在屬性窗口中設(shè)?列表瑙的值分別為1、2、3、4、5,將窗體的標(biāo)題設(shè)為'圖形控件'維擊列表框中的某一項，則將所選的值作為形狀控件的填充參數(shù)。例如，選擇3,則形狀控件中被豎線填充，如圖所示。要求??程序中不得使甩變螢，母個率件過程中只能寫~條講句。存盤時必須存放在考生文件夾下，工程文件名為sjl07.vbp.讜體文件名為sjl07.fnn。S