【文章內(nèi)容簡(jiǎn)介】
其能正確運(yùn)行,但不能修改程序中的其他部分。最后用原來(lái)的文件名保存工程文件和窗體文件。 **********************************************************************(2)。在窗體上有一個(gè)命令按鈕,其名稱為Command1,標(biāo)題為計(jì)算。程序運(yùn)行后,如果單擊命令按鈕,程序?qū)⒏鶕?jù)下面的公式計(jì)算π的值:π/4 = 1 1/3 + 1/5 1/7 + ......所提供的窗體文件已給出了命令按鈕的事件過(guò)程,程序運(yùn)行結(jié)果如圖所示。該程序不完整,請(qǐng)把它補(bǔ)充完整。要求:去掉程序中的注釋符,把程序中的 ? 改為正確的內(nèi)容,使其能正確運(yùn)行,但不能修改程序中的其他部分。最后用原來(lái)的文件名保存工程文件和窗體文件。 第一小題:該題考查考生對(duì)ListBox控件的使用。列表框的AddItem方法用來(lái)在列表框中插入一行文本,其語(yǔ)法為: 字符串 [,索引值]如果省略索引值,則字符串被添加到列表框的尾部;使用索引值可以將字符串插入列表框中的指定位置。索引值從0開始,到列表項(xiàng)總數(shù)1止。列表框的RemoveItem方法用來(lái)刪除列表框中的指定項(xiàng)目,其語(yǔ)法為: 索引值列表框的ListIndex屬性用來(lái)設(shè)置或返回列表框中當(dāng)前選中的列表項(xiàng)。第二小題:該題考查了DoLoop循環(huán)結(jié)構(gòu)語(yǔ)句和公式計(jì)算的算法實(shí)現(xiàn),相關(guān)程序如下:Private Sub Command1_Click() Dim Result As Double Dim Sign As Integer Dim i As Integer Result = 0 Sign = 1 i = 1 Do Result = Result + Sign / i i = i + 2 Sign = Sign Loop While 1 / i = = Result * 4End Sub3. 綜合應(yīng)用(1小題,計(jì)30分)注意:下面出現(xiàn)的考生文件夾均為%USER%。窗體外觀如圖1所示。三個(gè)命令按鈕的名稱分別為CommandCommand2和Command3,標(biāo)題分別為讀取數(shù)據(jù)、首字母大寫和存盤。程序運(yùn)行后,如果單擊讀取數(shù)據(jù)命令按鈕,(文本中的單詞與單詞之間或標(biāo)點(diǎn)符號(hào)與單詞之間均用一個(gè)空格分開),并在文本框中顯示出來(lái),如圖2所示; 如果單擊首字母大寫命令按鈕,則將文本框中每個(gè)單詞的第一個(gè)字母變?yōu)榇髮懽帜福ㄈ绻瓉?lái)已是大寫字母則不改變),并在文本框中顯示出來(lái),如圖3所示;如果單擊存盤命令按鈕,則把文本框中的內(nèi)容(首字母大寫后)。窗體文件中已給出了部分程序,請(qǐng)把它補(bǔ)充完整,使其實(shí)現(xiàn)上述功能。 要求:1)編寫讀取數(shù)據(jù)命令按鈕的