vb等級考試題目與評析78-資料下載頁
2025-08-27 20:42本頁面
【導(dǎo)讀】請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序。程序的運行情況如圖2所示。在名稱為Form1的窗體上畫一個文本框，名稱為Text1，其初始內(nèi)容為空；要求在開始運行時不計數(shù)，單擊"開始計數(shù)"按鈕后，則使。本題主要考察Form控件和Command控件的屬性設(shè)置。字號、字體在font屬性中設(shè)置，將命令按鈕的visible屬性設(shè)為False，即不可見。按要求保存文件即完成本題。1000，從而保證文本框的數(shù)字每秒變化。結(jié)果顯示在名稱為Label1的標(biāo)簽中。改為正確的內(nèi)容。程序調(diào)試通過后，必須按照如圖所示輸入N=5，x=12，然后計算z的值，最后把修改后的文件按原文件名。在考生文件夾下有一個工程文件。其窗體上有一個圓，相當(dāng)于?？潭赛c，并完成其他初始化工作；另有長、短2條直線，名稱分別為Line1和Line2，表示兩個指針。釋符，把程序中的？其中調(diào)用函數(shù)時，可象使用VB庫函數(shù)一樣使用。本題主要考查Timer控件的Enabled、時鐘指針旋轉(zhuǎn)算法以及For語句的使用。
【正文】 是 Label1和 Label2，標(biāo)題分別為 最長單詞的長度為 和 以該長度最后一次出現(xiàn)的 單詞是 ；再畫兩個名稱分別為 Text1和 Text2，初始值為空的文本框，如 圖所示。程序功能如下： 1）如果單擊 讀數(shù)據(jù) 按鈕，則將考生文件夾下 變量 s中（此過程已給出）； 2）如果單擊 統(tǒng)計 按鈕，則自動統(tǒng)計 （該文件中僅含有字 母和空格，而空格是用來分隔不同單詞的）中最長單詞的長度，以及 中最后一個以該長度出現(xiàn)的單詞，并將該單詞的長度顯示在 Text1文本框內(nèi)，將該單詞顯示在 Text2文本框內(nèi)。 讀數(shù)據(jù) 命令按鈕的 Click事件過程已經(jīng)給出，請為 統(tǒng)計 命令按鈕 編 寫適當(dāng)?shù)氖录^程，實現(xiàn)上述功能。 注意： 考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結(jié)束程序運行之前， 必須進行統(tǒng)計，且必須通過單擊窗體右上角的 關(guān)閉 按鈕結(jié)束程序， 否則無成績。最后，程序按原文件名存盤。 本題主要考查了文件的操作以及文件中字符串長度的統(tǒng)計算法。主要代碼如下： Option Base 1 Dim s As String Private Sub Command1_Click() Open amp。 \ For Input As 1 s = Input(LOF(1), 1) Close 1 End Sub Private Sub Command2_Click() Dim i As Integer Dim max As Integer Dim j As Integer Dim arr arr = Split(s, ) max = 0 For i = 1 To UBound(arr) If Len(arr(i)) = max Then max = Len(arr(i)) j = i End If Next = max = arr(j) End Sub Private Sub Form_Unload(Cancel As Integer) Open amp。 \ For Output As 1 Print 1, , Close 1 End Sub 按要求保存文件即完成本題。
公司管理相關(guān)推薦
鄂ICP備17016276號-1