第一篇：《vb程序設(shè)計》期末復(fù)習(xí)題及答案范文

《vb程序設(shè)計》期末復(fù)習(xí)題及答案

一、填空題

1．創(chuàng)建一個VB應(yīng)用程序三個主要的步驟是_(創(chuàng)建應(yīng)用程序界面)、_(設(shè)置屬性_)和_(_編寫代碼__)__。

2．當(dāng)程序運行時，要求窗體中的文本框呈現(xiàn)空白，則在設(shè)計時，應(yīng)當(dāng)在此文本框的__屬性________窗口中，把此文本框的____text_________屬性設(shè)置成空白。

3．Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信息，可使用___label________控件；若允許用戶輸入文本，則應(yīng)使用__textbox___________控件。4．窗體的常用方法有_load方法 Show方法 Hide方法_ Unload方法_。

5．要想在代碼中給名為txtshow的文本框賦予文本：GOOD WORK，應(yīng)當(dāng)編寫的語句是_（txtshow.text=“GOOD WORK”_）。

6．若命令按鈕的名稱為Cmdopen，程序要求單擊該命令按鈕時，打開一個窗口frm1，請對以下事件過程填空。Private Sub Cmdopen_ _click()__________ _frm1.show_ End Sub 7．Visual Basic 6種類型的表達(dá)式是_（算術(shù)表達(dá)式_）（字符串表達(dá)式）（關(guān)系表達(dá)式）（布爾表達(dá)式）（日期表達(dá)式）（對象表達(dá)式）。Visual Basic根據(jù)表達(dá)式的_．1 _運算符__來確定表達(dá)式的類型。

8．表達(dá)式93 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表達(dá)式a>b and Not c>a Or c>b And ca And Not b

10．日期表達(dá)式 #2/24/02#y ^ 2)/(2 * x)___。

12．設(shè)某個程序中要用到一個二維數(shù)組，要求數(shù)組名為A，類型為字符串類型，第一維下標(biāo)從1到5，第二維下標(biāo)從-2到6，則相應(yīng)的數(shù)組聲明語句為_（Dim A(1 To 5，-2 To 6)As String）_。13．事件就是在對象上所發(fā)生的事情，Visual Basic中的事件如__單擊_________、_雙擊__________、_裝載_____________等。一個對象響應(yīng)的事件可以有_多____個，用戶不能建立新的事件。事件過程是指_（響應(yīng)某個事件后所執(zhí)行的程序代碼）_。假設(shè)某一事件過程如下：

Private Sub cmd1_Click()Form1.Caption=“VB示例” End Sub 則響應(yīng)該過程的對象名是_cmd1_____________，事件名是_____click________。

14．對象的方法用于(_完成某種特定的功能__)。當(dāng)方法不需要任何參數(shù)并且也沒有返回值時，調(diào)用對象的方法的格式為_(對象名.方法名)_，例如，對窗體Form1使用Show方法，應(yīng)寫成__form1.show_______________。

15．PictureBox控件可通過設(shè)置其(autosize)__屬性為True使之可自動調(diào)整大小；而Image控件可通過設(shè)置其_(stretch_)__屬性為True，使其加載的圖片能自動調(diào)整大小以適應(yīng)Image。

16．在Visual Basic程序中實現(xiàn)復(fù)制文件“c:command.com”到d:盤根目錄下的語句為FileCopy “c:command.com”，“d:command.com”_。

二、單項選擇題

1．下列控件中沒有Caption屬性的是（B）

A、標(biāo)簽 B、文本框 C、框架 D、命令按紐 2．除框架外，能對單選按紐分組的控件是（C）。A、窗體 B、標(biāo)簽 C、圖片框 D、圖像 3．下列符號不能作為VB中變量名的是（C）。

A、ABCDEFG B、P00000 C、89YWDDF D、xyz 4． 下列不屬于Visual Basic數(shù)據(jù)文件的是（D）。A、順序文件 B、隨機(jī)文件 C、二進(jìn)制文件 D、數(shù)據(jù)庫文件

5．若要求從文本框中輸入密碼時在文本框中只顯示*號，則應(yīng)用在此文本框的屬性窗口中設(shè)置（D）。

A、Text屬性值為* B、Caption屬性值為* C、Password屬性值為空 D、PasswordChar屬性值為* 6．表達(dá)式2*3^2+2*8/4+3^2的值為（B）。A、64 B、31 C、49 D、42 7．表達(dá)式mid(“abcdefg”,3,2)的值是（B）A、abc B、cd C、bcd D、abcde 8．?dāng)?shù)學(xué)表達(dá)式Sin25°寫成VB表達(dá)式是（D）。A、Sin25 B、Sin（25）C、Sin（25°）D、Sin（25*3.14/180）

9．Sub過程與 Function過程最根本的區(qū)別是（D）。A、Sub過程可以使用Call語句或直接使用過程名調(diào)用，而Function過程不可以。

B、Function過程可以有參數(shù)，Sub過程不可以。C、兩種過程參數(shù)的傳遞方式不同。

D、Sub過程的過程名不能返回值，而Function過程能夠通過過程名返回值。

10．選拔身高T超過1.7米且體重W小于62.5公斤的人，表示該條件的布爾表達(dá)式為（C）

A、T>=1.7 And W<=62.5 B、T<=1.7 Or W>=62.5 C、T>1.7 And W<62.5 D、T>=1.7 Or W<62.5 11.下列對象不能響應(yīng) Click事件的是（D）A、列表框 B、圖片框 C、窗體 D、計時器

12．在Visual Basic中，按文件的訪問方式不同，可以將文件分為（A）

A、順序文件、隨機(jī)文件和二進(jìn)制文件 B、文本文件和數(shù)據(jù)文件

C、數(shù)據(jù)文件和可執(zhí)行文件 D、ASCⅡ文件和二進(jìn)制文件

13．將通用對話框CommonDialog的類型設(shè)置成“顏色”對話框，可調(diào)用該對話框的（C）方法。

A、ShowOpen B、ShowSave C、ShowColor D、ShowFont

三、指出下列句中的錯誤，修改或者說明原因。1．sum和int.sum都可以作為VB的變量名。(X)2．變量名的長度最長可達(dá)1024個字符。(255)3．下列程序運行結(jié)果：3，3 Option Explicit Private Sub Command1_Click()Dim a，b As Integer Dim a as integer ,b as integer a = 3.6 b = 3.6 Text1.Text = a Text2.Text = b End Sub 4．程序可以改變定長字符串的內(nèi)容和長度。

5．Variant是一種特殊的數(shù)據(jù)類型，可以包含任何種類型的數(shù)據(jù)。．不完全正確。Variant是一種特殊的數(shù)據(jù)類型，除了定長字符串?dāng)?shù)據(jù)及用戶定義類型外，可以包含任何種類型的數(shù)據(jù)，這是VB規(guī)定。

6．下列程序運行結(jié)果為True Private Sub Command1_Click()a = 1 b = 2 c = 3 Text1.Text = c > a + b Or b1 And c + a > a Xor b < c#12/20/1999#的運算結(jié)果是#12/11/1999# 8．可以在窗體的通用部分聲明靜態(tài)變量。

不正確。靜態(tài)變量為局部變量，只能在過程中聲明。

9．使用聲明語句建立一個變量后，Visual Basic會自動對數(shù)值類型的變量賦初值0，變長的字符串被初始化為一個零長度的字符串“"，定長字符串用空格填充，Variant變量被初始化為 Empty，布爾型的變量被初始化為False。

10．事件過程通常由事件驅(qū)動執(zhí)行，而Sub過程通過過程調(diào)用執(zhí)行。

11．將焦點主動設(shè)置到指定的控件或窗體上應(yīng)采用SetFocus方法。12．當(dāng)圖像控件（Image）的Stretch屬性為True時，Image控件能自動調(diào)整自己的尺寸與顯示的圖片匹配。

不正確。該屬性設(shè)為Ture時，Image控件不能自動調(diào)整自己的尺寸與顯示的圖片匹配，而可以使圖片自動擴(kuò)展以適應(yīng)控件的尺寸。

四、讀程序題，寫出程序運行結(jié)果。1．Private Sub Form_Click()For I = 1 To 9 For j = 1 To 301 To 1 Step-1 Print k;Next k Print Next I End Sub 2．

Option Explicit Private Sub Command1_Click()Static S As Integer Dim i As Integer S = 1 For i = 1 To 5 S = S * i Next i Print S End Sub 3．

