




版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、第一部分1在窗體上添加一個(gè)命令按鈕 (名稱(chēng)為Cmd1,標(biāo)題為輸出平均值)。程序運(yùn)行后,單擊命令 按鈕完成以下工作:隨機(jī)產(chǎn)生20個(gè)0到1000的整數(shù),將其放入一個(gè)一維數(shù)組中求出所有元素的平均值,并顯示在窗體上(如下圖所示)2請(qǐng)?jiān)诿Q(chēng)為Forml的窗體上添加一個(gè)名稱(chēng)為 Textl的文本框和一個(gè)名稱(chēng)為 C1、標(biāo)題為轉(zhuǎn)換的命令按鈕,如下圖所示。在程序運(yùn)行時(shí),單擊轉(zhuǎn)換按鈕,可以把Textl中的小寫(xiě)字母轉(zhuǎn)換為大寫(xiě),把大寫(xiě)字母轉(zhuǎn)換為小寫(xiě),其他字符不變。3在窗體上添加一個(gè)命令按鈕 (名稱(chēng)為MyCmdl ,標(biāo)題為輸出最大值)。程序運(yùn)行后,單擊 命令按鈕完成以下工作:隨機(jī)產(chǎn)生30個(gè)01000的整數(shù),將其放入一個(gè)一
2、維數(shù)組中求出其中的最大值,并顯示在窗體上。4請(qǐng)?jiān)O(shè)計(jì)如下圖所示窗體界面。程序運(yùn)行時(shí),在選中一個(gè)或兩個(gè)復(fù)選框和一個(gè)單選按鈕時(shí),單擊命令按鈕,則對(duì)文本框中的文本內(nèi)容做相應(yīng)的設(shè)置。請(qǐng)編寫(xiě)適當(dāng)?shù)氖录^(guò)程,完成上述功能。5在名稱(chēng)為Forml的窗體上添加一個(gè)名稱(chēng)為 Textl的文本框;添加兩個(gè)標(biāo)題分別為對(duì)齊方式、字體,名稱(chēng)分別為Fm1、Fm2的框架;在Fm1框架中添加三個(gè)單選按鈕,標(biāo)題分別為 左對(duì)齊、居中、右對(duì)齊,名稱(chēng)分別為Opt1、Opt2、Opt3;在Fm2框架中添加兩個(gè)單選按 鈕,標(biāo)題分別為宋體、黑體,名稱(chēng)分別為Opt4、Opt5。要求:編寫(xiě)五個(gè)單選按鈕的 Click事件過(guò)程,使程序運(yùn)行時(shí),單擊這些單
3、選按鈕,可以 對(duì)文本框中的內(nèi)容實(shí)現(xiàn)相應(yīng)的操作(如圖所示)。6請(qǐng)?jiān)O(shè)計(jì)如下圖所示窗體界面。運(yùn)行程序時(shí),先向左側(cè)文本框中輸入一個(gè)不超過(guò)10的正整數(shù),然后選擇N的階乘或(N+2)的階乘單選鈕,即可進(jìn)行計(jì)算,計(jì)算結(jié)果在右側(cè)文本框中顯示。 請(qǐng)編寫(xiě)程序完成上述功能。7在窗體上添加兩個(gè)文本框和三個(gè)標(biāo)簽, 設(shè)置它們的屬性,達(dá)到下圖效果。 程序運(yùn)行時(shí),在 第一個(gè)文本框輸入一串字符,在第二個(gè)文本框中輸入一個(gè)字符,然后單擊統(tǒng)計(jì)命令按鈕,7統(tǒng)計(jì)第二個(gè)文本框中字符(大小寫(xiě)被認(rèn)為是不同的字母)在第一個(gè)文本框中出現(xiàn)的次數(shù),統(tǒng)計(jì)結(jié)果在標(biāo)簽Label3中顯示。8在窗體上添加一個(gè)文本框和一個(gè)命令按鈕。程序運(yùn)行后,單擊命令按鈕,即可
4、計(jì)算出0200范圍內(nèi)能被3或7整除的所有整數(shù)的和,并顯示在文本框中。程序運(yùn)行界面如下圖所示。9請(qǐng)?jiān)O(shè)計(jì)如下圖所示界面(文本框名稱(chēng)為:Txt1 ,按鈕名稱(chēng)為:Cmd1)。程序運(yùn)行時(shí)在文本框 中輸入字符串,點(diǎn)擊命令按鈕,判斷文本框中的字符串是否是回文,將判斷結(jié)果顯示在窗體上。所謂回文是指字符串正序和逆序的結(jié)果相同,如“ aBCCBa是回文, ,BCcBa,不是回CBBCA是回文CBBcA不是回文IaCBBcA-111110編程實(shí)現(xiàn)求 Sum = 一十十十 十(n為小于等于20的整數(shù))。1!2!3!n!n的值,點(diǎn)擊“計(jì)算”命令按鈕,程序運(yùn)行界面如下圖所示。程序運(yùn)行時(shí),在文本框中輸入 將計(jì)算結(jié)果顯示在標(biāo)
5、簽上。回國(guó)n的值士 ,Sum=l. 71828152557319i計(jì)算EJ,=,=,-,=,L,fL,一,L,第二部分1已知在同一個(gè)籠子里有總數(shù) M只雞和兔,雞和兔的總腳數(shù)為 NN,編程求出雞和兔各有多 少只。要求:程序運(yùn)行后,在兩個(gè)文本框中分別輸入M和N的值,單擊 計(jì)算”命令按鈕,在兩個(gè)標(biāo)簽框中分別輸出雞和兔的數(shù)量。程序運(yùn)行界面如下圖。提示:N 2XM的偶數(shù)。2若一個(gè)3位正整數(shù)中各位數(shù)字的立方和等于該數(shù)字本身,則該數(shù)稱(chēng)之為 水仙花數(shù)例如 153是水仙花數(shù),因?yàn)?153 = 1*1*1 + 5*5*5 + 3*3*3 。編程求出100999之間所有的 水仙花 數(shù)”。要求:程序運(yùn)行后,單擊 查找
6、”按鈕,在窗體上顯示找到的 水仙花數(shù)程序運(yùn)行 界面如下圖。3編寫(xiě)程序,要求程序運(yùn)行后,單擊“開(kāi)始”按鈕,隨機(jī)產(chǎn)生20個(gè)學(xué)生的成績(jī)(0100的整數(shù)),并在左邊圖片框中輸出(一行5個(gè)成績(jī)),并在右邊圖片框中輸出平均分和及格的人數(shù),程序運(yùn)行界面如下圖。% Fnml匠叵岡1 56 7 1I 8307 15 3T1 O9 4-7O2 0 612 5 760 4 22 9 8 2件均分,4L25 及格人數(shù):7開(kāi)始4編寫(xiě)程序?qū)崿F(xiàn):程序運(yùn)行時(shí),單擊窗體則顯示如下圖所示的圖案。5編程實(shí)現(xiàn):在窗體中有一個(gè)文本框,一個(gè)計(jì)時(shí)器和兩個(gè)命令按鈕。其功能是:程序的運(yùn)行 時(shí),單擊 開(kāi)始計(jì)數(shù)”按鈕,就開(kāi)始計(jì)數(shù),每間隔1秒,文本
7、框中的數(shù)增加1;單擊 諄止計(jì)數(shù) 按鈕,則計(jì)數(shù)停止。6以下程序運(yùn)行界面如下圖所示。其功能如下:1)單擊讀數(shù)據(jù)按鈕(Commandl),可將隨機(jī)產(chǎn)生100個(gè)三位正整數(shù)存到數(shù)組 a中;2)單擊計(jì)算按鈕(Command2),則根據(jù)從組合框 Combo1中選中的項(xiàng)目,對(duì)數(shù)組 a中的數(shù)據(jù)計(jì)算平均值,并將計(jì)算結(jié)果四舍五入取整后顯示在文本框Text1中。題目提供的程序代碼不完整,請(qǐng)?jiān)O(shè)計(jì)下圖界面并錄入代碼,將程序中的內(nèi)容。注意:不能修改程序的其他部分。周奇羽題目提供的程序代碼:Dim a(100) As IntegerPrivate Sub Command1 Click()Dim n As IntegerFor
8、 n = 1 To 100 a(n)=Int(Rnd *?)Next nEnd SubPrivate Sub Command2 Click()Dim x& ,y& , z& ,i% , j% , k%?改為正確的For i = 1 To 100If a(i) Mod ? Thenx = x + a(i) : j = j + 1 Elsey = y + a(i)?End IfNext kx = Int(x / j + 0.5): y = Int(y / k +0.5)z = Int(x + y) / (j + k) + 0.5)Select Case Combo1.TextCase 所有偶數(shù)Te
9、xt1 = ?Case 所有奇數(shù)Text1 = ?Case 所有數(shù)Textl = ?End SelectEnd Sub7編寫(xiě)程序。要求:程序運(yùn)行后,單擊開(kāi)始”按鈕,則隨機(jī)產(chǎn)生20個(gè)2位數(shù)輸出到窗體上,每行10個(gè)數(shù)。同時(shí)對(duì)所產(chǎn)生的20個(gè)數(shù)從小到大排序,將排序后的數(shù)再次輸出在窗體上。程序運(yùn)行界面如下圖。8編寫(xiě)程序,程序的功能是:程序運(yùn)行后,在文本框中輸入一串字符 ,單擊標(biāo)題為統(tǒng)計(jì)的命令按鈕, 分別統(tǒng)計(jì)輸入字符串中大寫(xiě)字母、小寫(xiě)字母以及其他字符的個(gè)數(shù),并將統(tǒng)計(jì)結(jié)果分別在相應(yīng)的標(biāo)簽框中顯示。程序運(yùn)行界面如下圖。9編寫(xiě)程序。程序功能是:程序運(yùn)行后在文本框中輸入一個(gè)正整數(shù),單擊判斷”按鈕,在標(biāo)簽框中輸出該
10、數(shù)是一個(gè)素?cái)?shù)”或 該數(shù)不是一個(gè)素?cái)?shù)”的信息。程序運(yùn)行界面如下圖。10編寫(xiě)程序,程序的功能是:程序運(yùn)行后,單擊開(kāi)始”按鈕,在窗體上顯示出10個(gè)小于100的隨機(jī)正整數(shù),單擊查找”按鈕,則在窗體的下一行顯示出這 10個(gè)數(shù)中的最大的數(shù)以及最大數(shù)在此數(shù)列中的位置號(hào)。程序運(yùn)行界面如下圖。16第三部分1在窗體Forml上添加兩個(gè)文本框, 一個(gè)“轉(zhuǎn)換”命令按鈕和三個(gè)單選按鈕 (名稱(chēng)分別為 Opt1、Opt2、 Opt3,標(biāo)題分別為“大小寫(xiě)轉(zhuǎn)換”、“全部大寫(xiě)”、“全部小寫(xiě)”)。程序功能:在上方文本框 Textl中輸 入一字符串,選中“大小寫(xiě)轉(zhuǎn)換”,單擊“轉(zhuǎn)換”按鈕后,Text2中顯示大小寫(xiě)相反的字符串; 選中“
11、全 部大寫(xiě)”,單擊轉(zhuǎn)換按鈕后,Text2中顯示全部大寫(xiě)字符串, 選中“全部小寫(xiě)”,單擊轉(zhuǎn)換按鈕后,Text2 中顯示全部小寫(xiě)字符串 。程序運(yùn)行界面如下圖。要求: 請(qǐng)按要求完成窗體界面設(shè)計(jì)程序的部分代碼已給出如下,但不完整。請(qǐng)錄入下面代碼,并將”處補(bǔ)充完整。Private Sub Command1_Click()Dim n As Integer, k As Integer, ch As String, a As String ch =If Opt1.Value = True Thenn = Len(?)For k = 1 To na = Mid$(Text1, k, ?)If a = a And
12、 a = A And a = Z Thench = ch + LCase(a)Elsech = ch + aEnd IfNext kEnd IfIf Opt2.Value = True Then ch = UCase(Text1)If Opt3.Value = True Then ch = ? (Text1)Text2 = chEnd Sub 2編寫(xiě)程序,演示列表框控件的基本操作。在窗體上建立兩個(gè)列表框,兩個(gè)命令按鈕。程序運(yùn)行后,在 左邊列表框中選中所需要的項(xiàng)目,單擊“添加”按鈕,則把所選中的項(xiàng)目移到右邊列表框中。如果單擊“刪除”按鈕,則刪除左邊列表框中選中的項(xiàng)目。程序運(yùn)行時(shí)的窗體界面如圖。斯
13、爾克蘭虹海奧春長(zhǎng)3編程實(shí)現(xiàn):?jiǎn)螕簟拜敵鲎畲笾怠卑粹o,隨機(jī)產(chǎn)生8個(gè)大于或等于10小于100的整數(shù),顯示在窗體的第一行,然后在窗體第二行顯示其中的最大值。程序運(yùn)行時(shí)的效果如圖。118822 32 88 34 76 82 16輸出最大值4在Forml的窗體上有一個(gè)名稱(chēng)為 Textl的文本框和兩個(gè)命令按鈕, 命令鈕標(biāo)題分別為“顯示A和顯 示B”。要求程序運(yùn)行后,如單擊“顯示A”命令按鈕,則彈出對(duì)話(huà)框,輸入要顯示的個(gè)數(shù),根據(jù)輸入的數(shù)值在文本框中顯示相應(yīng)數(shù)量A構(gòu)成的字符串;如單擊“顯示B”命令按鈕,也彈出對(duì)話(huà)框,輸入要顯示的個(gè)數(shù),根據(jù)輸入的數(shù)值在文本框中顯示相應(yīng)數(shù)量B構(gòu)成的字符串。程序運(yùn)行時(shí)的窗體界面如圖
14、所示。.FotmI匚|舊 I X顯示A5已知十個(gè)數(shù)為:67, 45, 34, 28,49, 37, 87, 76, 27, 83。編程實(shí)現(xiàn):按“開(kāi)始”按鈕,則在窗體的第一行顯示這十個(gè)數(shù),在窗體的第二行按從大到小的順序顯示這十個(gè)數(shù)。6界面設(shè)計(jì)如下圖所示,單擊“確定”按鈕,在文本框中顯示一句話(huà),說(shuō)明用戶(hù)選擇的綜合情況。樂(lè) FdemI我是女學(xué)生,愛(ài)好:體育、攝影口確定性別男但女身份方學(xué)生教師愛(ài)好口體育電影研攝影7編程實(shí)現(xiàn):在窗體上的4個(gè)文本框中各輸入一個(gè)整數(shù)作為各數(shù)組元素的值,然后單擊命令按鈕,在窗體上顯示出數(shù)組元素中的最大值。8編程實(shí)現(xiàn):在窗體的兩個(gè)文本框中分別輸入一個(gè)正整數(shù),單擊“求最大公約數(shù)”
15、按鈕后,在窗體第 行顯示它們的最大公約數(shù)。程序運(yùn)行界面如下圖所示。9編程實(shí)現(xiàn):在窗體的左上角有一個(gè)圖像框,通過(guò)屬性窗口任選一張圖片裝入到圖像框的Picture屬性中,每按一次“放大”按鈕時(shí)圖像放大10%,同理,每按一次“縮小”按鈕時(shí)圖像縮小10%,放大縮小時(shí)均需保持圖像的縱橫比不變,按“結(jié)束程序”按鈕則結(jié)束程序。程序運(yùn)行界面如下圖。10編程實(shí)現(xiàn):在窗體上建立一個(gè)文本框(內(nèi)容如下圖所示),另外建立菜單,一級(jí)菜單標(biāo)題分別為“背景顏色”,子菜單標(biāo)題分別為“白色”、“紅色”、“綠色”、“藍(lán)色”。程序運(yùn)行時(shí),如果單擊“白色”子菜 單,則將文本框的背景色設(shè)置為白色;如果單擊“紅色”子菜單,則將文本框的背景
16、色設(shè)置為紅色;如 果單擊“綠色”子菜單,則將文本框的背景色設(shè)置為綠色;如果單擊“藍(lán)色”子菜單,則將文本框的背 景色設(shè)置為藍(lán)色。程序運(yùn)行界面如下圖。li. Forwl白色 紅色 券色 藍(lán)色背景顏色I(xiàn)重慶科技學(xué)院是一所全日制公辦普通本 科院校,以工為主,以石油,冶金、機(jī) 電為特色,涵蓋理、工.經(jīng).管.文. 蘊(yùn)藏著勃勃生機(jī)與較大發(fā)展?jié)摿Φ母叩?學(xué)校.第四部分i.編程計(jì)算分段函數(shù)z 、x y,(x 0, y 0)J|x- y|,(x 0, y 0)0,(其他情況)的值。要求用文本框(TextBox)輸入x,y的值,單擊標(biāo)題為“計(jì)算”命令按鈕后,利用標(biāo)簽控件上顯示z的值。2、在窗體添加一個(gè)命令按鈕(標(biāo)題
17、為“開(kāi)始”),單擊該按鈕,隨機(jī)產(chǎn)生10個(gè)三位數(shù)(100999),在窗體的第一行這10個(gè)三位數(shù),在窗體的第二行輸出其中的奇數(shù),在窗體的第三行輸出其中的偶數(shù)。3.編程計(jì)算分段函數(shù)x2 z2, (x - -10, z 0) xy=-, (x -30,z 0)z x - z, (-30 三 x -10, x z)要求用InputBox函數(shù)輸入x, z的值,單擊命令按鈕(標(biāo)題為“計(jì)算”)后,利用圖形框(PictureBox)輸出計(jì)算結(jié)果 y。、x2 - y2,(x y - 1)z =0, (x = 0)4.編程計(jì)算分段函數(shù)I的值。要求用InputBox函數(shù)輸入x,y|x, (x -1)的值,單擊命令按鈕
18、(標(biāo)題為“計(jì)算”)后,用文本框中輸出計(jì)算結(jié)果z。5 編程實(shí)現(xiàn)求 Sum=1 + (1+2) + (1+2+3) + ( 1+2+3+4) + +(1+2+3+4+ n)。程序運(yùn)行時(shí),在文本框中輸入n的值,點(diǎn)擊“計(jì)算”命令按鈕,將計(jì)算的結(jié)果顯示在標(biāo)簽上。程序運(yùn)行界面如下圖。6編寫(xiě)一個(gè)程序,其功能為輸入貨物的數(shù)量及單價(jià),求總價(jià),并輸出。窗體上的兩個(gè)標(biāo)簽的標(biāo)題分別為“貨物的數(shù)量(個(gè)):和”貨物的單價(jià)(元):,在兩個(gè)文本框中輸入相應(yīng)的數(shù)據(jù),當(dāng)按“總價(jià)”按鈕時(shí),在右下方的圖形框中顯示原價(jià)和折扣價(jià)。當(dāng)原價(jià)達(dá)到2000元以上時(shí),按8折計(jì)算折扣價(jià);當(dāng)原價(jià)達(dá)到 1000元以上時(shí),按9折計(jì)算折扣價(jià)。程序運(yùn)行界面如下圖。7編程實(shí)現(xiàn):?jiǎn)螕簟凹用堋卑粹o后,將上方文本框中的字符串加密后顯示在下方的文本框中。力口密的方法是:把明文中的每個(gè)字母改為它后面的那個(gè)字母 (z后面的字母認(rèn)為是a,Z后面的 字母認(rèn)為是A)。程
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 美術(shù)課件創(chuàng)意兒童
- 美術(shù)學(xué)科知識(shí)課件講解
- 重大事故隱患治理方案內(nèi)容口訣
- 幼兒園各崗位安全職責(zé)一覽表
- 危險(xiǎn)化學(xué)品經(jīng)營(yíng)事故應(yīng)急預(yù)案
- 生產(chǎn)安全事故報(bào)告和處理規(guī)定
- 嬰童免疫培訓(xùn)課件
- 安全生產(chǎn)培訓(xùn)的收獲和體會(huì)
- 結(jié)構(gòu)計(jì)算培訓(xùn)課件
- 計(jì)劃免疫規(guī)劃培訓(xùn)課件
- (完整版)標(biāo)書(shū)密封條格式word
- 《關(guān)于漢語(yǔ)規(guī)范化的意義探析》
- 公司一年完稅證明模板
- [湖南]5萬(wàn)噸凈水廠(chǎng)給排水工藝全套圖紙(附170頁(yè)計(jì)算說(shuō)明)
- DB33T 1203-2020 建設(shè)工程施工揚(yáng)塵控制技術(shù)標(biāo)準(zhǔn)
- 外國(guó)文學(xué)名著導(dǎo)讀
- 腦卒中患者血壓管理
- 如何制作OruxMaps離線(xiàn)地圖
- 校企汽修專(zhuān)業(yè)戰(zhàn)略合作協(xié)議書(shū)
- 《紅樓夢(mèng)》四大家族主要人物關(guān)系圖
- 2012年福建高考文史類(lèi)(語(yǔ)文、數(shù)學(xué)、英語(yǔ)、文綜)試卷真題及參考答案
評(píng)論
0/150
提交評(píng)論