VB復習資料編程題

四、編程題題號 題干編寫一個程序，程序運行后的初始界面如所示。當用戶在文本框輸入姓名，例如輸入“張三”，單擊“確定”按紐，則程序的運行情況如圖所示。單擊“進入”按紐，則結(jié)束程序運行。2

編寫一個程序，在屏幕上顯示“你好，VisualBasic系統(tǒng)”，字體大小設(shè)為12磅、顏色為紅色，如圖所示。單擊窗體后，在窗體上顯示“初次見面，請多關(guān)照！”，同時窗體上出現(xiàn)兩個命令按紐“繼續(xù)”和“結(jié)束”，如圖所示。如果單擊“繼續(xù)”按紐，則又回到開始運行狀態(tài)；單擊“結(jié)束”按紐，則在文本框（text1）輸入一個三位數(shù)，單擊窗體后，在窗體上打印輸出該數(shù)的3個位數(shù)、十位數(shù)和百位數(shù)。編寫一個程序，單擊窗體后，在窗體上隨機位置，隨機輸出一個大寫的英文字4母利用InputBox輸入圓的半徑，計算并顯示圓的面積。公式為：圓的面積 =∏5*r*r。在窗體上放一個標簽Label1,一個命令按紐Command1，當窗體啟動時使標簽居于窗體的中間，并顯示系統(tǒng)的當前時間，命令按紐顯示為“放大”，當單擊6命令按紐時，將標簽中顯示文字放大1~3倍（隨機確定），并重新顯示系統(tǒng)的當前時間。編寫一個華氏溫度與攝氏溫度的轉(zhuǎn)換程序，效果如所示。轉(zhuǎn)換公式為：7F=9/5*C+32,C=5/9*(F-32) 。編寫一個模擬袖珍計算器的程序，運行界面圖圖如所示。使用InputBox輸入一個數(shù)，判斷這個數(shù)的奇偶性。使用InputBox輸入一個字符，判斷你輸入的字符的種類。編寫一個程序，輸入a，b，c三個數(shù)，要求按由大到小的順序把它們打印出來。輸入一個數(shù)字(0~6)，用中英文顯示星期幾。當輸入數(shù)字 0后，運行后界面設(shè)12計如圖所示。設(shè)A.將兩個文本框的對齊方式設(shè)置為右對齊，最多接受 3個字符。單擊“健康狀況”按鈕后，根據(jù)計算公式將相應的提示信息通過標簽顯示13C.計算公式：標準體重=身高-105提示信息：高于標準體重1.1倍為偏胖；低高于標準體重0.9倍為偏瘦；其余為正常。編寫一個程序計算，若基本工資大于等于 600元，增加工資20%；若小于600元大于等于400元，則增加工資15%；若小于400元則增加工資10%。請根據(jù)用戶輸入的基本工資，計算出增加后的工資。界面設(shè)計自定。Page1四、編程題題號 題干設(shè)計一個字符大小寫轉(zhuǎn)換程序，程序運行界面如圖所示。當在文本框 Text1中輸入大寫字母，在文本框 Text2中同時顯示其小寫字母；當在文本框 Text1中15輸入小寫字母，在文本框Text2中同時顯示其大寫字母；當輸入其它字符，則在文本框Text2中原樣輸出。求自然數(shù)N的階乘計算一個3位數(shù)組成水仙花的個數(shù)（一個數(shù)的各位的立方和等于這個數(shù)本身的數(shù)）。運行界面設(shè)計：使用一個Picture框，如圖所示。18 求sin(x)=x-x^3/3!+x^5/5!-x^7/7!+ ，使精度達到10-5。我國古代數(shù)學家張丘建在“算經(jīng)”里提出一個世界數(shù)學史上有名的百雞問題：雞翁一，值錢五，雞母一，值錢三，雞雛二，值錢一，百錢買百雞，問雞翁、母、雛各幾何？請編寫一程序。設(shè)計程序，求s=1+(1+2)+(l+2+3)++(1+2+3++n)的值在編輯框中輸出100~1000之間能被37整除的數(shù)。編寫一程序。有一根100米長的線段，每天剪掉一半，一直剪到小于0.1為止，請問幾天后可剪完。編程序打印由數(shù)字組成的如圖所示的金字塔圖案。輸入整數(shù)n，則顯示出具有n行的楊輝三角形,運行界面設(shè)計如圖所示。分析：解決此題所用方法的要點是：定義一個二維數(shù)組 A，在該數(shù)組中，每—行的第24一個元素和最后一個元素都為1，其余各元素等于它上面一行的同一列和前—列數(shù)據(jù)之和。編一個程序，隨機產(chǎn)生一個 5*5矩陣，打印并輸出5*5方陣中的下三角和上三25角元素。建立一個輸入界面，完成田徑比賽報名的錄入功能。選擇最合適的控件輸入班級、姓名、性別、組別、項目信息。使用自定義類型將輸入的內(nèi)容保存在數(shù)組中，程序運行界面如圖所示。隨機產(chǎn)生10個任意的二位正整數(shù)存放在一維數(shù)組中，求數(shù)組的最大值、平均值、能實現(xiàn)將數(shù)據(jù)按升序排列，并且使用InputBox函數(shù)插入一個新數(shù)據(jù)使數(shù)組仍然升序排列，結(jié)果顯示在圖片框中，程序運行情況如圖所示。用隨機函數(shù)產(chǎn)生50個10~100之間的整數(shù)，并按升序且每行 10個數(shù)打印輸出到28窗體上。利用隨機數(shù)生成兩個3*3矩陣（數(shù)據(jù)不一定相同，前者元素取值范圍 30~70、前者元素取值范圍101~135）。要求：在Form_Load事件過程中對A、B數(shù)組生29成隨機數(shù)；將兩個矩陣A、B相加，結(jié)果放入矩陣C中。程序運行界面自行設(shè)計利用隨機數(shù)生成4*3矩陣A（數(shù)據(jù)不相同，元素取值范圍 20~70），將矩陣A轉(zhuǎn)30置。程序運行界面自行設(shè)計。利用隨機數(shù)生成一個5*5矩陣C、前者輸入決定。要求：找出矩陣 C最大值和下31標。程序運行界面自行設(shè)計。Page2四、編程題題號題干利用隨機數(shù)生成兩個4*4矩陣（前者元素取值范圍30~70、前者元素取值范圍32101~138）。要求：在Form_Load事件過程中對A、B數(shù)組生成隨機數(shù)；在list1框中以下三角形式顯示矩陣A、上三角形式顯示矩陣B。程序運行界面自行設(shè)計。利用隨機數(shù)生成4*6矩陣A（數(shù)據(jù)為兩位數(shù)整數(shù)）。要求：在list1框中矩陣33A，將矩陣A的第一行與第三行對應元素交換位置，結(jié)果在list2框中顯示。程34利用隨機數(shù)生成5*5矩陣A（數(shù)據(jù)為兩位數(shù)整數(shù)）。要求：在list1框中矩陣A，求矩陣A兩條對角線元素之和，結(jié)果在exit1框中顯示。35利用隨機數(shù)生成5*5矩陣A（數(shù)據(jù)為兩位數(shù)整數(shù)）。要求：在list1框中矩陣A，將矩陣A按列轉(zhuǎn)換成一維數(shù)組，結(jié)果在exit1框中顯示。?隨機產(chǎn)生10個1~100的正整數(shù)方入數(shù)組，在Form中顯示產(chǎn)生的數(shù)，并求出最大36值、最小值、平均值。運行界面設(shè)計如圖所示。編一個程序，隨機產(chǎn)生100個整數(shù)，放入數(shù)組a中。將其中的偶數(shù)放入數(shù)組b37 中，然后運用選擇發(fā)將數(shù)組b中的數(shù)據(jù)從大到小的順序進行排序，并將數(shù)組b以每行10個數(shù)據(jù)在窗體上輸出。在一維數(shù)組中利用元素移位的方法顯示如圖所示的結(jié)果。編制程序，用隨機函數(shù)產(chǎn)生20個兩位數(shù)的整數(shù)，存于4行5列的二維數(shù)組中，將數(shù)組按行（矩陣形式）輸出到窗體，并求出其中的最大元素及它的行、列坐標。規(guī)范整理英語文章，即對輸入的任意大小寫英語文章進行整理。要求：句子開頭應為大寫字母（句子以符號 "？"、"."和"！"作為結(jié)束符的），其它都是40提示：設(shè)置一個變量，存放當前處理字符的前一個字符，來判斷前一字符是否為句子結(jié)束符。編一使用子過程的程序，子過程的作用為交換兩個整型變量值，如圖所示。分別編寫計算下列級數(shù)的子過程和函數(shù)過程，并在窗體的作用單擊事件中調(diào)42級數(shù)為：s=x/2!+x^3/4!+ +x^(2*n-1)/(2*n)!要求精度為：abs(x^n/(2*n)!<10^(-6)編寫函數(shù)過程max，求數(shù)組中最大值。按command命令按鈕，使用隨機函數(shù)產(chǎn)43生10~100之間的10個隨機數(shù)給數(shù)組賦初值，然后調(diào)用 max，輸出最大值。Page3四、編程題題號 題干輸入一系列字符串，按升序排列輸出。程序運行后的窗體界面如圖所示。要a.按回車鍵后即把該字符串存放到數(shù)組中，并輸出在排序前的文本框 text2中B.單擊“排序”命令按紐，字符數(shù)組“升序”排序，并在排序后的文本框text3中輸出。a.定義窗體級字符型動態(tài)數(shù)組 s和整型變量n（表示輸入字符串的個數(shù)），即44文在本框text1的KeyPress事件中編寫程序處理單詞，并存入數(shù)組中，同時PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimIAsInteger,jAsInteger,kAsInteger,tAsStringIfKeyAscii=13Then...EndIfEndSub編寫一個子過程用于判斷給定的任意正整數(shù)是否是素數(shù)，并在“調(diào)用子過程”45按鈕中編寫調(diào)用語句。如圖所示。編寫一求平均值的函數(shù)aver(x,y) 。主調(diào)程序調(diào)用函數(shù)過程求平均值并輸出46。如圖所示。編寫一子過程DeleStr(s1,s2)，將字符串s1中出現(xiàn)s2子字符串刪去，結(jié)果存放在s1中。在源字符串中輸入任意字符串，在要刪除的字符串中輸入欲刪除47的子字符串，單擊“刪子字符串”按鈕，調(diào)用DeleStr(s1,s2)，將結(jié)果在結(jié)果框中顯示。如圖所示。編一子過程ProcMin，求一維數(shù)組a中的最小值，子過程的形參自己確定。主調(diào)程序隨機產(chǎn)生10個-300~-400之間的整數(shù)，調(diào)用ProcMin子過程，顯示最小值。運行界面設(shè)計如圖所示。注意：本題的形參應有兩個，一個是數(shù)組，另一個是求得的數(shù)組的最小值，它們是"值傳遞"還是"地址傳遞"呢？它們都應該是傳地址的方式。設(shè)計一個小學生做的算術(shù)練習程序。計算機連續(xù)地隨機給出兩位數(shù)內(nèi)的算術(shù)題，要求學生回答，答對的打 "√"，答錯的打"×"。將做過的題目存放在列49表框中備查，并隨時根據(jù)學生的答案判斷正確與否，并給出成績，單擊“結(jié)束”命令按鈕，退出應用程序。程序運行界面設(shè)計如圖所示。統(tǒng)計在一個文本框內(nèi)各英文字母出現(xiàn)的次數(shù)（不區(qū)分大小寫），并按英文字母的先后順序輸出各個字符與其對應的出現(xiàn)次數(shù)，要求將統(tǒng)計各字母出現(xiàn)次數(shù)的50自定義統(tǒng)計過程CharCount，個形參定義如下，其中，str1為被統(tǒng)計文本，數(shù)組a存放各個字符出現(xiàn)次數(shù)。SubCharCount(str1asstring,a()asinteger)Page4四、編程題題號 題干編一函數(shù)過程IsH(n)，對于已知正整數(shù)n，判斷該數(shù)是否是回文數(shù)，函數(shù)的返回值類型為布爾型。主調(diào)程序每輸入一個數(shù)，調(diào)用IsH函數(shù)過程，然后在圖形框顯示輸入的數(shù)，對于是回文數(shù)顯示一個“★”。運行界面設(shè)計如圖 8-3所示51分析：判斷回文數(shù)的方法是，將一個數(shù)字串從兩頭往中間逐對比較，只要有一對不相同，該數(shù)就不是回文數(shù)，全部比較過，都相同，就是回文數(shù)。應用滾動條控制顏色。通過3個滾動條分別控制3個文本框紅綠藍的背景顏色，并進而控制由這3色組成的混合色。表示顏色的文本框分別為TxtRed、52TxtGreen、TxtBlue和TxtColor；3個滾動條為VSbRed、VsbGreen和VsbBlue。為了控制顏色，還需要利用 RGB函數(shù)。設(shè)計一個秒表程序。程序運行界面設(shè)計如圖所示。編寫一程序，在窗體上畫兩個標簽，其名稱分別為Label1和Label2,Caption屬性分別為“數(shù)值”及空白；然后畫一個名稱為Hscoll1的水平滾動條，其54中：Min的值為0，Max的值為100。程序運行后，如果單擊滾動條兩端的箭頭，則在標簽Lable2中顯示滾動條的值，運行界面設(shè)計如圖所示。編制一程序，要求輸入成績計算某個學生獎學金的等級，以三門功課成績M1,M2,M3為評獎依據(jù)。運行界面設(shè)計如圖所示。評獎標準如下：一等獎: 符合下列條件之一的可獲一等獎：1) 平均分大于95分者。2) 有兩門成績是100分，且第三門功課成績不低于 80分者。55二等獎: 符合下列條件之一的可獲二等獎：1) 平均分大于90分者。2) 有一門成績是100分，且另兩門功課成績不低于 75分者。三等獎: 各門功課成績不低于70分者。符合條件者就高不就低，只能獲得高的那一項獎學金。設(shè)計一“偶數(shù)遷移”程序，使用兩個列表框list1、list2，兩個命令按鈕，單擊“產(chǎn)生”時，計算機隨機產(chǎn)生10個兩位正整數(shù)放入list1內(nèi)，單擊“遷移56”時，先清空list2，再將list1內(nèi)的偶數(shù)遷移至list2。運行界面設(shè)計如圖所示。設(shè)a.根據(jù)選項中選擇的家電及數(shù)量，單擊 "確定"后，將選擇的清單及總價在列b.每選擇一種家電，光標自動定位在相應的文本框中，取消選擇時，相應的"清除"按鈕用于清空列表框中的項目。所有文本框只接受數(shù)字。Page5四、編程題題號 題干設(shè)a.設(shè)計兩個定時器，Timer1用于顯示系統(tǒng)時間，時間間隔為一秒；Timer2用于判斷鬧鐘時間，時間間隔為0.5秒，Timer2設(shè)置為不可用。B.窗體的上半部是標簽Label1，用于顯示時間，設(shè)置Label1的Font為：宋體58C.窗體的下半部有一個標簽Label2，標題為"鬧鐘時間："；Label2的右邊是文本框Text1。D.在文本框中輸入鬧鐘時間并按回車后，啟動判斷鬧鐘時間的定時器Timer2，如果Label1顯示的時間超過那種時間，則標簽Label1的背景色按紅白兩色交替變換。三種文件管理控件的使用練習（顯示指定的文件目錄中的文件，并可以根據(jù)文59件類型分類顯示），如圖所示。建立運行界面設(shè)計如圖所示的文件操作窗口，將選中的文件復制到目標文件夾。在源文件部分實現(xiàn)文件的查詢；在目標文件夾部分實現(xiàn)文件的查詢、刪除、并支持新建文件夾。利用文件系統(tǒng)控件、組合框，制作一個文件瀏覽器，組合框限定文件列表框中顯示文件的類型（有“所有文件(*.*)”、“應用程序(*.exe)”、“文本文件(*.txt)”等）,如選定“應用程序(*.exe)”項,則只顯示*.exe文件.當在文件列表框中雙擊某個文件時,如果是*.exe文件,則通過shell函數(shù)調(diào)用執(zhí)行，否則用MsgBox顯示提示信息。程序運行界面設(shè)計如圖所示。建立下拉式菜單，通過菜單來控制文本框中的文字的字體、顏色等。程序運行界面設(shè)計如圖所示。設(shè)計一個畫圖程序，程序運行情況如圖所示。編制程序，計算1到100之間，能夠被3整除但不能被9整除的整數(shù)的和，并輸64出。編制程序，生成22到62之間的10個隨機整數(shù)并存放在數(shù)組a(1to10)65中，求這10個數(shù)中最大數(shù)值和最小數(shù)值出現(xiàn)的位置，并輸出。66編制子程序subshow(nasinterger)，顯示數(shù)字排列；如圖所示依次類推，要求：編制程序調(diào)用該子程序，打印n=9時圖形。67編制程序，輸入一個數(shù)值范圍，計算在此范圍之間，能夠被2整除但不能被4整除的整數(shù)的和，并輸出。68編制程序，生成32到72之間的8個隨機整數(shù)并存放在數(shù)組a(1to8)中，求這8個數(shù)的和與平均值，并輸出。69編制子程序subshow(nasinterger)，顯示數(shù)字排列；如圖所示依次類推，要求：編制程序調(diào)用該子程序，打印n=9時圖形。Page6四、編程題題號 題干在command1_click（）事件過程中實現(xiàn)下面分段函數(shù)的功能并打印結(jié)果。隨機產(chǎn)生10個30~85之間的隨機整數(shù)，求它們的平均數(shù)。編寫子過程reverse，功能為：輸入一個字符串，按與輸入的字符相反的次序72輸出這個字符串。如輸入字符串為“ abcdefgh”，則輸出為”hgfedcba”。隨機產(chǎn)生10個50~102之間的隨機整數(shù)，求它們的平均值。在窗體上有一個名稱為Command1的命令按鈕和一個名稱為Edit1框，要求在命令按鈕中編寫事件過程，讀入名為inf.txt的文件中內(nèi)容，并在編輯框中顯示。要求在程序運行后，單擊窗體使用 Do LoopWhile 編寫1-2+3-4+ -10075的事件過程。編寫函數(shù)過程max，求數(shù)組中最大值。按command命令按鈕，使用隨機函數(shù)產(chǎn)76生10~100之間的10個隨機數(shù)給數(shù)組賦初值，然后調(diào)用 max，輸出最大值。輸入整數(shù)n，單擊圖片框，顯示出具有n行的楊輝三角形如下。編寫一子過程DeleStr(s1,s2)，將字符串s1中出現(xiàn)s2子字符串刪去，結(jié)果存放在s1中。在源字符串中輸入任意字符串，在要刪除的字符串中輸入欲刪除78的子字符串，單擊command按鈕，調(diào)用DeleStr(s1,s2)，將結(jié)果在結(jié)果框中顯示。建立一個10個元素的數(shù)組，隨機產(chǎn)生 10個[1，100]之間的正整數(shù)進行數(shù)組賦79值，并輸出其中最大數(shù)及最大數(shù)在數(shù)組中的位置。test.txt 的形式寫到磁盤上。1222333332221編寫一個子過程用于判斷給定的任意正整數(shù)是否是素數(shù)，并在“調(diào)用子過程”按鈕中編寫調(diào)用語句。在窗體上有一個名稱為Command1的命令按鈕和一個名稱為 Text1的文本框,在文本框中輸入字符串。要求在命令按鈕中編寫事件過程，將文本框中輸入的大寫字母寫入名為outf.txt的文件中。Page7四、編程題題號 題干要求程序運行后，單擊窗體使用 Do LoopWhile 編寫1+2+ +n的事件過程83。要求在命令按鈕中編寫求數(shù)組中最小值的事件過程。數(shù)組下標從一開始，數(shù)組84元素為10個，使用隨機函數(shù)產(chǎn)生10~100之間的10個隨機數(shù)給數(shù)組賦初值。編寫一求平均值的函數(shù)aver(x,y) 。主調(diào)程序調(diào)用函數(shù)過程求平均值并輸出85。自定義一汽車數(shù)據(jù)類型,該汽車模型包括(廠商名,型號,顏色,重量,價格)等5個屬性項.其中,廠商名為字符型,型號為長度不超過8位的數(shù)據(jù)字符類型,顏色有16種選擇,重量是單精度型,價格為貨幣型。編寫一函數(shù)過程IsH(n),對已知正整數(shù)n,判斷該數(shù)是否是回文數(shù)，函數(shù)的返回值類型為布爾型。（所謂回文數(shù)指順讀與倒讀數(shù)字是相同的，即指最高位與最低位相同，依次類推。）Page8四、編程題知識點答案順序結(jié)構(gòu)B001順序結(jié)構(gòu)B002順序結(jié)構(gòu)B003順序結(jié)構(gòu)B004順序結(jié)構(gòu)、InputBox使用B005順序結(jié)構(gòu)、RAND函數(shù)B006順序結(jié)構(gòu)B007選擇結(jié)構(gòu)、字符串連接B008選擇結(jié)構(gòu)、InputBox使用B009選擇結(jié)構(gòu)、InputBox使用B010選擇結(jié)構(gòu)B011多分支選擇結(jié)構(gòu)B012選擇結(jié)構(gòu)、基本控件使用B013選擇結(jié)構(gòu)、基本控件使用B014Page9四、編程題知識點答案基本控件、大小寫轉(zhuǎn)換函數(shù)的使用B015順序結(jié)構(gòu)，累乘B016選擇結(jié)構(gòu)、控件使用B017順序結(jié)構(gòu)、選擇結(jié)構(gòu)、精度控制B018多重循環(huán)B019循環(huán)結(jié)構(gòu)，累加B020循環(huán)結(jié)構(gòu)，mod函數(shù)B021循環(huán)結(jié)構(gòu)B022循環(huán)結(jié)構(gòu)、打印控制B023數(shù)組+循環(huán)結(jié)構(gòu)B024數(shù)組+循環(huán)結(jié)構(gòu)B025數(shù)組+循環(huán)結(jié)構(gòu)B026數(shù)組+循環(huán)結(jié)