For X = 5 To 1 Step-1 For Y = 1 To 6y ^ 2)/(2 * x)12．Dim A(1 To 5，-2 To 6)As String 13．單擊 雙擊 裝載 多 響應(yīng)某個事件后所執(zhí)行的程序代碼 cmd1 Click 14．完成某種特定的功能 對象名.方法名 Form1.Show 15．AutoSize Stretch 16．FileCopy ”c:command.com“，”d:command.com“

二、單項選擇題

1．B 2．C 3．C 4．D 5．D 6．B 7．B 8．D 9．D 10．C 11．D 12．A 13．C

三、指出下列句中的錯誤，修改或者說明原因。1．int.sum 不正確。變量名中不能包括小數(shù)點。2．變量名的長度最長可達(dá)255個字符。3． 3.6，4 因為a 不是整型變量。

4．不正確。程序不可以改變字符的長度，這是VB規(guī)定。5．不完全正確。Variant是一種特殊的數(shù)據(jù)類型，除了定長字符串?dāng)?shù)據(jù)及用戶定義類型外，可以包含任何種類型的數(shù)據(jù)，這是VB規(guī)定。

6．False。邏輯表達(dá)式計算結(jié)果。

7．不正確。兩個日期型數(shù)據(jù)相減，其結(jié)果是一個數(shù)值型數(shù)據(jù)。8．不正確。靜態(tài)變量為局部變量，只能在過程中聲明。9．正確。10．正確。11．正確。

12．不正確。該屬性設(shè)為Ture時，Image控件不能自動調(diào)整自己的尺寸與顯示的圖片匹配，而可以使圖片自動擴(kuò)展以適應(yīng)控件的尺寸。

四、讀程序題，寫出程序運行結(jié)果。1．程序運行后，單擊窗體，輸出結(jié)果為： 1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1 1 2 3 4 5 4 3 2 1 1 2 3 4 5 6 5 4 3 2 1 1 2 3 4 5 6 7 6 5 4 3 2 1 1 2 3 4 5 6 7 8 7 6 5 4 3 2 1 1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1

2．程序運行后，單擊按鈕Command1，輸出結(jié)果為： 3.* ** *** **** ***** 4.aabb-30 False aabb-30 False

30+60 90 30+60 90 5.11 13 9

五、編程題 1．

。120 Private Sub Command1_Click()Text1.Text = ”“ Text2.Text = ”“ Text3.Text = ”“ Text4.Text = ”“ End Sub

Private Sub Command2_Click()a = Trim(Text1.Text)b = Trim(Text2.Text)c = Trim(Text3.Text)If a = ”“ Or b = ”“ Or c = ”“ Then MsgBox ”成績填寫不完全！“, vbCritical Else Text4.Text =(Val(a)+ Val(b)+ Val(c))/ 3 End If End Sub

Private Sub Command3_Click()Unload Me End Sub 2．

Private Sub Command1_Click()x = Val(Text1.Text)If x Mod 3 = 2 And x Mod 5 = 3 And x Mod 7 = 4 Then Print x Else Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text)End If End Sub 3．

Private Sub Check1_Click()If Check1.Value = 1 Then Label1.Font.Bold = True Else Label1.Font.Bold = False End If End Sub

Private Sub Check2_Click()If Check2.Value = 1 Then Label1.Font.Italic = True Else Label1.Font.Italic = False End If End Sub

Private Sub Command1_Click()Unload Me End Sub 4．

a = Val(InputBox(”輸入第一個數(shù)：“))b = Val(InputBox(”輸入第二個數(shù)：“))c = Val(InputBox(”輸入第三個數(shù)：“))If a < b Then t = a: a = b: b = t If a < c Then t = a: a = c: c = t If b < c Then t = b: b = c: c = t MsgBox(”求大小排第二的數(shù)是：" & b)

原文網(wǎng)址: http://hi.baidu.com/%CC%EC%D0%AB%C4%A7%BE%FD/blog/item/d446b034a6b3373f5bb5f5fd.html

由弘一網(wǎng)童保存，尚未注冊。注冊

第二篇：VB程序設(shè)計期末模擬試題及答案

0 《VB》期末復(fù)習(xí)題及答案

綜合復(fù)習(xí)題

一、填空題

1．創(chuàng)建一個VB應(yīng)用程序三個主要的步驟是__________________、________________和_____________________。

2．當(dāng)程序運行時，要求窗體中的文本框呈現(xiàn)空白，則在設(shè)計時，應(yīng)當(dāng)在此文本框的__________窗口中，把此文本框的_____________屬性設(shè)置成空白。

3．Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信息，可使用___________控件；若允許用戶輸入文本，則應(yīng)使用_____________控件。

4．窗體的常用方法有__________、___________、___________和___________。5．要想在代碼中給名為txtshow的文本框賦予文本：GOOD WORK，應(yīng)當(dāng)編寫的語句是____________________________________。

6．若命令按鈕的名稱為Cmdopen，程序要求單擊該命令按鈕時，打開一個窗口frm1，請對以下事件過程填空。

Private Sub Cmdopen_ ___________ _____________________ End Sub 7．Visual Basic 6種類型的表達(dá)式是______________、______________、______________、________________、_________________、____________________。Visual Basic根據(jù)表達(dá)式的___________來確定表達(dá)式的類型。8．表達(dá)式93 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表達(dá)式a>b and Not c>a Or c>b And ca And Not b c2 End Sub 7．#12/31/1999#3 * I Print “ ”;Next j For k = 1 To I Print k;Next k For k = IX Print Tab(Y + 5);“*”;Next Y Print Next X 4．

Private Sub Form_Activate()Print “aa” & “bb”,-5 * 6,Not 2 <= 3 Print “aa” & “bb”;-5 * 6;Not 2 <= 3 Print Print “30+60”, Print 30 + 60 ？

？“30+60”;30 + 60 End Sub 5． X=1 Do While X<=10 If X Mod 7 =0 Then Y = X + 6 Else Z = X End If X = X + 2 Loop Print X,Y,Z

五、編程題

1．設(shè)計一個計算程序。該程序用戶界面如圖所示，由四個文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三個按鈕：命令按鈕1（command1）、命令按鈕2（command2）、命令按鈕3（command4）組成。程序運行后，用戶單擊清除按鈕，則清除文本框中顯示的內(nèi)容。單擊計算按鈕，如果成績填寫不完全，則給 4

出提示信息，否則計算三科平均成績。單擊退出按鈕則退出。

2．設(shè)計程序。要求：從文本框Text1中接收輸入的數(shù)據(jù)，當(dāng)單擊確定按鈕（command1）時，如果該數(shù)據(jù)滿足條件：除以3余2，除以5余3，除以7余4，則輸出；否則將焦點定位在文本框Text1中，選中其中的文本。

3．設(shè)計一個歡迎程序。該程序用戶界面如圖所示。要求程序運行后，用戶選中粗體復(fù)選框時，標(biāo)簽（Label1）中的文字（歡迎您！）的字體變成粗體，用戶選中斜體復(fù)選框時，標(biāo)簽的字體變成斜體。若取消選中，則恢復(fù)原字體。單擊結(jié)束，則退出。4．任意輸入3個數(shù)，求大小排第二的那個數(shù)，寫出程序代碼。《VB》期末復(fù)習(xí)參考答案

一、填空題

1．創(chuàng)建應(yīng)用程序界面 設(shè)置屬性 編寫代碼 2．屬性、text 3．Label TextBox 4．Load方法 Show方法 Hide方法 Unload方法 5．txtshow.text=“GOOD WORK” 6．Click()、frm1.show 7．算術(shù)表達(dá)式 字符串表達(dá)式 關(guān)系表達(dá)式 布爾表達(dá)式 日期表達(dá)式 對象表達(dá)式 運算符 8．1 9．True False 10．12 11．Sin(x)^ 2 + Sqr(x ^ 2-y ^ 2)/(2 * x)12．Dim A(1 To 5，-2 To 6)As String 13．單擊 雙擊 裝載 多 響應(yīng)某個事件后所執(zhí)行的程序代碼 cmd1 Click 14．完成某種特定的功能 對象名.方法名 Form1.Show 15．AutoSize Stretch 16．FileCopy “c:command.com”，“d:command.com”

二、單項選擇題

1．B 2．C 3．C 4．D 5．D 6．B 7．B 8．D 9．D 10．C 11．D 12．A 13．C

三、指出下列句中的錯誤，修改或者說明原因。1．int.sum 不正確。變量名中不能包括小數(shù)點。2．變量名的長度最長可達(dá)255個字符。3． 3.6，4 因為a 不是整型變量。

4．不正確。程序不可以改變字符的長度，這是VB規(guī)定。

5．不完全正確。Variant是一種特殊的數(shù)據(jù)類型，除了定長字符串?dāng)?shù)據(jù)及用戶定義類型外，可以包含任何種類型的數(shù)據(jù)，這是VB規(guī)定。6．False。邏輯表達(dá)式計算結(jié)果。

