vb等級(jí)考試題目與評(píng)析79-資料下載頁(yè)
【導(dǎo)讀】請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序。在名稱為Form1的窗體上畫(huà)一個(gè)名稱為Picture1的圖片框，在圖片框內(nèi)再畫(huà)一個(gè)有邊框的名稱為Image1的圖像框（。并通過(guò)屬性窗口把考生目錄下的圖標(biāo)文件Point11. 裝入圖像框Image1中，如圖所示。別為Command1、Command2，標(biāo)題分別為"圓形"、"紅色邊框"的命令按鈕。使得在運(yùn)行時(shí)，單擊"圓形"按鈕將形狀控件設(shè)為圓形。要求程序中不得使用變量，每個(gè)事件過(guò)程中只能寫(xiě)一條語(yǔ)句。Height的使用方法，通過(guò)Height屬性可以返回/設(shè)置對(duì)。象的高度，通過(guò)Width屬性可以返回/設(shè)置對(duì)象的寬度?？梢杂肂orderColor屬性來(lái)改變邊框的顏色。按要求保存文件即完成本題。其中的N和x值通過(guò)鍵盤(pán)分別輸入到文本框Text1、Text2中。將計(jì)算結(jié)果顯示在名稱為L(zhǎng)abel1的標(biāo)簽中。應(yīng)使用函數(shù)xn進(jìn)行冪運(yùn)算。Label1中，否則沒(méi)有成績(jī)。件過(guò)程，請(qǐng)完善"合并"命令按鈕的Click事件過(guò)程，使其實(shí)現(xiàn)上述功能。操作，且必須通過(guò)窗體右上角的"關(guān)閉"按鈕結(jié)束程序，否則無(wú)成績(jī)。本題主要考查的是數(shù)組的應(yīng)用，文件的讀寫(xiě)、排序算法。
【正文】 （ 1小題，計(jì) 30分） 注意：下面出現(xiàn)的 考生文件夾 均為 C:\WEXAM\00000000\ 在考生目錄下有一個(gè)工程文件 ，其窗體上有一個(gè)文本框，名稱為 Text1；還有兩個(gè)命令按鈕，名稱分別為 C C2，標(biāo)題分別為 計(jì)算 、 存盤(pán) ，如圖所示。并有一個(gè)函數(shù)過(guò)程 isprime(a)可以在程序中直接調(diào)用， 其功能是判斷參數(shù) a是否為素?cái)?shù)，如果是素?cái)?shù)，則返回 True，否則返回 False。 請(qǐng)編寫(xiě)適當(dāng)?shù)氖录^(guò)程 ，使得在運(yùn)行時(shí)，單擊 計(jì)算 按鈕，則找出大于 15000的第 1個(gè)素?cái)?shù)，并顯示在 Text1中；單擊 存盤(pán) 按鈕，則把 Text1中 的計(jì)算結(jié)果存入考生文件夾下的 。 *注意： 考生不得修改 isprime函數(shù)過(guò)程和控件的屬性，必須把計(jì)算結(jié)果通過(guò) 存 盤(pán) 按鈕存入 ，否則無(wú)成績(jī)。 本題主要考察循環(huán)語(yǔ)句的使用，調(diào)用函數(shù)，以及文件的基本操作。兩個(gè)命令按鈕的程序如下： Private Sub C1_Click() Dim i As Integer i = 15000 Do i = i + 1 If isprime(i) = True Then Exit Do Loop = Str(i) End Sub Private Sub C2_Click() Open amp。 \ amp。 For Output As 1 Print 1, Close 1 End Sub
鄂ICP備17016276號(hào)-1