資源簡介

Visual Basic模擬題
一、簡答題：
在用Visual Basic開發應用程序時，一般分為幾步進行？每一步需要完成什么操作？ P22
答：(1)創建工程，設計界面。A、啟動VB在“新建工程”對話框中選“標準EXE”工程，單擊“打開”按鈕，出現了窗體設計器，也就創建了第一個窗體。再利用控件工具箱在窗體上創建各種對象。B、如已啟動VB，若需再創建新工程，可從“文件”菜單中選“新建工程”，在出現的對話框中選“標準EXE”并單擊“打開”按鈕，也可出現窗體設計器，再利用控件工具箱在窗體上創建各種對象。
(2)設置屬性。設置窗體或控件等對象的屬性。
(3)編寫代碼。在代碼窗口編寫代碼。
(4)運行程序。按F5鍵和按工具欄上執行按鈕，就可執行一個工程。
(5)保存工程(文件)。從“文件”菜單選“保存工程”出現“另存為”對話框，輸入一個文件名，先保存窗體文件，生成.FRM文件；然后又出現一個對話框，需要再輸入文件名，接著保存工程文件，生成.VBP文件。
(6)編譯程序，生成.EXE文件。
2．按作用范圍劃分，變量分為幾類？在什么位置以及如何聲明各類變量？ P39
答：分三類：
(1)過程內部使用的變量。在聲明它們的過程中才能識別，為局部變量，用DIM或者STATIC關鍵字聲明。用STATIC聲明的局部變量為靜態，其值一直存在，用DIM聲明的變量只在過程執行期間才存在。
(2)模塊內部使用的變量。在模塊頂部的聲明段使用PRIVATE關鍵字聲明。
(3)所有模塊使用的公用變量。用PUBLIC關鍵字聲明，應在模塊頂部的聲明段來聲明。
3. 什么是基本控件？如何在窗體上添加控件？ 　　P20
答：在窗體上用于輸入、輸出信息的圖形或文字符號稱為控件。如命令按鈕、標簽、文本框等為基本控件。在窗體上添加有兩種方法：
（1）用鼠標單擊工具箱中相應的控件按鈕，再把鼠標移到窗體上，這時鼠標變成十字形，在合適的位置上按下鼠標左鍵并拖動，這里窗體上有一個矩形框，當其大小合適時，松開鼠標左鍵，窗體上就會顯示一個相應大小的控件。同時可看到控件周圍出現8個小方框，它們稱為尺寸調節柄。利用尺寸調節柄可調節控件的大小。當控件上有尺寸調節柄時，說明該控件是“活動的”或“被選中的”。
（2）雙擊工具箱中要添加的控件按鈕，就可在窗體的中央添加一個控件，然后再把它移到合適的位置。
4．常量和變量有什么區別？它們各應該在什么情況下使用？ 　　　P35
答：常量是指在程序運行過程中，它的值始終保持不變的量。有兩種形式，直接常量、符號常量。直接常量根據使用的數據類型分：字符串常量、數值常量、布爾常量、日期常量。符號常量分：內部（系統定義）常量和符號（用戶定義）常量。用“Private”定義的常量只能在模塊內部使用，用“Public”定義的常量可在模塊之間使用。這樣書寫方便，提高編寫程序的效率。
變量是指其值在程序運行期間可以改變的量，變量在整個程序運行中其值可以改變，但某一時刻變量有惟一確定的值。可以不聲明直接使用。變量一般用小寫，常量一般用大寫。
5、什么是對象？什么是對象的事件和方法？試列舉幾個常用的事件和方法？P17
答：對象是代碼和數據的組合，可作為一個單位來處理。可是應用程序的一部分，也可是整個應用程序。
對象事件是對象可以識別的動作，即窗體、控件和其他對象可以識別的動作。
如：Paint事件，Resize事件，Click事件，Keypress事件等。
　　對象本身具有一些函數或過程稱為方法。方法就是對象要執行的動作，方法可以影響屬性值。Form1.Print輸出表項，Clear,AddlTem, RemoveITem.
6．VB有幾種類型的表達式？請舉例說明。　　P46
答：VB有五種類型表達式：
（1）算術表達式　　　2＊PI*R＾2
（2）字符串表達式　　“welcome”
(3)日期型表達式　　＃10/20/99＃
（4）關系表達式　　　“A”＜“B”
（5）布爾表達式　　　8＞2AND5＊3
二、論述題：
1． 舉例說明使用菜單編輯器制作菜單的詳細過程。 P219
答：（1）選取該窗體。從“工具”菜單中，選取“菜單編輯器”。或者在“工具欄”上單擊“菜單編輯器”按鈕。
（2）設置菜單、菜單項，設置其屬性。在“標題”文本框中，為第一個菜單標題鍵入希望在菜單欄上顯示的文本。如希望某一字符成為該菜單項的訪問鍵，也可在該字符前面加一個&字符。在菜單中，這一字符會自動加上一條下劃線。菜單標題文本顯示在菜單控件列表框中。在“名稱”文本框中，鍵入將用來在代碼中引用該菜單控件的名字。）單擊向左或向右箭頭按鈕，可改變該控件的縮進級，即改變該菜單條的級別。選取“下一個”就可再建一個菜單控件。單擊“插入”可以在現有的控件之間增加一個菜單控件。也可單擊向上與向下的箭頭按鈕，在現有菜單控件之中移動控件。如所有菜單控件都已創建，選取“確定”可關閉菜單編輯器。
（3）編寫菜單項代碼。
（4）運行菜單。
舉例說明手工制作工具欄的詳細過程。 P228
答：（1）手工創建工具欄。在MDI窗體上放置一個圖片框。圖片框的寬度會自動伸展，直到填滿MDI窗體工作空間。工作空間就是窗體邊框以內的區域，不包括標題條、菜單欄或所有的工具欄、狀態欄或者可能在窗體上的滾動條。在圖片框中，可放置任何想在工具欄上顯示的控件。要在圖片框中添加控件，單擊工具欄中的控件按鈕，然后在圖片框中畫出它。
（2）設置設計時的屬性。使用工具欄的一個好處是可以顯示一個形象的命令圖示。IMAGE控件是作為工具欄按鈕一個很好的選擇，因為可以用它來顯示一個位圖。在設計時設置其PICTURe屬性來顯示一個位圖，這樣，當該按鈕被單擊時，即能提供一個命令執行的可見信息。也可以通過設置按鈕的tooltiptext屬性來使用工具提示，這樣，當用戶把指針保持在一個按鈕上時，就可顯示出該工具欄按鈕的名稱。
（3）編寫代碼。
‘在MDIForm1模塊的公共過程中’
Public Sub FileNew()
Dim frmNewPad As New frMNotePad
FrmNewPad.Show
EndSub
‘在子窗體的“文件”菜單上選取“新建”
Private Sub MnuchildFileNew_Click()
MDIForm1.fileNew
End Sub
‘在MDI窗體的“文件”菜單上選取“新建”‘
Private Sub mnumdiFileNew_Click()
FileNew
End Sub
‘在工具欄上單擊“新建文件”按鈕‘
Private Sub BtnFileNew_Click()
FileNew
End Sub
(4)運行。
舉例說明使用ToolBar控件制作工具欄的詳細過程。 P230
三、填空題：
1. 窗體是設計工程的主界面。用戶在這個窗體上設計界面。窗體有自己的屬性、事件和方法。當窗體被加載時運行Load 事件。當窗體被卸載時運行Unload事件。每當用鼠標單擊窗體就會發生Click事件。每當用鼠標雙擊窗體時就會發生DblClick事件。
2. 計時器控件是一個用來進行定時觸發事件的控件，通常用計時器控件來設計與時間有關的應用程序。在工具箱中它是一個標有　秒表　圖案的工具按鈕。
3. 標簽，是提供在窗體的相對位置上　輸出文本　的區域，但該區域不能　進行編輯　。因而，常用來標識沒有　標題　屬性的控件，例如給文本框控件（TextBox）加　標題　。標簽控件也常用來　輸出文本　。
4. InputBox函數用來在對話框中顯示　提示　，等待用戶輸入　正文　或按下按鈕　，并返回包含文本框內容的　string　。
5. VB里有三種坐標系　屏幕坐標系　、窗體坐標系　以及　窗體內部坐標系　，這三種坐標系都是以其　左上角　為坐標原點。
6. 對話框不是模式的就是無模式的。對于模式對話框，只有　關閉　該對話框以后才能繼續操作應用程序的　其他部分　。無模式對話框　允許　在對話框與其他窗體之間轉移焦點而　不用關閉對話框　。
7. 按下一鍵時將生成KeyDown和KeyPress事件，而松開此鍵后生成KeyUp事件。當用戶按下一個KeyPress不能檢測的鍵時將觸發　Keydown　事件，而松開此鍵后時生成　Keyup　事件。對于鍵盤事件，只有當窗體為活動窗體且其上所有控件　均未獲得焦點　，窗體才獲得焦點。如果將窗體上的KeyPreview屬性設置為　true　，則對每個控件在控件識別其所有　鍵盤事件　之前，窗體就會接受這些鍵盤事件。
8. 命令按鈕是Windows應用程序中最常用的控件，它一般被用來 啟動 、中斷或結束一個過程。單擊它時將執行已寫入命令按鈕的 click 事件過程中的命令代碼。用戶可以將需要執行的操作放在命令按鈕的 click 事件過程中，單擊該命令按鈕就可讓程序運行，完成相應的操作。
9. 滾動條控件有　水平　滾動條和　　直　滾動條，它們的使用方法完全一樣，當在某些控件中的內容　太大或太多一次不能全部顯示時　，可通過移動滾動條使其顯示出來。有時滾動條也可用來輸入　一定范圍的數據　。
10. 文本框可用來　顯示　文本，也可用來輸入文本，當文本框控件中的文本發生變化時引發Change( )事件事件。當　單擊文本框事件　時引發Click ( )事件事件。當　雙擊文本框事件　時引發DblClick ( )事件事件。
11. 數組是一組名稱相同而　下標　不同的變量。可以用一個　數組名　引用一組數據，并用　下標　來區分它們中的每個元素。數組中每個元素稱　數組元素或稱　下標變量　。
12. VB還提供了創建圖形的一些方法，它們適用于窗體和圖片框。清除所有圖形和Print輸出用 cls 方法，設置各個像素的顏色值用 pset 方法，畫線、矩形或填充框用 line 方法，畫圓、橢圓或圓弧用 circle 方法。
13. Visual Basic通用對話框控件（CommonDialog）提供了一組標準的操作對話框，可以進行　打開　和　保存文件　、　選擇顏色　、　選擇字體　和設置打印機等操作。此外，通用對話框還能啟動幫助系統。
14. “菜單編輯器”分為上下兩部分。上部分用來　設置屬性　，下部分則用顯示用戶設置的菜單和菜單項　。彈出式菜單是獨立于菜單欄而顯示在窗體上的浮動菜單　。在彈出式菜單上顯示的項目取決于按下鼠標右鍵時　指針所處的位置　；因此，彈出式菜單也被稱為　上下文菜單或快捷菜單　。
15. 單選按鈕用于建立一組　多選一　的選項供用戶選擇，即在這些選項中，用戶一次只能選擇其中的　一個　選項，并且必須選擇其中　一個　選項。同時，當一個單選鈕被選中時，其他選項　自動關閉　。
16. 列表框是以　列表　形式顯示一系列項目和信息，用戶可通過　單擊其中某一項　來選擇的自己所需項目或信息。在Windows中，使用列表框輸出數據是保證數據標準化的重要手段，它是一個重要的　輸出控件　。在工具欄中它是一個標著　帶有滾動的列表　圖案的按鈕。
17. MsgBox 函數用來在對話框中　顯示消息　，等待用戶　單擊按鈕　，并返回一個　整數　，告訴程序用戶　單擊了哪一個按鈕　。
18. 在VB中有三種形式的數組，靜態數組、動態的數組和控件數組。靜態數組就是指數組元素的　個數在程序運行時保持不變的數組　，動態數組是指數組中的元素個數在程序運行時可以變化的數組，控件數組是使用VB中某些常用控件創建的數組。使用靜態數組、動態數組前必須要先聲明，才能在程序中使用。
20. B提供了圖形控件，如Shape控件和Line控件。它們提供一定的繪圖樣式，雖比較簡單，但是使用非常方便，不需要編寫代碼，只要設置相應的屬性即可。Shape（形狀）控件和Line控件可用來　在窗體表面畫圖形元素　。但　不支持任何事件　，只用于裝飾。在設計時，可通過設置其屬性來確定　顯示某些圖形　，也可在程序運行時修改屬性以　動態顯示圖形　。
21. 可通過 MouseDown、MouseUp、MouseMove 事件使應用程序對鼠標位置及狀態的變化作出響應。　按下任意鼠標按鈕　時發生MouseDown事件，釋放任意　鼠標按鈕　時發生MouseUp事件，鼠標指針移動到屏幕新位置時發生MouseMove事件。當鼠標指針位于　控件　上方時，控件將識別鼠標事件。如果在控件上按下鼠標按鈕不放，即使此時鼠標指針已移離該控件，直到　用戶釋放按鈕　為止，該控件仍能　識別鼠標事件　。當鼠標指針位于窗體上無控件的區域時，　窗體　將識別鼠標事件。
22．除了在應用程序中設計菜單外，可以用工具欄進一步增強應用程序的菜單界面。工具欄提供了對于應用程序中最常用的命令的 快速訪問 。工具欄（也稱為 發條或控制欄 ）已經成為許多基于 Windows 的應用程序的標準功能。使用toolbar 控件來創建工具欄非常容易且很方便，它在 Visual Basic的專業版與企業版中是可用的。
四、編程題：
輸入一個正整數，利用For循環來判斷是否為素數。 P89
啟動VB ，選“新建工程”中“標準EXE”工程。在出現的窗體上添加一個文本框、兩個標簽和兩個命令按鈕。
設置窗體和控件的屬性。標簽label1的caption屬性開始設置為“請輸入一個大于等于3的自然數N”;標簽label2的caption屬性開始設置為“輸出判斷結果：”，在工程運行后應輸出判斷具體的結果。Command1按鈕為“判斷”;Command2按鈕為“退出”。
編寫代碼。
編寫單擊命令按鈕“判斷”所執行的代碼。
Privat Sub Command1_Click()
Dim i,j,n As Long
N=Val(Text1.Text)
J=Clng(Sqr(n))
Debug.Print j
For i=2 to j
If n Mod i=0 then Exit For
Next i
If i>j then
Label2.Caption=Text1.Text&“為素數”
Else
Label2.Caption=Text1.Text&“為非素數”
End If
End Sub
編寫單擊Command2命令按鈕“退出”所執行的代碼。
Private Sub Command2_Click()
Unload Me
End Sub
編寫Form_Activate()事件發生時所執行的代碼。
Private Sub Form_Activate()
Text1.SetFocus
End Sub
運行結果。按F5鍵運行工程，當出現運行畫面時在揭示的文本框中輸入一個自然數，然后單擊“判斷”按鈕，會在標簽2中顯示結果。
設計一個屏幕保護程序，屏幕上顯示當前系統時間。
解：（１）在窗體上創建一個標簽，一個定時器。
（２）設置屬性。定時器的Interval=1
（３）編寫代碼。
　Private Sub Timeer1_Timer()
Label1=Time
End Sub
（４）運行結果。
3． 在PictureBox控件內，用Line方法和Pset方法繪制正弦和余弦曲線。P163
解：（１）設計用戶工程界面。在窗體上添加一個圖片框和三個命令按鈕。
（２）設置窗體屬性和控件的屬性。三個命令按鈕的Caption屬性分別為“正弦”、“余弦”、“退出”，其中圖片框BorderStyle屬性設置為１－Fixed single。
（３）編寫代碼。
編寫單擊“正弦”按鈕所執行的代碼。
Private Sub Command1_Click()
Const pi=3.1415926
Dim PicH As Integer,PicW As Integer
PicH=Picture1.ScaleHeight
PicW=Picture1.ScalWidth
Dim x As Integer
Picture1.Cls
Picture1.Line(0,PicH/2)-(PicW,PicH/2),RGB(0,0,255)
For x=0 to PicW
Rem
Picture1.Pset(x,PicH/2-0.4*PicH*Sin(4*x*pi/PicH)),RGB(255,0,0)
For j=0 to 4000:Next j
Next x
End Sub
編寫單擊“余弦”按鈕執行的代碼。
Private Sub Command2_Click()
Const pi=3.1415926
Dim PicH As Integer,PicW As Integer
PicH=Picture1.ScaleHeight
PicW=Picture1.ScaleWidth
Dim x As Integer
Picture1.Cls
Pictre1.Line(0,PicH/2)-(PicW,PicH/2),RGB(255，0，255)
　For j=0 to 4000:Next j
Next x
End Sub
（４）運行結果。
4． 我國古代數學家張丘建在“算經”里提出一個世界數學史上有名的百雞問題：雞翁一、值錢五、雞母一、值錢三，雞雛三、值錢一，百錢買百雞，問雞翁、母、雛各幾何？　　　　Ｐ９０
解：（1）新建“標準EXE”工程，在出現的窗體上添加四個標簽、一個列表框、一個框架和兩個命令按鈕。其中標簽1放在框架內。
（2）標簽1的Caption屬性設為“公雞每只5錢、母雞每只3錢、小雞1錢3只;100錢買100只雞，問公雞、母雞、小雞各多少只？”標簽2的Caption屬性為“公雞”，標簽3的Caption屬性為“母雞”，標簽4的Caption屬性為“小雞”。
（3）代碼編寫如下：
編寫單擊命令按鈕“計算”所執行的代碼如下：
Private Sub Command1_Click()
List1.Clear
For x=1 to 19
For y=1 to 33
Z=100-x-y
If 5*x+y*3+z/3=100 Then
P=Format(x,”@@@”)&Format(y,“@@@@@”)&Format(z,”@@@@@”)
List1.AddItem p: Rem
End If
Next y
Next x
End Sub
編寫單擊命令按鈕“退出”所執行的代碼如下：
Private Sub Command2_Click()
End
End Sub
(4)運行結果。按Ｆ５鍵運行工程，出現運行界面后按“計算”按鈕得到結果。
5． 求斐波那契數列的前N項。斐波那契數列問題是一個著名的古典數學總問題。此數列前幾項為： 1，1，2，3，5，8，13，21，34，55，89，……
從數列中，可以看出這樣的規律，這是一個典型的“遞推”問題。從第三項開始，每一項都是由前兩項相加得到的。即后面某一項可以從前面已知的項數求出。
斐波那契數列的第一項和第二項的值為：F1 = 1 F2 = 1 ， 從第三項開始，其遞推關系式如下： Fn =Fn-1 +Fn-2 。用Line方法在窗體上畫出兩個正方形，一個是空心，一個是實心。 P164
Dim f1,f2,f,s,i,n
N=inputbox(“請輸入項數：“)
　　　F1=1
F2=1
Print f1,f2
S=2
For i=3 to n
F=f1+f2
F2=f1
S=s+f
Print “F=”, F
Next i
Print “S=”,S
Private Sub Form_Click()
Line(600,600)-Step(1000,1000),RGB(0,255,0),B
Line(2000,600)-Step(1000,1000),RGB(255,0,0),BF
End Sub
6． 任意輸入一個自然數，編程輸出其各個因子。　　　Ｐ９３
解：（１）新建“標準ＥＸＥ”工程，在出現的界面上添加三個標簽，一個文本框和兩個命令按鈕。
（２）設置窗體及控件的屬性。標簽１的Caption屬性為“請輸入一個自然數”；標簽２的Caption屬性為“Ｎ的因子是：”；標簽３的Caption屬性為空，在運行時賦值。標簽３的Autosize屬性為True；以便在運行時賦值能根據實際內容自動適應。命令１按鈕為“計算”，命令２按鈕為“退出”。
（３）編寫代碼如下：
編寫單擊命令按鈕“計算”所執行的代碼。
Private Sub Command1_Click()
Dim x As String, y As Single
Y=Val(Text1.Text)
I=2
X=””
Do While y<>1
If y Mod i=0 Then
X=x&”*”&Str(i)&Chr(13)
Y=y/i
Else
I=i+1
End if
Loop
Label2.Caption=x
Label1.Caption=Text1.Text&”的因子是：“
End Sub
編寫單擊命令按鈕“退出“所執行的代碼。
Private Sub Command2_Click()
End
End Sub
（４）運行結果。按Ｆ５執行工程，當出現運行界面時，從文本中輸入一個自然數，然后單擊命令按鈕“計算“就會得到結果，即在標簽３中輸出了自然數的各個因子相*的結果。標簽２的內容也根據輸入的數自動改變。
寫求1到n的和Function Sum的過程。 P138
Private Function Sum(n As Integer) As Integer
Sum=0
For i=1 to n
Sum=sum+i
Next i
End Function
8． 用Circle方法在窗體上畫出一個正圓和一個橢圓。 P166
Private Sub Form_Click()
Const PI=3.1415926
FillStyle=1
Circle(2000,1000),800
End Sub
Private Sub Form_Click()
Rem
FillStyle=1
Circle(2000,1000),800,,,,1/3
End Sub
PAGE
1

展開更多......

收起↑