7．不正確。兩個日期型數(shù)據(jù)相減，其結(jié)果是一個數(shù)值型數(shù)據(jù)。8．不正確。靜態(tài)變量為局部變量，只能在過程中聲明。9．正確。10．正確。

11．正確。

12．不正確。該屬性設(shè)為Ture時，Image控件不能自動調(diào)整自己的尺寸與顯示的圖片匹配，而可以使圖片自動擴(kuò)展以適應(yīng)控件的尺寸。

四、讀程序題，寫出程序運行結(jié)果。

1．程序運行后，單擊窗體，輸出結(jié)果為： 1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1 1 2 3 4 5 4 3 2 1 1 2 3 4 5 6 5 4 3 2 1 1 2 3 4 5 6 7 6 5 4 3 2 1 1 2 3 4 5 6 7 8 7 6 5 4 3 2 1 1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1 2．程序運行后，單擊按鈕Command1，輸出結(jié)果為：120。3.* ** *** **** ***** 4.aabb-30 False aabb-30 False 30+60 90 30+60 90 5.11 13 9

五、編程題 1．

Private Sub Command1_Click()Text1.Text = “" Text2.Text = ”“ Text3.Text = ”“ Text4.Text = ”“ End Sub Private Sub Command2_Click()a = Trim(Text1.Text)b = Trim(Text2.Text)c = Trim(Text3.Text)If a = ”“ Or b = ”“ Or c = ”“ Then MsgBox ”成績填寫不完全！“, vbCritical Else Text4.Text =(Val(a)+ Val(b)+ Val(c))/ 3 6

End If End Sub Private Sub Command3_Click()Unload Me End Sub 2．

Private Sub Command1_Click()x = Val(Text1.Text)If x Mod 3 = 2 And x Mod 5 = 3 And x Mod 7 = 4 Then Print x Else Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text)End If End Sub 3．

Private Sub Check1_Click()If Check1.Value = 1 Then Label1.Font.Bold = True Else Label1.Font.Bold = False End If End Sub Private Sub Check2_Click()If Check2.Value = 1 Then Label1.Font.Italic = True Else Label1.Font.Italic = False End If End Sub Private Sub Command1_Click()Unload Me End Sub 4．

a = Val(InputBox(”輸入第一個數(shù)：“))b = Val(InputBox(”輸入第二個數(shù)：“))c = Val(InputBox(”輸入第三個數(shù)：“))If a < b Then t = a: a = b: b = t If a < c Then t = a: a = c: c = t If b < c Then t = b: b = c: c = t MsgBox(”求大小排第二的數(shù)是：" & b)

第三篇：VB程序設(shè)計期末模擬試題及答案

《VB》期末復(fù)習(xí)題及答案

綜合復(fù)習(xí)題

一、填空題

1．創(chuàng)建一個VB應(yīng)用程序三個主要的步驟是__創(chuàng)建應(yīng)用程序界面_、_設(shè)置屬性_和_編寫代碼_。2．當(dāng)程序運行時，要求窗體中的文本框呈現(xiàn)空白，則在設(shè)計時，應(yīng)當(dāng)在此文本框的 屬性 窗

口中，把此文本框的__text__屬性設(shè)置成空白。

3．Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信 息，可使用___Label_____控件；若允許用戶輸入文本，則應(yīng)使用___TextBox___控件。4．窗體的常用方法有_Load方法 Show方法 Hide方法 Unload方法 5．要想在代碼中給名為txtshow的文本框賦予文本：GOOD WORK，應(yīng)當(dāng)編寫的語句是 txtshow.text=“GOOD WORK” 6．若命令按鈕的名稱為Cmdopen，程序要求單擊該命令按鈕時，打開一個窗口frm1，請對以

下事件過程填空。

Private Sub Cmdopen_ Click()、frm1.show End Sub 7．Visual Basic 6種類型的表達(dá)式是 算術(shù)表達(dá)式 字符串表達(dá)式 關(guān)系表達(dá)式 布爾表達(dá)式 日期表達(dá)式 對象表達(dá)式，Visual Basic根據(jù)表達(dá)式的_運算符來確定表達(dá)式的類型。8．表達(dá)式93 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表達(dá)式a>b and Not c>a Or c>b And c

達(dá)式c>a And Not b

10．日期表達(dá)式 #2/24/02#1 > c2 End Sub 7．#12/31/1999#3 * I Print “ ”;Next j For k = 1 To I Print k;Next k For k = IX Print Tab(Y + 5);“*”;Next Y Print Next X 4．

Private Sub Form_Activate()Print “aa” & “bb”,-5 * 6,Not 2 <= 3 Print “aa” & “bb”;-5 * 6;Not 2 <= 3 Print Print “30+60”, Print 30 + 60 ？

？“30+60”;30 + 60 End Sub 5． X=1 Do While X<=10 If X Mod 7 =0 Then Y = X + 6 Else Z = X End If X = X + 2 Loop Print X,Y,Z

五、編程題

1．設(shè)計一個計算程序。該程序用戶界面如圖所示，由四個文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三個按鈕：命令按鈕1（command1）、命令按鈕2（command2）、命令按鈕3（command4）組成。程序運行后，用戶單擊清除按鈕，則清除文本框中顯示的內(nèi)容。單擊計算按鈕，如果成績填寫不完全，則給出提示信息，否則計算三科平均成績。單擊退出按鈕則退出。

2．設(shè)計程序。要求：從文本框Text1中接收輸入的數(shù)據(jù)，當(dāng)單擊確定按鈕（command1）時，如果該數(shù)據(jù)滿足條件：除以3余2，除以5余3，除以7余4，則輸出；否則將焦點定位在文本框Text1中，選中其中的文本。

3．設(shè)計一個歡迎程序。該程序用戶界面如圖所示。要求程序運行后，用戶選中粗體復(fù)選框時，標(biāo)簽（Label1）中的文字（歡迎您！）的字體變成粗體，用戶選中斜體復(fù)選框時，標(biāo)簽的字體變成斜體。若取消選中，則恢復(fù)原字體。單擊結(jié)束，則退出。4．任意輸入3個數(shù)，求大小排第二的那個數(shù)，寫出程序代碼。

第四篇：VB程序設(shè)計期末復(fù)習(xí)總結(jié)[范文模版]

1.timer_Tick事件 在指定的時間里調(diào)用此事件，比如設(shè)置timer1.interval=10，則表示在一秒內(nèi)執(zhí)行10次timer_Tick事件。

2.Label3.Text = Format(x, “00000”)，設(shè)置x是一個五位數(shù)，不足左側(cè)用零來補(bǔ)。

3.TextBox1.Text = UCase(TextBox1.Text)，將輸入的字母轉(zhuǎn)換成大寫，用textchanged事件 4.Label1.Font = New Font(“隸書”, 12, FontStyle.Bold)設(shè)置字體名：Textbox1.Text.Font.Name = “微軟雅黑”。設(shè)置字號：Textbox1.Text.Font.Size = 14。設(shè)置粗體：Textbox1.Text.Font.Bold = True。設(shè)置斜體：Textbox1.Text.Font.Italic = True。設(shè)置下劃線：Textbox1.Text.Font.Underline = True。設(shè)置刪除線：Textbox1.Text.Font.Strikethrough = True。Label1.Font = New Font(Font.Name, 12, FontStyle.Italic)也可如此 5.將Button1控件的左上角定位于距窗體左邊框60、距頂部40的位置。Button1.Location = New Point(60,40)等價于：Button1.Left = 60

Button1.Top = 40 6.例如，將Button1控件設(shè)置為寬度為80、高度為30。Button1.Size = New Size(80,30)等價于：Button1.Width = 80

Button1.Height = 30 7.Size與clientsize。前者是整個窗體的大小，后者是不含邊框的窗體的大小。

8.Cursor屬性決定運行時鼠標(biāo)移動到對象上時，顯示出的鼠標(biāo)指針的圖像。其屬性值是枚舉類型。

9.ControlBox和Icon屬性決定標(biāo)題欄上是否有控制菜單框、設(shè)置其圖標(biāo)。默認(rèn)情況下，ControlBox屬性值為True，若設(shè)置為False，則不顯示控制菜單框，并且不顯示最大化 按鈕、最小化按鈕和關(guān)閉按鈕。

10.FormBorderStyle屬性用于設(shè)置窗體邊框的樣式。其他的BorderStyle屬性是用來設(shè)置邊框格式的。

11.窗體的常用事件。Click事件，在程序運行時單擊窗體的某個位置，VB將調(diào)用窗體的Form_Click事件過程，如果單擊的是窗體內(nèi)的控件，則只能調(diào)用相應(yīng)控件的Click事件過程。Load事件，當(dāng)窗體被裝入時觸發(fā)該事件。當(dāng)應(yīng)用程序啟動時，自動執(zhí)行該事件過程，因此通常將進(jìn)行初始化的程序代碼寫在窗體的Load事件過程中。12.TextAlign屬性用于設(shè)置文本的對齊方式。Left：正文左對齊，Right：正文右對齊，Center：正文居中。也可用于決定對象的位置。

13.Maxlength屬性用于設(shè)置文本框中最多能夠輸入字符的個數(shù)。默認(rèn)情況下，其值為32767。14.ScrollBars屬性用于設(shè)置水平滾動條和垂直滾動條。當(dāng)設(shè)置水平滾動條后，文本框的自動換行功能將會自動消失，只有按Enter鍵才能換行。豎直滾動條則正常換行。

15.ReadOnly屬性用于設(shè)置文本框是否可以編輯。默認(rèn)值為False，表示運行程序時能對文本框進(jìn)行編輯。當(dāng)其值為True時，不能編輯文本框中的內(nèi)容，但可以選定文本框中的內(nèi)容。

16.PassWordChar屬性設(shè)置在文本框中取代用戶輸入而顯示的字符。例如，當(dāng)設(shè)置為“*”時，運行程序時文本框中輸入的內(nèi)容存儲在Text屬性中，但均以“*”顯示。一般用于設(shè)置口令。

17.TextChange事件當(dāng)用戶輸入新內(nèi)容或程序?qū)ext屬性設(shè)置為新值時，文本框的Text屬性值發(fā)生變化，從而觸發(fā)TextChange事件。當(dāng)用戶輸入一個字符時，就會觸發(fā)一次TextChange事件。例如，在文本框中輸入字符串Basic時，就會5次觸發(fā)TextChange事件。出發(fā)之后開始執(zhí)行設(shè)置程序。

