




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、VB習(xí)題答案(1-4)習(xí)題1一、選擇題1. 以下敘述中,錯(cuò)誤的是_。(A)一個(gè)Visual Basic 應(yīng)用程序可以含有多個(gè)標(biāo)準(zhǔn)模塊文件(B)一個(gè)visual Basic 工程可以含有多個(gè)窗體文件(C)標(biāo)準(zhǔn)模塊文件可以屬于某個(gè)指定的窗體文件(D)標(biāo)準(zhǔn)模塊文件的擴(kuò)展名是.bas標(biāo)準(zhǔn)模塊文件(.bas)不屬于任何一個(gè)窗體文件。參考答案為C。2. 以下敘述中錯(cuò)誤的是_。(A)一個(gè)工程可以包括多種類型的文件(B)Visual Basic應(yīng)用程序既能以編譯方式執(zhí)行,也能以解釋方式執(zhí)行(C)程序運(yùn)行后,在內(nèi)存中只能駐留一個(gè)窗體(D)對(duì)于事件驅(qū)動(dòng)型應(yīng)用程序,每次運(yùn)行時(shí)的執(zhí)行順序可以不一樣內(nèi)存中可以駐留多個(gè)窗
2、體,當(dāng)前窗體只能有一個(gè)。參考答案為C。3. Visual Basic的窗體設(shè)計(jì)器主要是用來_。(A)建立用戶界面 (B)添加圖形、圖像、數(shù)據(jù)等控件(C)編寫程序源代碼 (D)設(shè)計(jì)窗體的布局參考答案為A。4. Visual Basic是一種結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語言,它采用的是_驅(qū)動(dòng)方式。(A)鍵盤 (B)鼠標(biāo) (C)事件 (D)函數(shù)參考答案為C。5. Visual Basic程序設(shè)計(jì)語言屬于_。(A)面向過程的語言 (B)機(jī)器語言 (C)面向?qū)ο蟮恼Z言 (D)匯編語言參考答案為C。6. Visual Basic一共有設(shè)計(jì)、運(yùn)行和中斷三種模式,要使用調(diào)試工具應(yīng)該_。(A)進(jìn)入設(shè)計(jì)模式 (B)進(jìn)入運(yùn)行
3、模式 (C)進(jìn)入中斷模式 (D)不用進(jìn)入任何模式VB中三種模式分別為:設(shè)計(jì)模式下可以進(jìn)行界面設(shè)計(jì)和代碼的編寫;運(yùn)行模式下執(zhí)行代碼,接受用戶的操作;中斷模式下可以修改代碼,但不能改變界面,這個(gè)模式下通常進(jìn)行代碼調(diào)試,當(dāng)運(yùn)行出錯(cuò)時(shí),默認(rèn)轉(zhuǎn)到該模式下進(jìn)行調(diào)試。參考答案為C。7. 假定一個(gè)Visual Basic應(yīng)用程序由一個(gè)窗體模塊和一個(gè)標(biāo)準(zhǔn)模塊構(gòu)成。為了保存該應(yīng)用程序,以下正確的操作是_。(A)只保存窗體模塊文件(B)分別保存窗體模塊、標(biāo)準(zhǔn)模塊和工程文件(C)只保存窗體模塊和標(biāo)準(zhǔn)模塊文件(D)只保存工程文件一個(gè)工程中可包含多個(gè)文件,當(dāng)打開一個(gè)工程文件時(shí)會(huì)自動(dòng)加載工程內(nèi)所有文件。對(duì)程序保存需分別保存
4、工程文件及窗體文件。參考答案為B。二、填空題1. Visual Basic 6.0分為3種版本,這3種版本是_、_和_。參考答案:學(xué)習(xí)版、專業(yè)版、企業(yè)版2. 應(yīng)用程序最終面向用戶的窗口是_,它對(duì)應(yīng)于應(yīng)用程序的運(yùn)行結(jié)果。參考答案:窗體設(shè)計(jì)器3. 如果打開了不需要的菜單或?qū)υ捒?,可以用_鍵關(guān)閉。參考答案:ESC三、簡(jiǎn)答題1. 簡(jiǎn)述Visual Basic語言的特點(diǎn)。參考答案:Visual Basic是Windows操作平臺(tái)下的可視化編程語言,它繼承和發(fā)展了BASIC語言的基本功能,具有簡(jiǎn)單易學(xué)、功能強(qiáng)大等特點(diǎn)。Visual Basic提供了可視化設(shè)計(jì)工具,以圖形用戶界面(GUI)為PC機(jī)用戶提供了
5、一個(gè)直觀的工作環(huán)境。支持面向?qū)ο蟮某绦蛟O(shè)計(jì)(OOP),采用事件驅(qū)動(dòng)方式,提供對(duì)象的鏈接與嵌入(OLE)和訪問數(shù)據(jù)庫等功能。2. Visual Basic 6.0的集成開發(fā)環(huán)境由哪些部分組成,各部分的主要功能是什么。參考答案:1. 標(biāo)題欄:用來顯示打開的工程名稱和系統(tǒng)的工作狀態(tài)。2. 菜單欄:菜單欄中包括“文件”、“編輯”、“視圖”、“工程”、“格式”、“調(diào)試”、“運(yùn)行”、“查詢”、“圖表”、“工具”、“外接程序”、“窗口”和“幫助”共有13個(gè)菜單項(xiàng)。這是一組下拉式菜單,提供了設(shè)計(jì)、編輯、編譯和調(diào)試應(yīng)用程序所需要的絕大部分功能和命令。3. 工具欄: Visual Basic 6.0提供了“編輯”
6、、“標(biāo)準(zhǔn)”、“窗體編輯器”和“調(diào)試”4種工具欄。工具欄上形象直觀的排列著一些最常用的命令按鈕,對(duì)應(yīng)特定的常用操作命令。4. 控件箱:控件箱提供了一組控件。設(shè)計(jì)界面時(shí),用戶可以用鼠標(biāo)雙擊控件箱中的控件,在窗體中畫出該控件,或用鼠標(biāo)單擊控件箱中的控件,然后在窗體中拖動(dòng)鼠標(biāo)畫出所需的控件。5. 窗體設(shè)計(jì)器:窗體設(shè)計(jì)器是應(yīng)用程序最終面向用戶的窗口。各種控件、圖形、數(shù)據(jù)以及程序的運(yùn)行結(jié)果都在窗體設(shè)計(jì)器窗體中顯示出來。6. 工程資源管理器:在工程資源管理器窗口中(圖1-2),列出了應(yīng)用程序的工程以及工程中的窗體和模塊。7. 屬性窗口:屬性窗口主要用來設(shè)置Visual Basic窗體及各控件的屬性特征,屬性
7、窗口的主體部分分為左右兩列,左邊是控件的屬性名列表,右邊是控件的屬性值列表。8. 窗體布局窗口:窗體布局窗口用于觀察應(yīng)用程序中各窗體在屏幕上的位置??梢栽诖绑w布局窗口用鼠標(biāo)拖動(dòng)窗體小圖像的方法來改變窗體布局。3. 什么是對(duì)象的屬性、事件和方法。參考答案:屬性是一個(gè)對(duì)象的數(shù)據(jù),用來表示對(duì)象的狀態(tài)。屬性具有屬性值,改變對(duì)象的屬性值就可以改變對(duì)象的狀態(tài)。對(duì)象常見的屬性有標(biāo)題(Caption)、名稱(Name)、顏色(Color)、字體大?。‵ontsize)、是否可見(Visible)等。事件(Event)是能被對(duì)象識(shí)別的動(dòng)作,例如Click(單擊),DblClick(雙擊),Load(裝入),Mo
8、useMove(移動(dòng)鼠標(biāo)),Change(改變)等。Visual Basic編程的核心就是為每一個(gè)要處理的事件編寫響應(yīng)事件的程序代碼。方法(Method)即是具有完成某種功能的過程和函數(shù),它決定了對(duì)象要執(zhí)行的動(dòng)作。4. 簡(jiǎn)述編寫并運(yùn)行Visual Basic程序的一般步驟。參考答案:(1)創(chuàng)建應(yīng)用程序界面。(2)設(shè)置界面上各個(gè)對(duì)象的屬性(3)編寫事件驅(qū)動(dòng)代碼(4)單擊工具欄上的啟動(dòng)按鈕,運(yùn)行該程序。四、編程題編寫程序,在窗體上顯示“第一個(gè)Visual Basic程序”。參考答案:(1)創(chuàng)建應(yīng)用程序界面。(2)設(shè)置界面上各個(gè)對(duì)象的屬性(3)編寫事件驅(qū)動(dòng)代碼Private Sub Command1
9、_Click() Text1.Text = "第一個(gè)Visual Basic程序"End SubPrivate Sub Command2_Click() EndEnd Sub(4)單擊工具欄上的啟動(dòng)按鈕,運(yùn)行該程序。單擊“開始”按鈕。習(xí)題2一、選擇題1. 下面可以正確定義2個(gè)整形變量和1個(gè)字符串變量的語句的是_。(A)Dim n , m AS Interger , s AS String(B)Dim a% , b$ , c AS String(C)Dim a AS Integer , b , c AS String(D)Dim x% , y AS Integer , z A
10、S String變量定義未指明數(shù)據(jù)類型,則為變體類型變量。A選項(xiàng)定義n為變體類型變量;B答案定義了1個(gè)整型變量和2個(gè)字符串變量;C選項(xiàng)的b變量也為變體類型變量,D選項(xiàng)滿足要求。參考答案為D。2. 設(shè)有如下語句:Dim a , b As Integer c = "Visual Basic" d = #7/20/2005 # 以下關(guān)于這段代碼的敘述中,錯(cuò)誤的是_。(A)a 被定義為Integer 類型變量 (B)b 被定義為Integer 類型變量(C)c 中的數(shù)據(jù)是字符串 (D)d 中的數(shù)據(jù)是日期類型VB中變體類型變量有三種情況,一是直接使用未經(jīng)定義的變量;第二是顯式的將變量
11、定義為變體類型,例 Dim m As Variant;第三種情況是定義變量但未指明該變量的數(shù)據(jù)類型,程序中對(duì)a變量的定義就屬第三種情況,故A選項(xiàng)錯(cuò)誤。變量c,d均是未定義的變量為變體類型,但分別存放的數(shù)據(jù)為字符串型和日期型。參考答案為A。3. 執(zhí)行以下程序后輸出的是_。Private Sub Command1_Click()Ch$=”AABCDEFGH”Print Mid(Right(ch$,6),Len(left(ch$,4),2)End Sub(A)CDEFGH (B)ABCD (C)FG (D)AB程序中有4個(gè)函數(shù)調(diào)用,其中Mid 的三個(gè)參數(shù)分別是Righ(ch$,6)、Len(left
12、(ch$,4)和2,而left(ch$,4)又是函數(shù)Len的參數(shù),由這幾個(gè)字符串函數(shù)的功能知:函數(shù)Righ(ch$,6)的結(jié)果值為”CDEFGH”, left(ch$,4)值為”AABC”, Len(left(ch$,4)結(jié)果為4,所以輸出Mid(Right(ch$,6),Len(left(ch$,4),2)結(jié)果值為“FG”,C選項(xiàng)正確。參考答案為C。4. 設(shè)a = 4 , b = 3 , c = 2 , d = l,表達(dá)式 a > b+1 Or c < d And b Mod c 的值是_。(A)True (B)l (C)-l (D)0表達(dá)式計(jì)算按優(yōu)先級(jí)由高到低順序計(jì)算,其中運(yùn)算
13、符優(yōu)先級(jí)高低為“算術(shù)運(yùn)算符>字符運(yùn)算符>關(guān)系運(yùn)算符>邏輯運(yùn)算符”,邏輯運(yùn)算符中“Not>And>Or”,同時(shí)關(guān)系運(yùn)算結(jié)果值為邏輯值;邏輯運(yùn)算分兩種情況,(1)邏輯值參與邏輯運(yùn)算結(jié)果為邏輯值,(2)數(shù)值數(shù)據(jù)參與邏輯運(yùn)算則按二進(jìn)制位進(jìn)行邏輯運(yùn)算。照此規(guī)則,本題先算數(shù)運(yùn)算b Mod c(值為1)、b+1(值為4),再做關(guān)系運(yùn)算a > b+1(值為False)、c < d(值為False)最后做邏輯運(yùn)算c < d And b Mod c(值為0)及a > b+1 Or c < d And b Mod c(值為0),即整個(gè)表達(dá)式值為0。參考答案
14、為D。5. 以下可以作為Visual Basic變量名的是_。(A)A#A (B)counstA (C)3A (D)?AA參考答案為B。6. 以下能從字符串”VisualBasic”中直接取出子字符串”Basi”的函數(shù)是_。(A)Left (B)Mid (C)String (D)Instr參考答案為B。7. 表達(dá)式32*2+3 MOD 104的值是_。(A)18 (B)1 (C)19 (D)0參考答案為C。8. 下面的變量名合法的是_。(A)k_name (B)k ame (C)name (D)k-name參考答案為A。9. 設(shè)有如下變量聲明Dim time1 As Date,為變量time1
15、正確賦值的表達(dá)式是_。(A)time1 = #11:34:04# (B)time1 = Format(Time,"yy:mm:dd")(C)time1 = #"11:34:04"# (D)time1 = Format("hh:mm:ss",Time)參考答案為A。10. 表達(dá)式12000 + "129" & 200的值是_。(A)12329 (B)"12129200" (C) (D)"12329"參考答案為B11. 在窗體上畫兩個(gè)文本框,其名稱分別為Text1和Tex
16、t2,然后編寫如下程序:Private Sub Form_Load() Text1.Text = "" Text2.Text = "" Text1.SetFocusEnd SubPrivate Sub Text1_Change() Text2.Text = Mid(Text1.Text , 8)End Sub程序運(yùn)行后,如果在文本框Text1中輸入BeijingChina,則在文本框Text2中顯示的內(nèi)容是_。(A)BeijingChina (B)China (C)Beijing (D)BeijingC參考答案為B12. 在窗體上畫一個(gè)名稱為Comman
17、d1的命令按鈕,然后編寫如下事件過程:Private Sub Command1_Click() a$ = "VisualBasic" Print String(3, a$)End Sub程序運(yùn)行后,單擊命令按鈕,在窗體上顯示的內(nèi)容是_。(A)VVV (B)Vis (C)sic (D)11參考答案為A13. 執(zhí)行語句s = Len(Mid("VisualBasic", 1, 6)后,s的值是_。(A)"Visual" (B)"Basic" (C)6 (D)1114. 在窗體上畫一個(gè)文本框、一個(gè)標(biāo)簽和一個(gè)命令按鈕,其名
18、稱分別為Text1、Label1和Command1,然后編寫如下事件過程:Private Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序運(yùn)行后,在文本框中輸入“abcdef”,單擊命令按鈕,則在標(biāo)簽中顯示的內(nèi)容是_。(A)空 (B)abcdef (C)abc (D)def參考答案為D15. 設(shè)a=2,b=3,c=4,表達(dá)式Not a<=c Or 4*a=b2 And b<>a+c的值是_。(A)-1 (B)1 (C)True (D)False參考答案為D16. 執(zhí)行以下程序段后,變
19、量c$的值為_。 a$ = "Visual Basic Programming" b$ = "Quick" c$ = b$ & UCase(Mid$(a$, 7, 6) & Right$(a$, 12)(A)Visual BASIC Programming (B)Quick Basic Programming(C)QUICK Basic Programming (D)Quick BASIC Programming參考答案為D二、填空題1. 描述“X是小于100的非負(fù)整數(shù)”的Visual Basic表達(dá)式是_。要描述該語句,X必須滿足大于等
20、于零,同時(shí)小于100,另還需體現(xiàn)整數(shù)特點(diǎn),參考答案:X%<100 AND X%>=02. 窗體上有一個(gè)命令按鈕,事件代碼如下:Private Sub Command1_Click()A = "1"B = "2"A = Val(A) + Val(B)B = Val("12")If A <> B Then Print A - B Else Print B - AEnd Sub程序運(yùn)行后,單擊命令按鈕,輸出_。參考答案:-93. 以下語句的輸出結(jié)果是_。a% = 3.1425926Print a%參考答案:34. a
21、$ = LCase("Hello"),a$的值是_,b$ = UCase("Hello"),b$的值是_。參考答案:hello、HELLO5. 表達(dá)式"12" + "34"的值是_,表達(dá)式"12" & "34"的值是_,表達(dá)式12 & 34的值是_,表達(dá)式12 + 34的值是_。參考答案:1234、1234、1234、466. 整形變量M中存放了一個(gè)兩位數(shù),要將兩位數(shù)交換位置,例如24變成42,實(shí)現(xiàn)的表達(dá)式為_。參考答案:(M mod 10)*10 + M10
22、)7. 代數(shù)式|y| + e-3xln3x的Visual Basic表達(dá)式為_。參考答案:abs(y) + exp(-3 * x) * log(3 * x)三、簡(jiǎn)答題1. Visual Basic定義了幾種數(shù)據(jù)類型,變量有哪幾種數(shù)據(jù)類型,常量有哪幾種數(shù)據(jù)類型。參考答案:Visual Basic基本數(shù)據(jù)類型:1. 字符串型(String):字符串分為變長(zhǎng)字符串和定長(zhǎng)字符串兩種。2. 數(shù)值型:數(shù)值型數(shù)據(jù)分為整型數(shù)和浮點(diǎn)數(shù)兩類。3. 貨幣型(Currency)4. 變體型(Variant)5. 字節(jié)型(Byte)6. 布爾型(Boolean)7. 日期型(Date)8. 對(duì)象型(Object)Vis
23、ual Basic中包含兩種常量,即文字常量和符號(hào)常量。變量的基本數(shù)據(jù)類型:Byte(字節(jié)型),Boolean(布爾型),Integer(整型),Long(長(zhǎng)整型),Single(單精度型),Double(雙精度型),Currency(貨幣型),Date(日期型),Object(對(duì)象型),String(變長(zhǎng)字符串),String(定長(zhǎng)字符串),Variant(變體型、數(shù)字),Variant(變體型、字符)2. 符號(hào)常量和變量有什么不同點(diǎn)?參考答案:符號(hào)常量一經(jīng)定義,就不能在程序中的其他位置改變其值。變量的值在程序中可以改變。3. 指出下列正確的變量名:g(1-k) 6adhs *sss kL2
24、.1 Printx+1 ahi .ex3 j5h參考答案:正確的變量名:ahi,j5h4. 指出下列正確的Basic數(shù)字形式:-1.25 ±3.88 45.2468E-6 77.876D-5 5.6D0.123 89E D2585 10(2.7) 35參考答案:正確的數(shù)字形式:-1.25,45.2468E-6,77.876D-5,0.1235. 下列Basic表達(dá)式若有錯(cuò)誤,請(qǐng)說明錯(cuò)誤原因,并改正錯(cuò)誤: (1) ts+cos(300) (2) (x+y)(25÷s)(3) (X1+X2)*(X1-3)-6*7 (4) (X÷-2)+sin(1.2+)參考答案:改正
25、:(1) ts+cos(30*3.141593/180)(2) (x+y)(25/s)(3) (X1+X2)*(X1-3)-6)*7(4) (X/(-2)+sin(1.2+3.141593)6. 寫出下列數(shù)學(xué)式的Visual Basic表達(dá)式: (1) sin(a)cos(b)+1.5 (2) (X1+4)5(e2-a) (3) 36(X1+)(X1÷3.3)-B (4) X-2+5.8sin(3.5)參考答案:Visual Basic表達(dá)式:(1) sin(a)*(cos(b)+1.5)(2) (X1+4)5*(exp(2)-a)(3) 36*(X1+3.141593)*(X1/3
26、.3)-B)(4) X2+5.8*sin(3.5*3.141593)習(xí)題3一、選擇題1. 設(shè)在名稱為Myform的窗體上只有1個(gè)名稱為C1的命令按鈕,下面敘述中正確的是_。(A)窗體的Click事件過程的過程名是Myform_Click(B)命令按鈕的Click事件過程名是C1_Click(C)命令按鈕的Click事件過程的過程名是Command1_Click(D)上述3種過程名稱都是錯(cuò)誤的窗體事件過程名為“Form_事件名”,其他對(duì)象事件過程名為“對(duì)象名_事件名”,故窗體的Click事件過程名為Form_Click,命令按鈕的Click事件過程名為C1_Click。選項(xiàng)B正確。參考答案為B2
27、. 在Visual Basic工程中,可以作為啟動(dòng)對(duì)象的程序是_。(A)任何窗體或標(biāo)準(zhǔn)模塊(B)任何窗體或過程(C)Sub Main過程或其他任何模塊(D)Sub Main過程或任何窗體參考答案為D3. 新建一個(gè)工程將其窗體的Name屬性設(shè)置為Myfrm,則默認(rèn)的窗體文件名為_。(A)Form1.frm (B)Myfrm.frm (C)Form1.vbp (D)工程1.frm參考答案為B4. 將窗體的_屬性設(shè)置為False后,運(yùn)行時(shí)窗體上的按鈕、文本框就不會(huì)對(duì)用戶的操作做出響應(yīng)。(A)ControlBox (B)Visible (C)Enabled (D)BorderStyle參考答案為C5.
28、 以下說法正確的是_。(A)窗體文件的擴(kuò)展名為 .vbp(B)一個(gè)窗體對(duì)應(yīng)一個(gè)窗體文件(C)Visual Basic中的一個(gè)工程只包括一個(gè)窗體(D)Visual Basic中一個(gè)工程最多可以包含256個(gè)窗體文件參考答案為B6. 當(dāng)運(yùn)行程序時(shí),系統(tǒng)自動(dòng)執(zhí)行啟動(dòng)窗體的某個(gè)事件過程。這個(gè)事件過程是_。(A)Load (B)Click (C)Unload (D)GotFocus參考答案為A7. 無論何控件,都具有一個(gè)共同屬性。這個(gè)屬性是_。(A)Text (B)Font (C)Name (D)Caption參考答案為C8. Print方法可以在_對(duì)象上輸出數(shù)據(jù)(A)桌面 (B)窗體 (C)狀態(tài)欄 (D
29、)標(biāo)題欄參考答案為B9. 以下能在窗體Form1的標(biāo)題欄中顯示“VisualBasic窗體”的語句是_。(A)Form1.Name="VisualBasic窗體"(B)Form1.Title="VisualBasic窗體"(C)Form1.Caption="VisualBasic窗體"(C)Form1.Text="VisualBasic窗體”參考答案為C10. 語句Print Format$(12345,"0000,00.00")輸出結(jié)果為_。(A)12345.00 (B)12345 (C)012,345
30、.00 (D)123,4511. 對(duì)用MsgBox顯示的消息框,下面_是錯(cuò)的。(A)可以有一個(gè)按鈕 (B)可以有兩個(gè)按鈕(C)可以有三個(gè)按鈕 (D)可以有四個(gè)按鈕參考答案為D12. 語句a=InputBox("Today","Tomorrow","Yesterday","Day before yesterday",5)將顯示一個(gè)對(duì)話框,在對(duì)話框的輸入?yún)^(qū)中顯示的信息是_。(A)Today (B)Tomorrow (C)Yesterday (D)Day before yesterday參考答案為C13. 設(shè)窗體上有一個(gè)
31、文本框,名稱為text1,程序運(yùn)行后,要求該文本框不能接受鍵盤輸入,但能輸出信息,以下屬性設(shè)置正確的是_。(A)text1.maxlength = 0 (B)text1.Enabled = False (C)text1.visible = False (D)text1.Width = 0參考答案為B14. 在窗體上畫一個(gè)名稱為Timer1的計(jì)時(shí)器控件,要求每隔0.5秒發(fā)生一次計(jì)時(shí)器事件,則以下正確的屬性設(shè)置語句是_。(A)Timer1.InterVal=0.5 (B)Timer1.Interval=5(C)Timer1.Interval=50 (D)Timer1.Interval=500參考答
32、案為D15. 將文本框的_屬性設(shè)置為True時(shí),文本框可以輸入或顯示多行文本,且會(huì)在輸入的內(nèi)容超出文本框的寬度時(shí)自動(dòng)換行。(A)Multiline (B)Scrollbars (C)Text (D)Enabled參考答案為A16. 當(dāng)窗體得到焦點(diǎn)時(shí)觸發(fā)_。(A)Active (B)OnFocus (C)GotFocus (D)Initilize參考答案為C17. 在窗體上畫一個(gè)文本框,其名稱為Text1。為了在程序運(yùn)行后Text1中的文本不可編輯,應(yīng)當(dāng)使用的語句_。(A)Text1.Clear (B)Text1.Locked=True(C)Text1.Visible=False (D)Text
33、1.Enabled=False參考答案為B二、填空題1. Visual Basic是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言,構(gòu)成對(duì)象的三要素是_、_、_。參考答案:屬性、事件、方法2. 在剛建立工程時(shí),使窗體上的所有控件具有區(qū)別于默認(rèn)值的相同的字體格式,應(yīng)對(duì)_的_屬性進(jìn)行設(shè)置。參考答案:Form窗體、Font3. 下述程序段在運(yùn)行時(shí)的顯示結(jié)果是_。Dim x As SingleClsx=1.344+8Print Len(x)參考答案:44. 以下語句Print Int(12345.6789*100+0.5)/100的輸出結(jié)果是_。參考答案:12345.685. 當(dāng)文本框的SelStart屬性設(shè)置為0時(shí),表
34、示_,SelStart屬性設(shè)置為1時(shí)表示_。6. 當(dāng)文本框得到焦點(diǎn)時(shí)觸發(fā)_事件,當(dāng)文本框失去焦點(diǎn)時(shí)觸發(fā)_事件。參考答案:GotFocus、LostFocus三、簡(jiǎn)答題下列語句是否有錯(cuò)?若有,請(qǐng)說明錯(cuò)誤原因,并改正錯(cuò)誤: 1. Let = 17 2. T1$ = XYZ3. L*2 = K + E 4. 1A = 34 , 2A = 66參考答案:改正:1. Let x = 17 2. T1$ = “XYZ”3. L = (K + E)/2 4. A1 = 34 : A2 = 66四、編程題1. 設(shè)計(jì)一個(gè)窗體,在窗體上用標(biāo)簽控件顯示商品的名稱和單價(jià),用文本框控件接收輸入的購買數(shù)量,當(dāng)單擊“購買”
35、按扭時(shí),計(jì)算購買商品的總價(jià)格,并在彈出的消息框中顯示出購買明細(xì)和總價(jià)格。假定有以下三種商品: 鉛筆:每只1.50元 筆記本:每本5.20元計(jì)算器:每件80.00元參考答案:設(shè)計(jì)界面如圖: 程序代碼如下:Private Sub Command1_Click() Sum = 1.5 * Text1.Text + 5.2 * Text2.Text + 80 * Text3.Text Msg$ = "鉛筆" & Text1.Text & "只;" & "筆記本" & Text2.Text & "
36、;本;" & "計(jì)算器" & Text3.Text & "件。" & "金額:" & Sum MsgBox (Msg$)End Sub2. 編應(yīng)用程序,在窗體上顯示由如下“*”號(hào)構(gòu)成的三角形圖案。 * * * * * * * * * * * * * * * * * * * * * * * * * 參考答案:設(shè)計(jì)界面如圖,程序代碼如下:Private Sub Form_Click() Form1.Print Tab(15); "*" Form1.Print Tab(1
37、4); "*" Form1.Print Tab(13); "*" Form1.Print Tab(12); "*" Form1.Print Tab(11); "*"End SubPrivate Sub Form_Load() Form1.AutoRedraw = True Form1.Print "顯示星號(hào)三角形,單擊窗體開始"End Sub3. 編寫程序,將攝氏溫度轉(zhuǎn)換為華氏溫度。二者之間的關(guān)系是:F = 32 + 1.8C其中F是華氏溫度,C是攝氏溫度。程序運(yùn)行后,彈出一個(gè)對(duì)話框用于接收輸入
38、的攝氏溫度值,確定輸入后在彈出的消息框中顯示轉(zhuǎn)換后的華氏溫度值。參考答案:設(shè)計(jì)界面如圖:程序代碼如下:Private Sub Command1_Click() C = Text1.Text Text2.Text = 32 + 1.8 * CEnd Sub4. 編寫程序,在文本框中輸入英文字符,單擊“大寫”按鈕把英文字符轉(zhuǎn)換為大寫,單擊“小寫”按鈕把英文字符轉(zhuǎn)換為小寫。參考答案:設(shè)計(jì)界面如圖程序代碼如下Private Sub Command1_Click() Text1.Text = UCase$(Text1.Text)End SubPrivate Sub Command2_Click() Te
39、xt1.Text = LCase$(Text1.Text)End Sub習(xí)題4一、選擇題1. 以下循環(huán)語句中在任何情況下都至少執(zhí)行一次循環(huán)體的是_。(A)Do While <條件> (B)While <條件> 循環(huán)體 循環(huán)體 Loop Wend(C)Do (D)Do Until <條件> 循環(huán)體 循環(huán)體 Loop Until <條件> Loop參考答案為C2. 某人設(shè)計(jì)了如下程序用來計(jì)算并輸出7!(7的階乘)Private Sub Command1_Click()t=0For k=7 To 2 Step -1t=t*kNextPrint tEnd
40、 Sub執(zhí)行程序時(shí),發(fā)現(xiàn)結(jié)果是錯(cuò)誤的,下面的修改方案中能夠得到正確結(jié)構(gòu)的是_。(A)把t=0改為t=1(B)把For k = 7 To 2 Step -1改為For k =7 To 1 Step -1(C)把For k = 7 To 2 Stip-1改為Fork=1 To 7(D)把Next改為Next k參考答案為A3. 以下程序段的輸出結(jié)果是_。num =0While num<=2 num = num+1WendPrint num(A)2 (B)3 (C)4 (D)程序出錯(cuò)參考答案為B4. 設(shè)a="a",b="b",c="c"
41、;,d="d",執(zhí)行語句x=IIf (a<b Or c>d),"A","B")后,x的值為_。(A)"a" (B)"b" (C)"B" (D)"A"參考答案為D5. 以下Case語句中錯(cuò)誤的是_。(A)Case 0 To 10 (B)Case Is>10(C)Case Is>10 And Is<50 (D)Case 3,5,Is>10參考答案為C6. 設(shè)有以下循環(huán)結(jié)構(gòu):Do 循環(huán)體Loop While <條件>
42、;則下列敘述中錯(cuò)誤的是_。(A)若“條件”是一個(gè)為0的常數(shù),則一次也不執(zhí)行循環(huán)體 (B)“條件”可以是關(guān)系表達(dá)式,邏輯表達(dá)式或常數(shù) (C)循環(huán)體中可以使用Exit Do語句 (D)如果“條件”總是為True,則不停地執(zhí)行循環(huán)體參考答案為A7. 設(shè)組合框Combo1中有3個(gè)項(xiàng)目,則以下能刪除最后一項(xiàng)的語句是_。(A)Combo1.RemoveItem Text (B)Combo1.RemoveItem 2(C)Combo1.RemoveItem 3 (D)Combo1.RemoveItem Combo1.Listcount參考答案為B8. 在窗體上畫一個(gè)列表框和一個(gè)命令按鈕,其名稱分別為L(zhǎng)ist
43、1和Command1,然后編寫如下事件過程:Private Sub Form_Load() List1.AddItem "Item 1" List1.AddItem "Item 2" List1.AddItem "Item 3"End SubPrivate Sub Command1_Click() List1.List(List1.ListCount) = "AAAA"End Sub程序運(yùn)行后,單擊命令按鈕,其結(jié)果為_。(A)把字符串“AAAA”添加到列表框中,但位置不能確定(B)把字符串“AAAA”添加到列表框的
44、最后(即“Item 3”的后面)(C)把列表框中原有的最后一項(xiàng)改為“AAAA”(D)把字符串“AAAA”插入到列表框的最前面(即“Item 1”的前面)參考答案為B9. 在窗體上畫一個(gè)名稱為L(zhǎng)ist1的列表框,一個(gè)名稱為L(zhǎng)abel1的標(biāo)簽,列表框中顯示若干個(gè)項(xiàng)目。當(dāng)單擊列表框中的某個(gè)項(xiàng)目時(shí),在標(biāo)簽中顯示被選中項(xiàng)目的索引值。下列能正確實(shí)現(xiàn)上述操作的程序是_。(A)Private Sub List1_Click() (B)Private Sub List1_Click() Label1.Caption=List1.ListIndex Label1.Name=List1.ListIndex End
45、Sub End Sub(C)Private Sub List1_Click() (D)Private Sub List1_Click() Label1.Name=List1.Text Label1.Caption =List1.Text End Sub End Sub參考答案為A二、填空題1. 設(shè)a=6,則執(zhí)行x=IIf(a>5, -1, 0)后,x的值為_。參考答案:-12. 下面程序段的執(zhí)行結(jié)果為_。x = Int(Rnd + 4)Select Case x Case 5 Print "優(yōu)秀" Case 4 Print "良好" Case 3
46、Print "通過" Case Else Print "不通過"End Select參考答案:良好3. 執(zhí)行下面的程序段后,變量s的值為_。s = 5For i = 2.6 To 4.9 Step 0.6 s = s + 1 Next I參考答案:94. 下面的程序執(zhí)行時(shí),可以從鍵盤輸入一個(gè)正整數(shù),然后把該數(shù)的每位數(shù)字按逆序輸出。例如:輸入7685,則輸出5867,輸入1000,則輸出0001。請(qǐng)?zhí)羁?。Private Sub Command1_Click() Dim x As Integer x=InputBox(“請(qǐng)輸入一個(gè)正整數(shù)”) While x&
47、gt;_ Print x Mod 10; x=x10 Wend Print_End Sub參考答案:10、x5. 只有將組合框的Style屬性設(shè)置為_時(shí),才能觸發(fā)DbClick事件。參考答案:16. 獲得列表框List1中項(xiàng)目個(gè)數(shù)的語句是_。參考答案:List1.ListCount三、簡(jiǎn)答題1. 寫出數(shù)學(xué)式|x|<2.5×10-2對(duì)應(yīng)的Visual Basic表達(dá)式。參考答案:x<2.5e-2 and x>-2.5e-22. 邏輯運(yùn)算符And、Or和Not的優(yōu)先級(jí)最高的是哪一個(gè)。參考答案:Not3. 已知 W=10 X=9 Y=8 Z=7 ,求下列表達(dá)式的結(jié)果: (
48、1) W>X And Y<=Z OR X>Y (2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z) (4) Not (Y<>X Or W*3>Z)參考答案:(1) True (2) True (3) True (4) False4. 寫出下列十進(jìn)制整數(shù)邏輯運(yùn)算的結(jié)果: (1) X = 23 And 14 (2) X = 23 Or 14 (3) X = -1 And 19 (4) X = -1 Or 10 (5) X = Not -1參考答案:(1) 6 (2) 31 (3) 19 (4) 1 (5) 0四
49、、編程題1. 已知變量X和Y的值分別為5、6,編寫程序,交換變量X和Y的值。參考答案:設(shè)計(jì)界面如圖,程序代碼如下:Private Sub Form_Click() x = 5: y = 6 t = x: x = y: y = t Form1.Print "x=" x, "y=" yEnd SubPrivate Sub Form_Load() Form1.AutoRedraw = True Form1.Print "x = 5", "y = 6" Form1.Print "單擊窗體交換x,y的值"
50、End Sub2. 征兵的條件是:男性1820歲,1.65米以上;女性1618歲,1.60米以上。編寫程序,從鍵盤輸入一個(gè)人的數(shù)據(jù)時(shí),判斷是否符合征兵的條件。參考答案:設(shè)計(jì)界面如圖:程序代碼如下:Private Sub Command1_Click() age = Val(Text1.Text) h = Val(Text2.Text) If Option1.Value = True Then If age >= 18 And age <= 20 And h >= 1.65 Then Label4.Caption = "合格" Else Label4.Cap
51、tion = "不合格" End If Else If age >= 16 And age <= 18 And h >= 1.6 Then Label4.Caption = "合格" Else Label4.Caption = "不合格" End If End If End Sub3. 編寫程序,計(jì)算下面表達(dá)式1+1×3+1×3×5+1×3×(2N+1)的值。參考答案:設(shè)計(jì)界面如圖:程序代碼如下:Private Sub Command1_Click() n = Val(InputBox("請(qǐng)輸入N值") Sum = 1 term = 1 For k = 3 To 2 * n + 1 Step 2 term = term * k Sum = Sum + term Next k Form1.Print "1+1×3+1×3×5+1×3×(2N+1)=" SumEnd SubPrivate Sub Form_Load() Form1.AutoRedraw = True F
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 公司教師節(jié)員工活動(dòng)方案
- 公司組織健身活動(dòng)方案
- 公司生活會(huì)活動(dòng)方案
- 2025年英語四級(jí)考試試題及答案
- 2025年中小學(xué)教育改革與進(jìn)展試題及答案
- 2025年文化歷史研究生入學(xué)考試試題及答案
- 2025年文物保護(hù)工程師資格考試試卷及答案
- 2025年數(shù)字經(jīng)濟(jì)時(shí)代的人才培養(yǎng)與發(fā)展試題及答案
- 2025年外語聽說能力與實(shí)踐考試題及答案
- 2025年人才招聘與選拔能力測(cè)試卷及答案
- 2024年北京門頭溝區(qū)社區(qū)工作者招聘筆試參考題庫附帶答案詳解
- 全國自然教育中長(zhǎng)期發(fā)展規(guī)劃
- 管道施工安全培訓(xùn)
- 具有形狀記憶功能高分子材料的研究進(jìn)展
- 2023國機(jī)集團(tuán)財(cái)務(wù)資產(chǎn)紀(jì)檢監(jiān)察中心公開招聘2人歷年高頻難易度、易錯(cuò)點(diǎn)模擬試題(共500題)附帶答案詳解
- PCBA元件焊點(diǎn)強(qiáng)度推力測(cè)試標(biāo)準(zhǔn)
- 可持續(xù)建筑(綠色建筑)外文翻譯文獻(xiàn)
- 2023年春國家開放大學(xué)工具書與文獻(xiàn)檢索形考任務(wù)1-4及答案
- 2023年03月北京海淀區(qū)衛(wèi)生健康委所屬事業(yè)單位招聘430人(第一次)筆試參考題庫含答案解析
- ISTA-3A(中文版)運(yùn)輸-試驗(yàn)標(biāo)準(zhǔn)
- 小學(xué)科學(xué)-蠶變了新摸樣教學(xué)課件設(shè)計(jì)
評(píng)論
0/150
提交評(píng)論