計算機科學與技術面向對象程序設計

1、面象程序設計模擬題一、簡答題：1.基本控件？如何在窗體上添加控件？2常量和變量區(qū)別？它們各應該在什么情況下使用？參考1.：標準控件？如何在窗體上添加控件？在窗體上用于輸入、輸出信息的圖形或文字符號稱為控件。如命令按鈕、文本框等。標準控件：在 VB 中提供了許多標準控件它們是由 VB 中的.exe 文件提供，常用的標準控件以圖標的形式出現在工具箱中供用戶選擇使用。工具箱一般是放在 VB 集成環(huán)境中窗口的左邊。用戶可以直接在工具箱中選擇使用它們。用戶不能增加和刪標準控件。在工具箱中有許多基本控件按鈕，在窗體上添加控件的方法有兩種：1）. 用鼠標單擊工具箱中相應的控件按鈕，再把鼠標移到窗體上，這時鼠

2、標變成形，在合適的位置上按下鼠標左鍵并拖動，這時窗體上有一個矩形框，當其大小合適時，松開鼠標左鍵，窗體上就會顯示一個相應大小的控件。同時可看到控件周圍出現八個小方框，它們稱為尺寸調節(jié)柄。利用尺寸調節(jié)柄可調節(jié)控件的大小。2）. 雙擊工具箱中要添加的控件按鈕。就可在窗體的添加一個控件。然后再把它移到合適的位置。2常量和變量區(qū)別？它們各應該在什么情況下使用？常量是指在程序運行過程中，它的值始終保持不變的量。VB 中的變量是指其值在程序運行期間可以改變的量，在 VB 的應用程序執(zhí)行期間經常用變量來臨時數據。也可以說變量就是命名的內存單元。程序中用變量名來以改變，但某一時刻變量有唯一確定的值。內存單元，

3、變量在整個程序運行中其值可使用常量的好處，對于程序中經常出現的數值，應用符號常量表示它，不但書寫方便，而且當需要改變該數值時，只需改變定義常量的語句值，而不需改變每個語句，提高了編寫程序的效率。二、填空題：1.命令按鈕是Windows 應用程序中最常用的控件，它一般被用來、中斷或結束一個過程。單擊它時將執(zhí)行已寫入命令按鈕的事件過程中令代碼。用戶可以將需要執(zhí)行的操作放在命令按鈕的事件過程中，單擊該命令按鈕就可讓程序運行，完成相應的操作。滾動條控件有滾動條和滾動條，它們的使用方法完全一樣，當在某些控件中的內容，可通過移動滾動條使其顯示出來。有時滾動條也可用來輸入。文本框可用來文本，也可用來文本，當

4、文本框控件中的文2.3.本時Change( )事件事件。當引發(fā) Click ( )事件事件。當DblClick ( )事件事件。數組是一組名稱相同而不同的變量?？梢杂靡粋€4.一組數據，并用來區(qū)分它們中的每個元素。數組中每個元素稱或稱。5.VB 還提供了創(chuàng)建圖形的一些方法，它們適用于窗體和框。清除所有圖形和 Pr輸出用方法，設置各個像素的顏色值用方法，畫線、矩形或填充框用方法，畫圓、橢圓或圓弧用方法。6. Visual Basic 通用框控件（CommonDialog）提供了一組標準的操作框，可以進行和、和設置等操作。此外，通用框還能啟動幫助系統。7. “菜單編輯器”分為上下兩部分。上部分用來，

5、下部分則用。彈出式菜單是獨立于菜單欄而顯示在窗體上的。在彈出式菜單上顯示的項目取決于按下鼠標右鍵時；因此，彈出式菜單也被稱為。三、編程題：1 我國古代數學家 錢五、雞母一、值在“算經”里提出一個世界數學史上有名的百雞問題：雞翁一、值，雞雛三、值錢一，百錢買百雞，問雞翁、母、雛各幾何？數列的前N 項。2 求幾項為：數列問題是一個著名的古典數學總問題。此數列前1，1，2，3，5，8，13，21，34，55，89，從數列中，可以看出這樣的規(guī)律，這是一個典型的“遞推”問題。從第三項開始，每一項都是由前兩項相加得到的。即后面某一項可以從前面已知的項數求出。數列的第一項和第二項的值為：F1 = 1系式如下

6、： Fn =Fn-1 +Fn-2 。F2 = 1 ， 從第三項開始，其遞推關3 用 Line 方法在窗體上畫出兩個正方形，一個是空心，一個是實心。解：1、Option ExplicitPrivate Sub Cmd 計算_Click() Dim x, y, z Aseger Dim p As String List1.ClearFor x = 1 To 19For y = 1 To 33 z = 100 - x - yIf 5 * x + y * 3 + z / 3 = 100 Thenp = x & & y & & zRem 把滿足條件的一種情況添加到列表框中。List1.AddItem p

7、 End IfNext y Next xEnd SubPrivate Sub Cmd 退出_Click() EndEnd Sub2、Option ExplicitDim f() PrivateDimn =As DoubleSub Cmd 計算_Click()n, i Aseger, p AsStringVal(Text1.Text)ReDim f(n) f(1) = 1f(2) = 1p = f(1): & Str(f(1) 把第一項添加到列表框中List1.ClearList1.AddItemp = f(2): & List1.AddItempStr(f(2) pFor i = 3 To nf(i) = f(i - 1) + f(i- 2)p = f( & Trim(Str(i) & ): & Str(f(i) List1.AddItem pNext iRem 設置 Label2 的 Caption 屬性。Label2.Caption = 前 & Text1.Text & 個數列為：End Sub PrivateEndEnd SubSubCmd 退出_Click()3、