18.KeyPress事件當(dāng)用戶在文本框中按下并釋放鍵盤上的一個鍵時，就會觸發(fā)KeyPress事件。與TextChange事件類似。所不同的是，當(dāng)按下某些鍵（如方向鍵）時，文本框的值沒有發(fā)生變化，此時僅觸發(fā)KeyPress事件，而不觸發(fā)TextChange事件。KeyPress事件會返回一個e參數(shù)，通過e.KeyChar可以獲取按鍵對應(yīng)的字符。例如，運行程序時按了字符“A”鍵，則e.KeyChar的值為“A”。將命令按鈕的Text屬性設(shè)置為“退出(&E)”。運行時，按鈕上顯示“退出(E)”。當(dāng)用戶按下Alt+E時，相當(dāng)于單擊了該按鈕，運行其Click事件過程。

19.Picturebox屬性：將圖像文件c:examplerabbit.jpg顯示在PictureBox1圖片框中：PictureBox2.Image=Image.FromFile(“c:examplerabbit.jpg”)20.Picturebox屬性：SizeMode屬性用于設(shè)置圖片框中圖像的顯示方式，屬性值有：Normal：默認(rèn)值，圖像保持其原始尺寸、其左上角與圖片框的左上角對齊。如果圖像比圖片框大，則超過部分被剪裁掉；StretchImage：圖像被拉伸或收縮，使其與圖片框的大小一致；AutoSize：圖像保持其原始尺寸、自動調(diào)整圖片框的大小，使其與圖像大小一致；CenterImage：圖像保持其原始尺寸、與圖片框的中心對齊。若圖像比圖片框小，圖像居中顯示；否則，圖像居中，而外邊緣將被剪裁掉；Zoom：圖像大小按其原有的大小比例被縮放，其寬度或高度之一與圖片框一致。

21.Vb中變量命名法：必須以字母或下劃線開頭，由字母、數(shù)字和下劃線組成，長度不超過1023個字符。如果名稱以下劃線開頭，則必須包含至少一個字母或數(shù)字。不能使用VB中的關(guān)鍵字，如：Integer、If等。

22.Boolean類型是邏輯類型，表示true和false。

23.n是十進(jìn)制/八進(jìn)制/十六進(jìn)制整數(shù)，八進(jìn)制在整數(shù)前面加&O（是字母O，不是數(shù)字0），例如：&O56、&O56S、&O56L。十六進(jìn)制在整數(shù)前面加&H例如：&H56、&HAB12、&HAB、&HABS、&HABL。Decimal、Single、Double只能表示十進(jìn)制，前者是因為定義，后兩者是因為是浮點數(shù)。

24.格式：Mid(s, n[, m])、Left(s, n)、Right(s, n)功能：s是一個字符型數(shù)據(jù)，n和m是一個整型數(shù)據(jù)。Mid返回從字符串s中的第n個字符開始的m個字符，無m則表示所有自字符。Left返回字符串s中左邊n個字符，Right返回字符串s中右邊n個字符。

Mid(b, 2, 1)= 0

? Microsoft.VisualBasic.Left(b, 3)= 0

? Mid可用于賦值，left與right不可用于賦值。

25.后綴

26.Char類型，用來存儲單個字符或漢字，占兩個字節(jié)。例如：“A”、“0”、“數(shù)”等。String類型，表示包含多個字符的字符串用一對西文雙引號““”括起來表示例如：”Visual Basic“、”2016“、”G“、” “空字符串”“若表示的字符串中包含雙引號“””，則用連續(xù)的兩個雙引號表示。

27.字符串查找：格式：Instr([n,] s1, s2)，功能：n和m是一個整型數(shù)據(jù)，s1和s2是一個字符型數(shù)據(jù)。Instr函數(shù)在s1字符串中從第n個字符開始查找s2字符串，如果找到s2字符串，返回s2在s1中的起始位置值，否則返回0。若省略n，則從第一個字符開始查找。例如文本框TextBox1中輸入的是書名，判斷書名中是否含有“計算機(jī)”三個字的表達(dá)式為：If InStr(TextBox1.Text, “計算機(jī)”)> 0 Then 28.Date類型變量d的值是d = “[8 / 20 / 2009]6:5:4[AM]”

[月日年]時:分:秒[上下午] 29.算術(shù)運算符的優(yōu)先級：指數(shù)取負(fù)，乘除整除，取余加減（^-*/+-mod）

30.串聯(lián)運算符“+”運算符既可作為字符串運算符，又可作為算術(shù)運算符。當(dāng)“+”運算符兩邊操作數(shù)都是字符串時，進(jìn)行串聯(lián)運算，將兩個字符串連接起來，并作為結(jié)果。當(dāng)“+”運算符兩邊操作數(shù)都是數(shù)值時，進(jìn)行加法運算。當(dāng)一側(cè)是數(shù)字字符串，另一側(cè)是數(shù)值時，若option strict為on則顯示錯誤，off則正確轉(zhuǎn)化為double運算，默認(rèn)值為off；當(dāng)一側(cè)是數(shù)值，另一側(cè)是非數(shù)字的字符串是，錯誤?！?”運算符不管兩邊操作數(shù)的數(shù)據(jù)類型，直接進(jìn)行連接操作。

31.關(guān)系運算符設(shè)計比較時注意：兩個操作數(shù)都是數(shù)字則直接比較；都是字符則比較ascll碼值；中文最牛逼；比較運算符優(yōu)先級相同；

32.Like函數(shù)的用法：Like運算符與通配符：?、*、#、[字符列表]、[!字符列表]結(jié)合使用。其中，？表示任何一個字符，* 表示任意多個字符，# 表示任何一個數(shù)字（0~9），[字符列表] 表示字符列表中任意一個字符，[!字符列表] 表示不在字符列表中的任意一個字符。

If b Like “[” & A(m)& “]” Then If Not e.KeyChar Like “[a-zA-Z]” Then 33.當(dāng)多種表達(dá)式同時在一個表達(dá)式中出現(xiàn)時，其優(yōu)先級的順序如下：

算術(shù)運算符＞字符串運算符＞關(guān)系運算符＞邏輯運算符

具有相同優(yōu)先順序的運算符將按照它們在表達(dá)式中出現(xiàn)的順序從左至右進(jìn)行計算。當(dāng)表達(dá)式中包含多個運算符時，使用圓括號，可以改變計算順序，圓括號內(nèi)的表達(dá)式優(yōu)先計算。34.35.36.邏輯運算符的功能是對操作數(shù)進(jìn)行邏輯運算（又稱布爾運算），其運算結(jié)果是邏輯值True或False。Const PI As Single = 3.1415

