vb等級考試題目與評析56-資料下載頁
2025-08-27 20:42本頁面
【導讀】請根據(jù)以下各小題的要求設計VisualBasic應用程序。1）請按圖中所示，通過屬性窗口輸入“北京”、“廣州”、“上?！?、“深圳”。2）設置適當?shù)膶傩?，使得運行時，窗體的最大化按鈕和最小化按鈕消失。在名稱為Form1的窗體上畫兩個文本框，名稱分別為Text1、Text2，再畫兩個命令按鈕，名稱分別為Command1、Command2，標題分別為“左”、“右”，見圖2。按鈕，則焦點位于Text2上。比如要激活名為Text1的文本框，可使用語句。題為“下一個”）。項1”、“選項2”、“選項3”、“選項4”，初始狀態(tài)下，“選擇1”為選中狀態(tài)。最后把修改后的文件按原文件名存盤。單擊“計算”按鈕，將截取運算后的結果顯示在Text2. 則在Text2中顯示該數(shù)列第40項的值。
【正文】 在考生目錄下有一個工程文件 。窗體中已經(jīng)給出了所有控件，如圖所示。請編寫適當?shù)氖录^程實現(xiàn)以下功能：在 Text1中輸入整數(shù) 40，單擊“計算”按鈕，則在 Text2中顯示該數(shù)列第 40項的值。如果單擊“存盤”按鈕，則將計算的第 40項的值存到考生目錄下的 。（提示：因數(shù)據(jù)較大， 應使用 Long型變量） 注意：在結束程序運行之前，必須單擊“存盤”按鈕，把結果存入 ，否則無成績。最后把修改后的文件按原文件名存盤。 主要考查了文件的打開、關閉及讀寫操作，同時也考查了關于數(shù)組的一些知識。 本程序主要代碼如下： Dim a(50) As Long Private Sub Command1_Click() a(1) = 1 a(2) = 1 For i = 3 To CInt() a(i) = a(i 1) + a(i 2) + 1 Next i = a(i 1) End Sub Private Sub Command2_Click() Open For Output As 1 Print 1, Close 1 End Sub
公司管理相關推薦
鄂ICP備17016276號-1