'聲明符號常量。聲明一個常量，不一定非得用dim，const也可以

數(shù)學(xué)函數(shù)包含在System.Math類中。該類中包含許多方法和常量，利用這些方法和常量可以進(jìn)行各種數(shù)學(xué)運算。這些方法可以作為數(shù)學(xué)函數(shù)使用，使用時，在函數(shù)名前面加“Math.”。

四舍五入函數(shù)，格式：Round(x[,n])。功能：x是一個數(shù)值型量，將x值四舍五入，得到最接近的整數(shù)或指定的小數(shù)位數(shù)n的值。缺省n時，表示四舍五入取整。示例：Math.Round(4.56)的運算結(jié)果為5，Math.Round(4.56, 1)的運算結(jié)果為4.6 字符和ASCII碼轉(zhuǎn)換函數(shù)，格式：Asc(s)、Chr(x)。功能：c是一個字符型量、x是一個數(shù)值型量。Asc計算出字符串的第一個字符的ASCII碼值，Chr則計算出以x為ASCII碼的字符。示例：Asc(“A”)的運算結(jié)果為65。Chr(65)的運算結(jié)果為“A”。Asc(Chr(x))的運算結(jié)果仍然是x，Chr(Asc(c))的運算結(jié)果仍然是c。

大小寫字母轉(zhuǎn)換函數(shù)，格式：UCase(s)、LCase(s)。功能：s是一個字符型量，UCase將字符串中的所有字母轉(zhuǎn)換成大寫字母，LCase將字符串中的所有字母轉(zhuǎn)換成小寫字母。ucase(“a”)也有引號

判斷文本框TextBox1中輸入的是否為單個字母的表達(dá)式為：

If UCase(TextBox1.Text)>= “A” And UCase(TextBox1.Text)<= “Z” Then

If TextBox1.Text Like “[a-zA-Z]” Then If UCase(TextBox1.Text)Like “[A-Z]” Then If LCase(TextBox1.Text)Like “[a-z]” Then 字符串去除空格，格式：Ltrim(s)、Rtrim(s)、Trim(s)。功能：s是一個字符型數(shù)據(jù)。Ltrim的返回值是去除字符串s左邊（前面）空格后的字符串、Rtrim的返回值是去除字符串s右邊（后面）空格后的字符串、Trim的返回值是去除字符串s前后空格的字符串。字符串替換，格式：Replace(s, s1, s2[, n[, m]])。功能：s、s1和s2是一個字符型數(shù)據(jù)，n和m是一個整型數(shù)據(jù)。Replace在字符串s中從第n個字符開始，將前m個字符串s1替換為s2，并將第n個字符之前的字符刪除。若缺省m，替換把第n個字符開始的所有符合條件的字符串。若缺省n，則從第一個字符串開始替換。

字符串與數(shù)組元素的轉(zhuǎn)換，格式：Join(A, “d”)、Split(s, “d”)。功能：A為數(shù)組，s和d是一個字符型數(shù)據(jù)。Join以d為分隔符將數(shù)組A各元素的值連接成字符串，并作為返回值。Split的功能與Join相反，它將字符串s以d為分隔符，分隔成數(shù)組元素。缺省d時，以空格為分隔符。37.38.39.40.41.42.43.44.45.格式輸出函數(shù)Format可以將數(shù)值、日期和時間按指定格式轉(zhuǎn)換成字符串，其格式如下：Format(表達(dá)式, “格式字符串”)。格式名General Number、G或g保持原有數(shù)值的小數(shù)位數(shù)，格式名Fixed、F或f則四舍五入保留兩位小數(shù)。

46.百分比的數(shù)字格式，格式名Percent表示將數(shù)字乘以100后、保留兩位小數(shù)、并加百分號(%)。示例：Format(0.567,“Percent”)的運算結(jié)果為“56.70%”。

47.科學(xué)表示法的數(shù)字格式，使用標(biāo)準(zhǔn)的科學(xué)表示法表示數(shù)字。格式名Scientific提供兩個有效位，格式名E或者e提供六個有效位。示例：Format(1234.567,“Scientific”)的運算結(jié)果為“1.23E+03” ；Format(1234.567, “e”)的運算結(jié)果為“1.234567E+003”。

48.常用的用戶定義數(shù)字格式，0 和 #。符號“0”和“#”用于決定顯示數(shù)值整數(shù)部分和小數(shù)部分的位數(shù)。其相同之處是：若數(shù)值整數(shù)部分的位數(shù)多于格式字符串的位數(shù)，按實際數(shù)值返回；若小數(shù)部分的位數(shù)多于格式字符串的位數(shù)，按四舍五入計算。不同之處是：當(dāng)數(shù)值的位數(shù)少于格式字符串的位數(shù)時，“0”格式將不足部分補(bǔ)0，而“#”則不顯示。49..和 ，符號“.”表示加小數(shù)點，“,”表示加千分位。示例：

Format(1234.56, “0,000.00”)的運算結(jié)果為“1,234.56”。Format(1234, “0,000.00”)的運算結(jié)果為“1,234.00”。

50.日期的格式，根據(jù)區(qū)域設(shè)置顯示日期。格式名Date、Medium Date或D表示長日期格式，格式名Short Date或者d表示短長日期格式。示例：假設(shè)今天是2015年9月25日，F(xiàn)ormat(Now, “Long Date”)的運算結(jié)果為“2015年9月25日”； Format(Now, “Short Date”)的運算結(jié)果為“2015/9/25”。Label1.Text = Format(TextBox1.Text, “l(fā)ong date”)51.復(fù)合賦值語句常用于以下幾個方面：累加sum += s

等價于

sum = sum + s 連乘 n *= i

等價于

n = n * i

顯示多行信息，復(fù)合賦值語句使用得最多的是“&=”運算符。要顯示多行信息，一般是利用文本框、標(biāo)簽，通過“&=”來實現(xiàn)顯示。52.Inputbox（“提示信息”，“標(biāo)題”，“默認(rèn)內(nèi)容”），“提示信息”、“標(biāo)題”、“默認(rèn)內(nèi)容”都可以不填空著，但至少要有一個空著的省略號。

53.InputBox的返回值是一個字符串。如果需要將輸入的數(shù)值參加算術(shù)運算，必須在進(jìn)行運算前用Val函數(shù)把它轉(zhuǎn)換為數(shù)值類型。但可以用split函數(shù)調(diào)用。每執(zhí)行一次InputBox函數(shù)只能輸入一個值，如果需要輸入多個值，則必須多次調(diào)用InputBox函數(shù)。這時，通常與循環(huán)語句、數(shù)組結(jié)合使用。對話框顯示的信息，若要分多行顯示，必須加回車換行符，即Chr(13)+Chr(10)或VB系統(tǒng)常量vbCrLf。

54.定義變量時，可以用簡寫符號表示變量類型，$ 是 String，% 是 Integer，& 是 Long，!是 Single，@ 是 Currency，# 是 Double。例如Dim H%, F%, x%, y% 55.MsgBox(“提示信息”, vbOKOnly, “標(biāo)題”)“提示信息”, vbOKOnly, “標(biāo)題”可以都是空的，但至少要有一個空的省略號。MsgBox(“確認(rèn)數(shù)據(jù)是否正確？”, MsgBoxStyle.YesNo + MsgBoxStyle.Question , “ 數(shù)據(jù)驗證”)條件表達(dá)式1 F T 條件表達(dá)式2 F … 條件表達(dá)式n T 語句塊1 語句塊2 F T 語句塊n 語句塊n+1 56.elseif 的用法

57.如果是數(shù)字，則沒有is。

58.Do until loop(直到結(jié)束)；do while loop(當(dāng)執(zhí)行)59.在for語句中，執(zhí)行一次next語句，循環(huán)變量增加一個步長

60.UBound函數(shù)，格式為：UBound(數(shù)組名 [, 維])。使用UBound函數(shù)可以計算出數(shù)組的任一維可用的最大下標(biāo)，從而確定數(shù)組的任一維的上界。其中：參數(shù)維指定返回數(shù)組的哪一維。1（默認(rèn)）代表第一維，2代表第二維，以此類推。61.選擇法排序：

Public Class Form1

Dim A()As Integer = {2, 1, 3, 4}

Dim m, n, i, j, imin As Integer

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs)Handles Button1.Click

m = UBound(A)

For i = 0 To m1

For j = m To i + 1 Step-1

If A(j)< A(j1)

A(j1)+ f(n-2)

End If

End Function

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs)Handles Button1.Click

Dim y As Single

y = 0

For n = 1 To Val(TextBox1.Text)

y = y + 1 / f(n)

Next

Label2.Text = y

End Sub End Class 函數(shù)的表示法2 Public Class Form1

Dim a As String

Dim n, m As Integer

Function f(ByRef n As Integer)As String

a = TextBox1.Text

m = Len(CStr(a))

For n = m To 1 Step-1

f &= Mid(a, n, 1)

Next

End Function

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs)Handles Button1.Click

Label1.Text = f(n)

End Sub End Class 65.打開保存等操作的用法：

Public Class Form1

Private Sub 退出ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 退出ToolStripMenuItem.Click

End

End Sub

Private Sub 保存ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 保存ToolStripMenuItem.Click

SaveFileDialog1.Filter = “簡單文本格式|*.txt|復(fù)雜文本格式|*.rtf”

SaveFileDialog1.FilterIndex = 2

SaveFileDialog1.ShowDialog()

MsgBox(SaveFileDialog1.FileName)

If SaveFileDialog1.FileName <> “" Then

If SaveFileDialog1.FilterIndex = 1 Then

RichTextBox1.SaveFile(SaveFileDialog1.FileName,RichTextBoxStreamType.PlainText)'.txt,.TXT

Else

RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.RichText)'.doc,.DOC

End If

End If

End Sub

Private Sub 打開ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 打開ToolStripMenuItem.Click

OpenFileDialog1.FileName = ”“

OpenFileDialog1.Filter = ”簡單文本|*.txt|復(fù)雜文本|*.rtf“

OpenFileDialog1.FilterIndex = 1

OpenFileDialog1.Title = ”朕的打開......“

OpenFileDialog1.ShowDialog()

MsgBox(OpenFileDialog1.FileName)

If OpenFileDialog1.FileName <> ”“ Then

Me.Text = OpenFileDialog1.FileName

If OpenFileDialog1.FilterIndex = 1 Then

RichTextBox1.LoadFile(OpenFileDialog1.FileName, RichTextBoxStreamType.PlainText)

Else

RichTextBox1.LoadFile(OpenFileDialog1.FileName, RichTextBoxStreamType.RichText)

End If

End If

End Sub

Private Sub 新建ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 新建ToolStripMenuItem.Click

RichTextBox1.Text = ”“

Me.Text = ”我的記事本“

End Sub

Private Sub 剪切ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 剪切ToolStripMenuItem.Click

RichTextBox1.Cut()

End Sub

Private Sub 復(fù)制ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 復(fù)制ToolStripMenuItem.Click

RichTextBox1.Copy()

End Sub

Private Sub 粘貼ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 粘貼ToolStripMenuItem.Click

RichTextBox1.Paste()

End Sub

Private Sub 刪除ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 刪除ToolStripMenuItem.Click

RichTextBox1.SelectedText = ”"

End Sub

Private Sub 全選ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 全選ToolStripMenuItem.Click

RichTextBox1.SelectAll()

End Sub

Private Sub 日期時間ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 日期時間ToolStripMenuItem.Click

RichTextBox1.SelectedText = Now

End Sub

Private Sub 復(fù)制ToolStripMenuItem1_Click(sender As System.Object, e As System.EventArgs)Handles 復(fù)制ToolStripMenuItem1.Click

Call 復(fù)制ToolStripMenuItem_Click(sender, e)

End Sub

Private Sub 剪切ToolStripMenuItem1_Click(sender As System.Object, e As System.EventArgs)Handles 剪切ToolStripMenuItem1.Click

剪切ToolStripMenuItem_Click(sender, e)

End Sub

Private Sub 粘貼ToolStripMenuItem1_Click(sender As System.Object, e As System.EventArgs)Handles 粘貼ToolStripMenuItem1.Click

粘貼ToolStripMenuItem_Click(sender, e)

End Sub

Private Sub 顯示窗體ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs)Handles 顯示窗體ToolStripMenuItem.Click

Form2.ShowDialog()

End Sub End Class 66.控制輸入可以用e.keychar來做 67.Listbox的用法

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles ListBox1.SelectedIndexChanged

Select Case ListBox1.SelectedIndex

Case 0

TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Bold)

Case 1

TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Italic)

Case 2

TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Underline)

Case 3

TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Strikeout)End Select End Sub

第五篇：VB程序設(shè)計試題與答案

1.要使一個標(biāo)簽?zāi)軌蝻@示所需要的文本，應(yīng)設(shè)置該標(biāo)簽的()屬性的值(單)A.Caption B.Name

C.Text D.AutoSize 2.為使計時器對象每隔5秒鐘產(chǎn)生一個時鐘事件(Timer事件)，則其Interval屬性值應(yīng)設(shè)置為()(單)A.5

B.300

C.500

D.5000 3.下列的()對象支持KeyPress事件(單)A.文本框

B.命令按鈕

C.標(biāo)簽框

D.圖像框 4.確定一個控件在窗體上的位置的屬性是()(單)A.Width或Height

B.Top和Height

C.Top或Width

D.Top和Left 5.確定一個窗體或控件的大小的屬性是()(單)A.Width或Height

B.Top和Width

C.Top或Left

D.Top和Left

6.用戶在屏幕上畫出應(yīng)用程序界面，并設(shè)置好對象的屬性，系統(tǒng)便可以自動生成程序代碼，這稱為()(單)A.面向?qū)ο蟮某绦蛟O(shè)計

B.結(jié)構(gòu)化程序設(shè)計

C.事件驅(qū)動的編程機(jī)制

D.程序設(shè)計 7.在VB中，工程文件的擴(kuò)展名是()(單)A..frm

B..vbp

C..bas

D..frx 8.在VB中，窗體文件的擴(kuò)展名是()(單)A..frm B..vbp

C..bas

D..frx 9.VB集成開發(fā)環(huán)境可以(單)A.編輯、調(diào)試、運行程序，但不能生成可執(zhí)行程序 B.編輯、生成可執(zhí)行程序、運行程序，但不能調(diào)試程序 C.編輯、調(diào)試、生成可執(zhí)行程序，但不能運行程序 D.編輯、調(diào)試、運行程序，也能生成可執(zhí)行程序 10.英文“VISUAL”的含義是()(單)A.可視化

B.集成C.結(jié)構(gòu)化

D.調(diào)試

11.標(biāo)準(zhǔn)模塊文件的擴(kuò)展名是()(單)A.frm B.vbp C.bas

D.vbg 12.VB集成開發(fā)環(huán)境中，在()中編寫代碼(單)A.狀態(tài)欄

B.屬性列表框

C.代碼框

D.標(biāo)題欄

13.在面向?qū)ο蟮某绦蛟O(shè)計過程中，英文縮寫“OOP”的含義是()(單)A.事件驅(qū)動的編程機(jī)制

B.結(jié)構(gòu)化程序設(shè)計語言

C.面向?qū)ο蟮某绦蛟O(shè)計

D.可視化程序設(shè)計

14.在窗體上畫一個名稱為Timer1的計時器控件，要求每隔0.5秒發(fā)生一次計時器事件，則以下正確的屬性設(shè)置語句是()(單)A.Timer1.Interval=0.5

B.Timer1.Interval=5

C.Timer1.Interval=50 D.Timer1.Interval=500 15在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程： Private Sub Command1_Click()a$=“VisualBasic” Print String(3,a$)End Sub 程序運行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是()(單)A.VVV

B.Vis

C.sic

D.11

16.以下關(guān)于多重窗體程序的敘述中，錯誤的是()(單)A.用Hide方法不但可以隱藏窗體,且能清除內(nèi)存中的窗體 B.在多重窗體程序中，各窗體的菜單是彼此獨立的 C.在多重窗體程序中，可以根據(jù)需要指定啟動窗體 D.對于多重窗體程序中，單獨保存每個窗體 17以下合法的Visual Basic變量的名稱是()(單)A.a3

B.Const

C.9abc

D.a#x!

18.當(dāng)一個復(fù)選框被選中時，它的Value屬性的值是()(單)A.3

B.2

C.1

D.0

19.表達(dá)式 5 Mod 3+53的值是()(單)A.0

B.3

C.4

D.6

20設(shè)x=4,y=8,z=7, 表達(dá)式：(x＜y)Or z＜x 的值是()(單)A.1

B.-1 C.TRUE D.FALSE 21設(shè)有如下程序段： x=2 For c=1 To 4 Step 2 x=x+c Next c 運行以上程序后，x的值是()(單)A.6 B.7 C.8 D.9

22執(zhí)行如下兩條語句，窗體上顯示的是()(單)A=9.8596 Print Format(a,“000.00”)A.0,009.86 B.9.86 C.009.86 D.0,009.86

23下列說法中正確的是：為了保存一個Visual Basic應(yīng)用程序，應(yīng)當(dāng)()(單)A.只保存窗體模塊文件(.frm)B.只保存工程文件(.vbp)C.分別保存工程文件和標(biāo)準(zhǔn)模塊文件(.bas)D.分別保存工程文件、窗體文件和標(biāo)準(zhǔn)模塊文件

24.要使一個文本框?qū)ο竽軌蝻@示多行文字，應(yīng)設(shè)置該對象的()屬性值為True(單)A.Text B.MultiLine C.Style D.Visible 25.若要將窗體從內(nèi)存中卸載，其實現(xiàn)的方法或語句是()(單)A.Show B.Unload C.Load D.Hide 26.以下選項中，不是VB標(biāo)準(zhǔn)控件的是()(單)A.命令按鈕 B.定時器 C.通用對話框 D.單選框

27在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序： Dim a As Variant a = Array(1, 2, 3, 4, 5)Sum = 0 For i = 1 To 5 Sum = Sum + a(i1)“, a(i1)> x Then Print a(iNum2 Case 3 Op = ”ד Result = Num1 * Num2 Case 4 Op = ”÷“ Result = Num1 / Num2 End Select Label1= Num1 & Op & Num2 & ”=“ & Result End Sub 窗體運行后，輸入1，則label1的標(biāo)題顯示結(jié)果為()(單)A.3+2=5 B.3-2=1 C.3×2=6 D.3÷2=1.5

42在窗體上畫一個名稱為Text1的文本框，然后畫一個名稱為HScroll1的滾動條，其Min和Max屬性分別為0和100。程序運行后，如果移動滾動框，則在文本框中顯示滾動條的當(dāng)前值，以下能實現(xiàn)上述操作的程序段是()(單)A.Private Sub HScroll_Change()Text1.Text=HScroll1.Value End Sub

B.Private Sub HScroll_Click()Text1.Text=HScroll1.Value End Sub C.Private Sub HScroll_Change()Text1.Text=HScroll.Caption End Sub D.Private Sub HScroll_Click()Text1.Text=HScroll.Caption End Sub

43.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程： Private Sub Command1_Click()x=InputBox(”Input“)Select Case x Case 1,3 Print ”分支 1“ Case Is＞4 Print ”分支 2“ Case Else Print ”Else 分支 “ End Select End Sub 程序運行后，如果在輸入對話框中輸入2，則窗體上顯示的是（）A.分支1 B.分支2 C.Else分支 D.程序出錯

44.隨機(jī)產(chǎn)生10個100～200之間的數(shù)，求它們的最大值程序如下： Private Sub Command1_Click()Max = 100 For i = 1 To 10 x = int【 】 Print x;If x ＞ Max Then Max=x Next i Print Print ”最大值=“;Max End Sub 45設(shè)a=10，b=5，c=1，執(zhí)行語句Print a ＞b ＞ c后，窗體上顯示的是()(單)A.True B.False C.1 D.出錯信息

(46)在窗體上建立通用對話框需要添加的控件是

A)Data控件 B)From控件 C)CommonDialog控件 D)VBComboBox控件

(47)在Visual Basic中，要將一個窗體加載到內(nèi)存進(jìn)行預(yù)處理但不顯示，應(yīng)使用的語句是 A)Load B)Show C)Hide D)Unload

48)Sub過程與Function過程最根本的區(qū)別是

A)Sub過程可以用Call語句直接使用過程名調(diào)用，而Function過程不可以

B)Function過程可以有形參，Sub過程不可以

C)Sub過程不能返回值，而Function過程能返回值 D)兩種過程參數(shù)的傳遞方式不同

49保存一個工程至少應(yīng)保存兩個文件，這兩個文件分別是）A)文本文件和工程文件 B)窗體文件和工程文件 C)窗體文件和標(biāo)準(zhǔn)模塊文件 D)類模塊文件和工程文件

50.當(dāng)對命令按鈕的Picture屬性裝入.bmp圖形文件后，命令按鈕上并沒有顯示所需的圖形，原因是沒有對某個屬性設(shè)置為1，該屬性是

A)MousePicture B)Style C)DownPicture D)DisabledPicture

51假設(shè)變量bool_x是一個布爾型(邏輯型)的變量，則下面正確的賦值語句是）A)bool_x=”False“ B)bool_x=.False.C)bool_x=#False# D)bool_x=False

52.設(shè)S=“中華人民共和國”，表達(dá)式Left（S,1）+Right（S,1）+Mid（S,3,2）的值為（）A)“中華民國”

B)“中國人民”

C)“中共人民”

D)“人民共和” 53下列表達(dá)式的值為2123的是（）

A)Val(”123asd“)& 2000 B)Val(”123asd“)+ 2000 C)Str(123)& ”2000“ D)Str(123)+”2000“ 54假設(shè)在窗體上建立了一個通用對話框，其名稱為CommonDialog1，然后畫一個命令按鈕Command1,并編寫如下事件過程： Private Sub Command1_Click()CommonDialog1.Flags=4 CommonDialog1.Filter=”all files(*.*)|*.*|text Files(*.Txt)|*.txt|Batch Filse(*.bat)|*.bat“ CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序運行后，單擊命令按鈕，將顯示一個“打開”對話框，此時在“文件類型”對話框中顯示的是（）

A)All Files(*.*)B)Text Files(*.Txt)C)Batch Files(.bat)D)不確定

55當(dāng)運行程序時，系統(tǒng)自動執(zhí)行啟動窗體的某個事件過程。這個事件過程是（）A)Load B)Click C)Unload D)GotFocus 56.無論何控件，都具有一個共同屬性。這個屬性是（）A)Text B)Font C)Name D)Caption 57.在一行內(nèi)寫多條語句時，語句之間要用某個符號分隔。這個符號是（）A)，B)；

C)、D)：

58.表達(dá)式12000 + ”129“ & 200的值是

A)12329 B)”12129200“ C)”12000129200“ D)”12329“ 59.Visual Basic是一種面向?qū)ο蟮某绦蛟O(shè)計語言，構(gòu)成對象的三要素是（）

A)屬性、控件和方法 B)屬性、事件和方法 C)窗體、控件和過程 D)控件、過程和模塊

60表達(dá)式String(1,”I am student“)+ Replace(”am harass“,”rass“,”ppy“)& ”!“的值是（）A)”I am happy!“ B)”I am student I am s am harass studentam happy!“ C)”I am student am harass!“ D)”I am student am happy!“ 61.引用列表框（List1）最后一個數(shù)據(jù)項應(yīng)使用的表達(dá)式是（）A)List1.List(List1.ListCount)B)List1.List(List1.ListCount-1)C)List1.List(ListCount)D)List1.List(ListCount-1)62.以下屬性和方法中，可重定義坐標(biāo)系的是）

A)DrawStyle屬性 B)DrawWidth屬性 C)Scale方法 D)ScaleMode屬性 63.下面說法不正確的是()A)滾動條的重要事件是Change和Scroll B)框架的主要作用是將控件進(jìn)行分組，以完成各自相對獨立的功能 C)組合框是組合了文本框和列表框的特性而形成的一種控件

D)計時器控件可以通過對Visible屬性的設(shè)置，在程序運行期間顯示在窗體上

64.在窗體上畫一個名稱為Check1復(fù)選框，在程序運行的過程中，若選中復(fù)選框，則Check1.value的值是（）A)True B)2 C)0 D)1 65.下列關(guān)于過程敘述不正確的是（）

A)過程的傳值調(diào)用是將實參的具體值傳值遞給形參 B)過程的傳址調(diào)用是將實參在內(nèi)存的地址傳遞給形參

C)過程的傳值調(diào)用參數(shù)是單向傳遞的，過程的傳址調(diào)用參數(shù)是雙向傳遞的 D)無論過程傳值調(diào)用還是過程傳址調(diào)用，參數(shù)傳遞都是雙向的

66.為了使標(biāo)簽?zāi)茏詣诱{(diào)整大小以顯示全部文本內(nèi)容，應(yīng)把標(biāo)簽的【 】屬性設(shè)置為true。67.要想在文本框中顯示垂直滾動條，必須把scrollbars屬性設(shè)置為2，同時還應(yīng)把【 】屬性設(shè)置為true。

68.假定有一個文本框，其名稱為text1，為了使該文本框具有焦點，應(yīng)執(zhí)行的語句是【 】.setfocus。

69.假定有一個名為pic2.bmp的圖形文件，要在運行期間把該文件裝入一個圖片框，應(yīng)執(zhí)行的語句為 圖片控件名.picture=【

】。

70.為了能自動放大或縮小圖像框中的圖形以與圖像框的大小相適應(yīng)，必須把該圖像框的【 】屬性設(shè)置為true。

71.窗體、圖片框或圖像框中圖形通過對象的【 】屬性設(shè)置。72.計時器事件之間的間隔通過【

】屬性設(shè)置。

73.有時候要暫關(guān)閉計時器，這可以通過【 】屬性設(shè)置為false來實現(xiàn)。74.設(shè)a=sqr(2),則語句Print format$(a,”000.0“)的輸出結(jié)果是【 】。75.設(shè)a=sqr(3),則語句Print format$(a,”###.0“)的輸出結(jié)果是【 】。76.VB應(yīng)用程序通常由3類模塊組成，即窗體模塊、【 】模塊和類模塊。

77在窗體上畫兩個文本框和一個命令按鈕，然后在命令按鈕的代碼窗口中編寫如下事件過程：

Private sub command1_click()text1.text=”vb“ text2.text=text1.text

text1.text=”abcd“ End Sub 程序運行后，單擊命令按鈕，文本框text2中顯示的內(nèi)容為 ________。

78.在保存VB應(yīng)用程序時，窗體文件和工程文件的擴(kuò)展名分別為【.】和.vbp。79.下列可作為VB的變量名的是()(單)A.Filename B.A3B C.254D D.Print 80.與下列數(shù)學(xué)式cos2(c+d)對應(yīng)的VB表達(dá)式是【 】。81.與下列數(shù)學(xué)式2a(7＋b)對應(yīng)地VB表達(dá)式是【 】。82.在VB中，字符串常量要用【 】括起來。83.下面的事件不屬于鼠標(biāo)器事件的是()(單)A.MouseDown事件 B.MouseUp事件 C.MouseMove事件 D.Move事件 84.下面的事件不屬于鍵盤事件的是()(單)A.KeyPress事件 B.KeyDown事件 C.KeyUp事件 D.KeyMove事件

85.對以下程序說法不正確的是()(單)Private Sub FileOpen_Click()CommonDialog1.InitDir = ”C:“ CommonDialog1.Filter = ”文本文件 | *.Txt“ CommonDialog1.ShowOpen End Sub A.顯示”文件“打開對話框 B.打開的對話框的初始目錄為C盤根目錄 C.打開的對話框的文件類型為文本文件 D.以上說法都不正確

86.以下程序是求最大公約數(shù)和最小公倍數(shù)的程序，在【】處填寫合適的關(guān)系運算符。Private Sub Form_Click()Dim m1, n1, m, n, r As Integer n1 = InputBox(”輸入自然數(shù)n“, ”輸入數(shù)“)m1 = InputBox(”輸入自然數(shù)m“, ”輸入數(shù)“)n = n1 m = m1 If m ＜n Then t = m: m = n: n = t End If r = m Mod n Do While r 【 】 0 m = n n = r r = m Mod n Loop Print ”最大公約數(shù)=“, n Print ”最小公倍數(shù)= “, m1 * n1 / n End Sub 87.下面是求100以內(nèi)素數(shù)的程序。Private Sub Command1_Click()Dim i As Integer, m As Integer, tag As Boolean

For m = 2 To 100 tag = True For i = 2 To m-1 If m Mod 【 】 = 0 Then tag = False Next i If tag Then Print m Next m End Sub 88.百元買百雞問題： 假定小雞每只5角,公雞每只2元，母雞每只3元?，F(xiàn)在有100元錢要求買100只雞，以下程序列出了所有可能的購雞方案。Private Sub Command1_Click()Dim x%, y%, z% For x = 0 To 33 For y = 0 To 50 For z = 0 To 100 If 3 * x + 2 * y + 0.5 * z = 100 And 【 】 Then Picture1.Print x, y, z End If Next z Next y Next x End Sub 89.隨機(jī)產(chǎn)生10個100～200之間的數(shù)，求它們的最大值程序如下： Private Sub Command1_Click()Max = 100 For i = 1 To 10 x = int【 】 Print x;If x ＞ Max Then Max=x Next i Print Print ”最大值=“;Max End Sub 90.以下是求1～100之間5或7的倍數(shù)的和，如下程序段： Sum = 0 For i = 1 To 100 If i Mod 5 = 0 Or i Mod 7 = 0 Then 【】 End If Next i Print Sum 其中【】處書寫正確的是（）(單)A.Sum = i B.Sum = Sum +i C.Sum = Sum + 5+7 D.以上都不正確 91.要使得在按下鼠標(biāo)左鍵時，激發(fā)mousedown事件，可以設(shè)置此事件中的button參數(shù)為()(單)

A.0 B.1 C.2 D.4 92.要使得在按下鼠標(biāo)右鍵時，激發(fā)mousedown事件，可以設(shè)置此事件中的button參數(shù)為()(單)A.0 B.1 C.2 D.4 93.刪除列表框中所有的項目所使用的方法為()(單)A.move B.remove C.clear D.removeitem 94.在窗體上畫一個命令按鈕，然后編寫如下事件過程： Private Sub command1_click()Dim a As String, b As String a = InputBox(”Enter the First integer“)b = InputBox(”Enter the Second integer“)Print b + a End Sub程序運行后，單擊命令按鈕，先后在兩個輸入對話框中分別輸入456和111,則輸出結(jié)果是()(單)A.456 B.111 C.567 D.111456 95.傳值：形參得到的是實參的值，形參值的改變不會影響實參的值。在定義形參前加關(guān)鍵字Byval。

96.以下利用SUB關(guān)鍵字定義的子過程Rate，其調(diào)用格式不正確的是()(單)A.call Rate(12,56)B.Rate(12,56)C.Rate 12,56 D.以上A和C正確

97.以下程序的作用是單擊Check1檢查框?qū)⑹沟肨ext1文本框的字體在”加粗“和”常規(guī)“之間進(jìn)行切換。

Private Sub Check1_Click()Text1.FontItalic = Not Text1.FontItalic End Sub 98.窗體中有一個名稱為Slider1的可選擇性刻度滑塊控件，要設(shè)置它的如下屬性值，可以編寫程序()(單)(1)Slider控件的滑塊處于最小位置時值為8(2)Slider控件的滑塊處于最大位置時值為72(3)單擊Slider控件兩端箭頭時，滑塊的增量值為2(4)單擊Slider控件的空白處時，滑塊的增量值為8 A.Slider1.Min = 8： Slider1.Max = 72：

Slider1.SmallChange =2： Slider1.LargeChange = 8 B.Slider1.Min = 2： Slider1.Max = 8：

Slider1.SmallChange = 72： Slider1.LargeChange = 8 C.Slider1.Min = 8： Slider1.Max = 72：

Slider1.SmallChange = 8： Slider1.LargeChange = 2 D.Slider1.Min = 72： Slider1.Max = 8：

Slider1.SmallChange = 2：

Slider1.LargeChange = 8 99.以下能判斷指針是否指向文件尾的函數(shù)是()(單)A.BOF B.LOC C.LOF D.EOF 00.窗體的過程Form_MouseDown(Button As Integer, Shift As Integer, X As Single, YAs Single)，有4個參數(shù)，關(guān)于這些參數(shù)，正確的描述是()(單)A.通過Button參數(shù)判定當(dāng)前按下的是鍵盤上哪一個鍵 B.Shift參數(shù)只能用來確定是否按下Shift鍵

C.Shift參數(shù)只能用來確定是否按下Alt和Ctrl鍵 D.參數(shù)x,y用來設(shè)置鼠標(biāo)當(dāng)前位置的坐標(biāo)

01.設(shè)組合框Combo1中有3個項目，則以下能刪除最后一項的語句是()(單)A.Combo1.RemoveItem Text B.Combo1.RemoveItem 2 C.Combo1.RemoveItem 3 D.Combo1.RemoveItem Combo1.Listcount

1-10ADADA ABADA 11-20CCCDA AACBC 21-30ACDBB CDCCC 31-40ABDAB fontname BAAC 41-45AAC RND*101+100或100+RND*101或RND()*101+100或100+RND()*101 B 46-50CACBB 51-55DBBAA 56-60CDBBA 61-65BCDDD 66Autosize 67Multiline 68Text1 669loadpicture(”pic2.bmp")70Stretch 71Picture 72Interval 73Enabled 74 001.4 75 1.7 76【標(biāo)準(zhǔn)】77VB 78frm 79B 80cos(2*(c+d))81 2*a*(7+b)82【雙引號】83D 84D 85D 86<> 87【i】88x+y+z=100 89RND*101+100或100+RND*101或RND()*101+100或100+RND()*101 90B 91-95BBCDV 96-00BVADD 01B 13