VisualBasic程序設(shè)計(jì)形成性考核冊(cè)作業(yè)

[font=宋體][/font]作業(yè)[b]l[/b]

一、選擇題

1.在設(shè)計(jì)應(yīng)用程序時(shí)，可以查看到應(yīng)用程序工程所有組成部分的窗口是（D）。

A.窗體設(shè)計(jì)B.代碼C.屬性D.工程資源管理器窗口-'D2dUmluW

2.窗體的load事件的觸發(fā)時(shí)機(jī)是（B）。

A.用戶單擊窗體時(shí)B.窗體被加載時(shí)C.窗體顯示之后D.窗體卸載時(shí)

3,與傳統(tǒng)的程序設(shè)計(jì)語(yǔ)言相比，VisualBasic最突出的特點(diǎn)是?。1F□人:q3OlkDs

A.結(jié)構(gòu)化程序設(shè)計(jì)B.程序開發(fā)環(huán)境C.事件驅(qū)動(dòng)編程機(jī)制D.程序調(diào)試技術(shù)□X5HDT&bElv9xS7P

4.VB6.0集成開發(fā)環(huán)境的主窗口中不包括（C）。

A.標(biāo)題欄B.菜單欄C.狀態(tài)欄D.工具欄8K2人;WLlW-d}口>

5.如果對(duì)象的名稱為Mytext,而且對(duì)象有一個(gè)屬性Text,那么在代碼中引用該屬性的正確格式是

（B）o:FkDi2a2j

A.text.MytextB.Mytext.TextC.Mytext.（Text）D.Mytext*Text-cDE2aObDiDA

6.下列可以激活屬性窗口的操作是（D）。

A.用鼠標(biāo)雙擊窗體的任何部位B.執(zhí)行“工程”菜單中的”屬性窗.口”命令口1<82匚1乂#乂口67￡口乂

C.按Ctrl+F4D.按F4

7,假定已在窗休上.畫「多個(gè)控件，并有?個(gè)控件是活動(dòng)的，為了在屬性窗口中設(shè)置窗體的屬性，預(yù)先應(yīng)

執(zhí)行的操作是（A）。

A.單擊窗體上沒有控件的地方B.單擊任一個(gè)控件C.不執(zhí)行任何操作D.雙擊窗體的標(biāo)題欄

□xOhluDwPQ）:L;g

8、如果要在文本框鍵入字符時(shí)，只顯示某個(gè)字符，如果（*）,應(yīng)設(shè)置文本框的（B）屬性。

A、CaptionB.PasswordCharC.TextD.CharOv/-PDNlY:{'m

9、如果想要在文本框中的內(nèi)容在運(yùn)行時(shí)不能編輯，需要文本框的（A）屬性設(shè)置為True.

ALockedB.MultiLineC.TabStopDVisible%（!N;jAsDA*\;Y8G

10對(duì)于定時(shí)器（Tiner）控制，設(shè)置其定時(shí)是否開啟的屬性是（C）口丫口人9JV,Q"y4u2o7}DE'B

A.IndexB.TagC.EnabledD.Left'S+gD\DC.GDn

11.要在窗口體Fornl內(nèi)顯示“myfrm”使用的語(yǔ)句是（C）

A.Form.caption="myfrm''B.Fornl.caption=4,myfrmwDs#M口}6g（Zh

C.forml.print“myfrm”D/orm.print“myfrm”□<*CQA9YLKDT/EG

12.對(duì)象的性質(zhì)和狀態(tài)特征稱為（C）:umax-Tt-a6ea{

A.事件B.方法C.屬性D.類

13.下列正確的賦值語(yǔ)句是（B）"DDxDbn2Uae

A.x+y=20B.y=x+20C.3x=yD.s=UI-'#E5FtUR

14.當(dāng)使用上下文相關(guān)的幫助時(shí)，選擇要幫助的內(nèi)容，然后按（D：鍵，就可出現(xiàn)MSDN窗口直接顯示所需

的幫助信息。9tD@nxCx1-sDGFlSDq

A.HelpB.F10C.EseD.F1

FQd,PtnS

15.將調(diào)試通過的工程經(jīng)“文件”菜單的“生成.exe文件”編繹成名.exe后，將該可執(zhí)行文件放到其它機(jī)

器上不能運(yùn)行的主要原因是（D）。

A.運(yùn)行的機(jī)器上無VB系統(tǒng)B.缺少.frm窗體文件C.該執(zhí)行文件有病毒D.以上原因都不

對(duì):SDPa6?ELEIT0~

二、填空題

1.當(dāng)進(jìn)入VB集成開發(fā)環(huán)境后，發(fā)現(xiàn)沒有顯示“工具箱”窗口。應(yīng)選擇［u］視圖［/u］菜單的［u］工具箱［/u］

選項(xiàng)，使“工具箱”窗口顯示，&CCI#oDhDZDzIOV3M

2.在VB中,事件過程中由［山對(duì)象名［/u］和［u］事件名［/u］構(gòu)成.+o&'Qs<5A,M,z

3.工程文件的擴(kuò)展名是［u］vbp［/u］z窗體文件擴(kuò)展名是［u］frm［/u］,□AnjDIDz$_-q%t

4.對(duì)象時(shí)代碼和數(shù)據(jù)的集合，例如，VisualBasic中的［u］窗體［/u］、［u］按鈕［/u］、DY&i;W6G

DDpDG5g

［u］文本框［/u］等都是對(duì)象。

5.對(duì)象的方法用于［u］實(shí)施某種操作功能［/u］o當(dāng)方法不需要任何參數(shù)并且也沒有返回值，調(diào)用對(duì)象的方

法的格式為［u］對(duì)象名［/u］［u］.［/u］［u］方法名［/u］。例如對(duì)窗體Forml使用Show方法，應(yīng)寫成

［u］forml.show［/u］。□Anon@3HDRD［&I

6、要使文本框顯示滾動(dòng)條,6要將其［u］ScrollBars［/u］屬性設(shè)置為［u］3［/u］。

7、欲設(shè)置定時(shí)的時(shí)間間隔為4秒，則屬性Interval的值為［u］4000［/u］o$U

PDu5G<QDB~

8、要使標(biāo)簽框的大小隨Caption屬性做自動(dòng)調(diào)整，應(yīng)將[u]AutoSize[/u]屬性設(shè)置為[u]True[Zu]。

9、通過[u]窗體布局窗口[/u]nJ以在設(shè)計(jì)時(shí)直觀地調(diào)整窗體在屏幕的位置

10、要想在代碼中給名為txtshow的文框賦予文本：GOODWORK!時(shí)，應(yīng)當(dāng)編寫的語(yǔ)句是

[u]txtshow.text=HGOODWORK[/u][u]![/u][u]M[/u]?！鮯%sCn_+eDt

11、若命令按鈕的名稱為Cmdopen,程序要求單擊以上命令按鈕，打開一個(gè)窗口frml,請(qǐng)對(duì)以下事件過程

填空。2YDUagf

D6qDc

PrivateSubCmdopen［u］click()［/u］

［u］Frml.show［/u］

EndSud

12.事件就是對(duì)象上所發(fā)生的事情，VisualBasic中的事件如［u］單擊［/u］、［u］裝入［/u］、□AvET#c

t2zDa

［u］鼠標(biāo)移動(dòng)［/u］等。?個(gè)對(duì)象響應(yīng)的事件可以有［u］多［/u］個(gè)，用戶不能建立新的事件。事件過程是指［u］

響應(yīng)某個(gè)事件后所執(zhí)行的代碼［/u］0假設(shè)某一事件過程如下：

PrivateSubcmdl_Click()nKnK2Ane*p3_9_n'%E

Forml.Caption=wVB示例"(xElH+SolB+{N&DDV

EndSub

則響應(yīng)過程的對(duì)象名是［u］cmdl［/u］,事件名是［u］Click［/u］o

13、對(duì)象的方法用于［u］在對(duì)象上實(shí)施某種操作功能［/u］o當(dāng)方法不需要任何參數(shù)并且也沒有返回值，調(diào)

用對(duì)象的方法格式為［u］對(duì)象名方法名［/u］,例如,對(duì)窗體Forml使用Show方法,應(yīng)

寫成［u］Forml.Show［/u］。

14、為了在編寫代碼時(shí)能自動(dòng)語(yǔ)法檢查，必須執(zhí)行［u］工具［/u］菜單中的［u］選項(xiàng)［/u］

命令，打開［u］選項(xiàng)［/u］對(duì)話框，然后選擇“編輯器”選項(xiàng)'中的［u］自動(dòng)語(yǔ)法檢測(cè)［/u］。3Dlkf)E7^

15、定時(shí)器(Timer)控件可識(shí)別的事件是［u］Timer［/u］,了生該事件的時(shí)間間隔定時(shí)由定時(shí)器的

［u］Interval［/u］屬性設(shè)置，其單位為［u］毫秒［/u］。&uCDnm5}2'5M%Q+H!Z$_CJ

三、問答題

1、什么是可視化編程和事件驅(qū)動(dòng)？

答：可視化編程是指無須編程，僅通過直觀的操作方式即可完成界面的設(shè)計(jì)工作的這種編程方

式?！跞?Ldi3pDgDVn|

當(dāng)VB的應(yīng)用程序運(yùn)行后，系統(tǒng)處于等待狀態(tài)，當(dāng)某個(gè)事件發(fā)生后，程序就去執(zhí)行此事件的事件過程，當(dāng)這

個(gè)事件過程執(zhí)行完后，系統(tǒng)又處于等待另一個(gè)事件發(fā)生的狀態(tài)，這就是事件驅(qū)動(dòng)程序方式。

2、對(duì)象、屬性、事件和文件之間的關(guān)系如何？

答：對(duì)象是代碼和數(shù)據(jù)的封裝體。對(duì)象的操作通過與該對(duì)象行關(guān)的屬性、事件、力法米描述。

□i#I(l3F$］EOa

屬性是一個(gè)對(duì)象的基本特性，每個(gè)對(duì)象都有它自己的屬性。

方法是對(duì)象要執(zhí)行的動(dòng)作。

事件是在對(duì)象上所發(fā)生的事情。4W7DOJ(S?Ou

g

3、簡(jiǎn)述事件疆動(dòng)機(jī)制與傳統(tǒng)編程方式的不同。

答：傳統(tǒng)的面向過程的應(yīng)用程序中，應(yīng)用程序自身控制了執(zhí)行那一部分代碼按何種順序執(zhí)行代碼，程序從

第一行代碼開始執(zhí)行并按應(yīng)用程序中預(yù)定的路徑執(zhí)行，用戶無法改變程序的執(zhí)行流程。而事件驅(qū)動(dòng)機(jī)制則

山用戶來決定執(zhí)行的路線。這就是兩者的不同。

4、簡(jiǎn)述事件驅(qū)動(dòng)的工作過程。

答：事件驅(qū)動(dòng)的工作過程如下：?jiǎn)?dòng)應(yīng)用程序，裝載和顯示窗體。（2）窗體或窗體上的控件等待事

件的發(fā)生。（3）當(dāng)某個(gè)事件發(fā)生后，執(zhí)行其對(duì)應(yīng)的事件過程代招。（4）重復(fù)執(zhí)行（2）和（3）,直到遇

到END語(yǔ)句或單擊“結(jié)束”按鈕停止程序的運(yùn)行.

四、程序設(shè)計(jì)題6B-b8s（K-?

1、在窗體上添加一個(gè)文本框和兩個(gè)命令按鈕，并把兩個(gè)命令按鈕的標(biāo)題分別設(shè)置為“隱藏文本框”和“顯

示文本框”。當(dāng)單擊第一個(gè)命令按鈕時(shí)，文本框消失：而當(dāng)單擊第二個(gè)命令按鈕時(shí)，文本框重新出現(xiàn)，并在

文本框中顯示“VB程序設(shè)計(jì)"（字體大小為16）。程序運(yùn)行界面如圖所示?？?「口”

圖1M

解：“隱藏文本框”按鈕中的代碼為：Textl.Visible=FalseD?$cn'%Z*m

顯示文本框.按鈕中的代碼為：Textl.Visible=True!x3C$UCq^b

.......................Textl.Text=wVB程序設(shè)計(jì)”□tH|5\C?w&rn\6N3T

.......................Textl.FontSize=M16"8X-nDQQLCB4p3b:l5u

2、設(shè)計(jì)一個(gè)計(jì)算程序。該程序用戶界面如圖2所示,由四個(gè)文本框:文本框l(textl)、文本框2(text2)、

文本框3(text3)、文木框4(text4),和三個(gè)按鈕：命令按鈕l(commandl)、命令按鈕2(command2)、

命令按鈕3(commands)組成。程序運(yùn)行后，用戶按清除按鈕，則清除文本框中顯示的內(nèi)容，按計(jì)算按

鈕，則計(jì)算三科平均成績(jī)。單擊退出按鈕則退出。！D-bElt:Dt8eOJOLLl\L]@,.v

解：command1中的代碼為：textl="代te為2="”.text3="".text4=""E]vE]}(~lj$Z+|-A!.uClj*e

command2中的代碼為，text4=(val(Textl).val(Text2).val(Text3))/3+T;snTnaDZOj_

command2中的代碼為：End.3、編寫一收款計(jì)算程序。要求住戶輸入商品的“單價(jià)”、“數(shù)量”和“折

扣”后，單擊“計(jì)算”按鈕顯示“應(yīng)付款”，單擊“清除”按鈕,清除文本框中所有的數(shù)據(jù)。程序運(yùn)行界

面如圖3所示。.答：“計(jì)算”按鈕的代碼：text4=val(Textl),val(Text2).val(Text3)/100.

按鈕的代碼：textl="”.text2="”.text3="”.text4=""..□L)]:R!P*AOY1G

.作業(yè)[b].[/b]一、選擇題□QEIolZlpY.I-[9RE){DY

1.按照變量的作用域可將變量劃分為.B.)。.A、公有、私有、系統(tǒng)...B、全局變量、模塊級(jí)變量、過

程變量.C、動(dòng)態(tài)、常數(shù)、靜態(tài)...D、Public.Private.Protected(w4@nj/Cnp*C

2.可獲得字符的ASCH碼的函數(shù)是(C)。l.K3MDB8@DiCm

A.VaiB、FixC、Asc.D、ChrDQ"l%GDpw

,□qOi

3、要退出Do….Loop循環(huán)，可使用的語(yǔ)句的(D)語(yǔ)句。口1_口口5s口76P6GOS

A,Exit.B、ExitFor.C、En.Do.D、Exi.Do|+n2l:mDQ5EDuDR#uDTno

4.把數(shù)值型轉(zhuǎn)換為字符串型需要使用的函數(shù)是(B).'luDv3u8rOyDB+snZ-.,

A、Val..B、Str.C、Asc..D.Chr.5.關(guān)于語(yǔ)句行，下列說法正確的是(B)。.A.一行只能寫一

條語(yǔ)句B.一條語(yǔ)句可以分多行書寫7D};人ElFClp

C.每行的首字符必須大寫.D.長(zhǎng)度不能超過255個(gè)字符.6.表達(dá)式6+1.Mo.4*2+1的值是

(A)..A.9B.11.C.1,D.3.7.以下可以作為Visua.Basi.變量名的是(B)..

A.SIN..B.CO1..C.COS(X)D.X(-l)O]DplWQW._,GnA

8.表達(dá)式Abs(-5)+Len("ABCDE")的值為(C).T0{L]q5'口2口1.

A.5ABCDEB.-5ABCDE..C.10.D.08|.T)hQzV5r

9.在代碼編輯器中，如果一條語(yǔ)句太長(zhǎng)，無法在一行內(nèi)寫下(不包括注杼)，要折行書寫，可以在行末使

用續(xù)行字符(A),表示下一行是當(dāng)前行的繼續(xù)..A.一個(gè)空格加一個(gè)下劃字符(_)B.一個(gè)

下劃字符(_)口《口口口*口丫口~60&2

C.直接回車...D.一個(gè)空格加一個(gè)字符(一)7A口1#1<口.]

lO.Sub過程與Function過程最根本的區(qū)別是(D)..A.Sub過程可以使用Call語(yǔ)句或直接使用過

程名調(diào)用，而Function過程不可以.

B.Function過程可以有參數(shù)，Sub過程不可以.*.]&I:ean)Y

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

名返回值..11."X是小于8。的非負(fù)數(shù)"，用VB表達(dá)式表示正確的是(C)..A..0W

X<80..................B.0<=X<80.C.0<=.an.x<80................口.0〈=.01<80.12.在設(shè)計(jì)菜單口寸,如

果要在菜單中加入一個(gè)菜單分隔條，則菜單分隔條的標(biāo)題必須設(shè)置為(.)DSD\.y!T(Z)u

A.加號(hào)(+)..B.減號(hào)(-).C.星號(hào)(*).D.感嘆號(hào)(!)UF8bDVElmn'M

13.如果要在程序中顯示一個(gè)彈出式菜單，那么要調(diào)用Visua.Basic中提供的方法是

(D)..A.Print...B.Move...C.Refresh.D.PopupMenuLC.[Dk:v

14.下列可以用來存儲(chǔ)圖像供其他對(duì)象使用的控件是

A.Toolbar..B.StatursBar..C.ImageList.D.TreeViev/DZ-\Dj*e$?Df-T9Y2Z

15.當(dāng)單擊工具攔上的按扭時(shí)，會(huì)觸發(fā)的事件走

A.ButtonClick..B.Change.C.Load..D.KeyPress.16.要利用公用對(duì)話框控件來顯示”￡開文

件”對(duì)話框，需要調(diào)用控件的(.)方法.口舊*

ul.O

A.ShowPrinter.B.ShowCpen.C.ShowSave..D.ShowColorno!GD@$.|B

17.對(duì)于窗體級(jí)變量，卜列說法中錯(cuò)誤的是(.).W(Z]m#B-n,A)w-n

A.所在窗體的各子程序都可以訪問7w:{E]yDH8f-fOPS

B.其他窗體的子程序不能訪問.

C.所在窗體發(fā)子程序不能訪問用Private定義的窗體級(jí)變量

D.一定要在所在窗體的通用區(qū)內(nèi)定義

18.從一個(gè)字符串中的第3個(gè)字符開始，獲取5個(gè)字符，應(yīng)使用(B)一

A.Len函數(shù)B.Mid函數(shù)C.Left函數(shù)D.Right函數(shù)

19.用下面的語(yǔ)句所定義的數(shù)組的元素的個(gè)數(shù)是(D).

DimA(-3To5)AsInteger#L8]DVoDC+x

A.6B.7C.8D.9nj.ZDiDM7)#y2oY!K

20.有如下程序段:$1/1DcD|(x${Oq

DimstrlAsString*5I(aDBSL6u/f

Strl="VisualBasic"

當(dāng)該段程序被執(zhí)行完時(shí)，變量strl的值為(B).7W0O2O}5q&@Z

A.”Visual”BJ'Visua“C.“V“D."VisualBasic”hn\:u9A5'C

二、填空題s.KDFOf口？*m[D@JJ□人

1.菜單一般有」u]下拉式[/u]_和」u]彈出式[/u]_兩種基本類型。a?npnv-?

2.通用對(duì)話框控件可顯示的常用對(duì)話框有一[u]打開[/u]_、_[u]保存[/u]_、—[u]顏色[/u]_、_[u]

字體[/u]_、_[u]打印[/u]1_0{DbninWw)xDBOi

3.組合框具有_[u]文本框[，u]_和—[u]列表框[/u]_兩種控件的基本功能。

4.要使數(shù)組的默認(rèn)下標(biāo)從“1開始，則應(yīng)在窗體或標(biāo)準(zhǔn)模塊代碼的聲明部分使用語(yǔ)句_[u]OptionBase

l_[/u]o□-"<-h._DxCP

5.調(diào)用Sub過程時(shí)，使用_[u]call」/u]_語(yǔ)句，語(yǔ)句用于把程序控制傳送到一個(gè)VisualBasic的Sub

過程。

6.若已建立了Forml和Form2兩個(gè)窗體，默認(rèn)啟動(dòng)窗體為Forml。通過」u]工程[/u]_菜單_[u]

屬性一[/u]命令的」u]通用[/u]一選項(xiàng)卜，燈將啟動(dòng)窗體設(shè)置為Form2c在程序中若要顯示Forml窗體，

則執(zhí)行」u]Forml.show[/u]_語(yǔ)句?？趤V,丁口12H0G#|Danw

7.列表框中項(xiàng)目的序號(hào)是從」u]0[/u]_開始的。sDn!^s$_6e3iay

8.Sub過程與Function過程最根本的區(qū)別是[u]_Sub過程名無返回值，F(xiàn)unction過程名有返回值[/u]°

9.VB的代碼存儲(chǔ)在模塊中。在VB中提供了三種類型的模塊：」u]類模塊[/u]_、」u]窗體模塊[/u]_

和」u]標(biāo)準(zhǔn)模塊

10.使用Hide方法會(huì)隱藏被調(diào)用的窗體，但是在調(diào)用Hide方法之后不會(huì)把窗體—[u]卸載[/u]_,被調(diào)

用的窗體中的屬性等已處于」u]內(nèi)存中[/u]_0&PDj口？iKL*R6nKOG

11.將下列數(shù)學(xué)式子寫成VisualBasic表達(dá)式。

(1)答：2*cos(a)*sin(a)/(2*a)

⑵答:sqr(s*(s-a)*(s-b)*(s-c))

(3)sin450:[u]sin(45*2*3.1415/360)[/u]_

12.將下列數(shù)學(xué)式子各條件寫成VisualBasic邏輯表達(dá)式。

⑴1WXV12:l<=xandx<12

⑵A+B2C或a-cWc:(A+B)>=COR(a-c)<=c

(3)a和b都為正整數(shù)或同為負(fù)數(shù)：(a>=0andb>=0)or(a<=0andb<=0)

13.設(shè)A=2,B=3,C=4,D=5o表達(dá)式NotA<=COr4*B八2AndB<>A+C的值為

_[u]False[/u]_.!gDztDq&W-|

14./i：VisualBasic語(yǔ)言中有三種形式的循環(huán)結(jié)構(gòu)。其中，若循環(huán)的次數(shù)可以事先確定，可使用」u]For…

next[/u]_W；若要求先判斷循環(huán)進(jìn)行的條件，可使用」u]Dowhile…loop[/u]_循環(huán)或_[u]while…

Wend[/u]_循環(huán)。

15.以下語(yǔ)句的輸出結(jié)果是_[11]3[/11]_。

a%=3.14159DB$M!H"'%GX

Printa%.n9q'A2R"s.e

三、閱讀下列程序，寫出程序運(yùn)行結(jié)果。4Hn'7A!BOX$J

1、PrivateSubForm_Click()

StaticSumAsInteger:Q&Od-n-{4l-oDt

For1=1to1005s)l207wDcRDK?*HDW!qai

Sum=Sum+I

NextI

PrintSum□T6h+\#a"P&0c9v

EndSubOZnUDLDb:A&fDp

程序運(yùn)行結(jié)果為:1+2+…….+99+100=5050-D#fDwa|QI2QD|

2、privateSubForm_Click()□'DkDt5H-rL6w9B'H:|

A=10:b=15:c=20:d=25

PrintA;Spc(5);b;Spc(7);cDF(l!gnj'UnzW-Fm3l

PrintA;Spc(8);b;Space$(5);c

Printc;Spc(3);M+”;Spc(3);c+d

EndSub

10(5個(gè)空格)15(7個(gè)空格)20EkOvLlNN$j6G

10(8個(gè)空格)15(5個(gè)空格)20

20(三個(gè)空格)+(三個(gè)空格)45

3、PrivateSubForm_click()SDjninw9GV!K:J6人

Fori%=1to3

Forj%=1toi

PrintLTrim(Str(i%))+U*M+LTrim(Str(j%))+“="；i%*j%;

Nextj%

Print

Nexti%

EndSub,V

1*1=1:EcnN:()k

2*1=22*2=4

3*1=33*2=63*3=90N2_f0cnu)P5H

□}DA7tn[Dc4Nai*A-E

4.PrivateSubCommandl_Click()Dh

Dima,bAsInteger2NDDsDTng;n%BlzWa

A=3.4nLQI&H-l(?

B=3.4

J”X3N

4X9N

j%y)a,dS!..bfw」d

9十3口3口。2口9：]口$口【-C*Io±T=CJOd

(I-Tl)qe14uud

S3T=IJOj

nl□n□e□qsn[0>P!|：)一UJ」5^qns己更八四名

b9QzA(VD\Cd：b/￡士警34X91

t'￡生智T4X91

qnspug

q=4X9i-34X91

e=)X3_LBX3_L

hDh[:IQh

EndSub

*

***

*****

********

*本**木**木*□§口

四、程序設(shè)計(jì)題□qda(}CL5@&hlZ)E

1.購(gòu)物優(yōu)惠程序。某商場(chǎng)為了加速促成商品流通，采用購(gòu)物打折的優(yōu)惠辦法，每位顧客一次購(gòu)物(口在

100元以上者，按九五折優(yōu)惠；(2)在200元以上者，按九折優(yōu)惠；(3)300元以上者，按八折優(yōu)惠;

(4)500元以上者按七折優(yōu)惠。在窗體上添加兩個(gè)文本框和一個(gè)命令按鈕，要求在Textl中輸入購(gòu)物商

品總金額，單擊命令按鈕，在Text2中輸入優(yōu)惠后的價(jià)格。程序運(yùn)行結(jié)果如圖解所示。

IfVal(textl)>=500thentext2=Val(textl)*0.7

ElseifVal(textl)>=300thentext2=Val(textl)*0.85

ElseifVal(textl)>=200thentext2=val(textl)*0.9r/[.eDsE-H8PDI

Elseifval(textl)>=100thentext2=val(textl)*0.956L,XDV(]!uQ[#I$xv

Endif

$LWDD;bS(Z

2.輸出100~200之間不能被3整除的的數(shù)，要求用Do語(yǔ)句的一種形式來實(shí)現(xiàn)，程序運(yùn)行結(jié)果如圖5所

示。|□E5q□Im%r,m

窗體的裝入事件中加入如下代碼：

Dimaasinteger

A=1000FOH:m$IwBgDl

Dowhilea<=200

If(amod3)<>0thenn^!J.DnzDo#M7pd%A

Listl.additenstr(a)+Jm

Endif

A=a+1

loop#PDIDxmnP;Pnr5FXn]

3、編寫程序,打印如下的乘積表:

)E5Z#A0?2zQT7K

DimI,jasinteger4TADTOxOrnkDI

Print"*w:space(5):!TDQDW)0!fDQ+m"k

Fori=3to12step3*@nKnE)I3sls-f

Printstr(i);space(5);s

Nexti

Print

Fori=15tol8

Printstr(i);space(3);a3k+e/'s.k8plS

Forj=3to12step3

Printstr(i*j);space(4);)d%mD~HhDNP

Nextj

Print6@dv□人

bQ{6k$}

Nextj

M%wDzDQyD{Cd;b

4、設(shè)計(jì)?個(gè)計(jì)算程序。該程序用戶界面如圖7所示。要求程序運(yùn)行后，用戶選中單擊選按鈕，則程手作

10和2的相應(yīng)計(jì)算，并把計(jì)算結(jié)果在文本框中顯示出來。如用戶選中加法單選按鈕，則程序作10和2的

相加，計(jì)算結(jié)果12在文本框中顯示出來。按結(jié)束,則退出。

乘法單選按鈕的單擊事件中添加如下代碼：SDIO$r,CnoDQ

Textl=10*2D?&_!Lr5?

除法單選按鈕中添加如下代碼：□l#dMloO[

Textl=10/2

加法單選按鈕中添加如下代碼：

Textl=10+2

減法單選按鈕中添加如下代碼：textl=10-2/0zDp@nEkDq)q

結(jié)束按鈕中代碼：end或unloadmeOI3}ajy.lOB+D(anU7K@

5、編寫輸入一個(gè)0~6數(shù)字，顯示漢字對(duì)照輸出星期的Function過程。程序運(yùn)行結(jié)果如圖8所示。

文本框的change事件中代碼如下：

Selectcaseval(textl)

Case0

Labell.caption=w星期天”+chr(13)+”(Sunday)"!T#[*t7jO|

Case1

LabelLcaption="星期一"+chr(13)+”(monday)"~..

Case2_

Label1.caption-星期二"+chr(13)+”(Tuesday)”

Case3_

Labell.caption="星期三"+chr(13)+”(Wednesday)”

Case4

Labell.caption="星期四"+chr(13)+〃(thursday)〃

Case5

Labell.caption=〃星期五"+chr(13)+”(firday)”

Case6

Label1.caption="星期六"+chr(13)+”(saturday)”

Endselect

6.編寫一個(gè)程序，當(dāng)鼠標(biāo)移到Picturel控件時(shí)，鼠標(biāo)指針改變形狀：當(dāng)在Picturel控件上單擊

鼠標(biāo)右鍵時(shí)，通過消息框顯示“Youpressedrightbutton",并再次改變鼠標(biāo)指針的形狀。

Picturel_mouseupOv8w"_.jDiDn?

Ifbutton=2then

1=1

Msgbox”youpressedrightbuttonM{□y8Y$|4[nv-SQ

Endif

Endsub

7、列表框應(yīng)用程序。要求從文本框中輸入姓名，然后按“添加”按鈕，把姓名添加到列表框中；當(dāng)選擇

列表框中某一項(xiàng)時(shí)，按''刪除"按鈕，從列表框中刪除：當(dāng)列表框中某一項(xiàng)時(shí)，按“修改”按鈕，把列表框

中選取的項(xiàng)送往文本框且“修改”按鈕變?yōu)椤靶薷拇_認(rèn)”。在文本框的內(nèi)容修改好后，按“修改確認(rèn)”按

鈕，再把文本框中修改后的信息送到列表框且“修改確認(rèn)”按鈕變?yōu)椤靶薷摹薄３绦蜻\(yùn)行結(jié)果如圖9所示。

0?CM$r"S,yDs2I

J

添加按鈕代碼：listl.additemtextl.textSxOEnAnFns(y2Q6mnTDPCL{

Textl.text=M"'FM6rvOC8C

刪除：iflistl.textv>""then

Listl.removeitem=listl.listindexfO%P1TgCnON6|

b/\

Endif?

修改:

Ifcommand3.caption=''修改"then

Textl.text=listl.text

Command3.caption="修改確認(rèn)”

Else

Ifcornmand3.caption="修改璇j認(rèn)“then

Listl.list=listl.listindex>=textl.text

Command3.caption="修改"

Endif

Endif

佩因力零發(fā)表于2007-11-1416:31

作業(yè)..一、選擇題'A4olx[IlZZ]w[I]o（人

c

1、Visibl.Basic根據(jù)計(jì)算機(jī)訪問文件的方式將文件分成三類，其中不包括（B）5[:w-'□1%...n

A.順序文件.B.Unix文件.C.二進(jìn)制文件.D.隨機(jī)文件.P'HIZIW..BOA!D!f.M

2、隨機(jī)文件進(jìn)行文件讀取的單位是（B）,L*.f2l"V

A.字節(jié)..B。記錄.C。整個(gè)文件..D.字符.3、為了使目錄路徑列表框Dirl的內(nèi)容符合驅(qū)動(dòng)器列表框Drivel

的選擇,應(yīng)當(dāng)（B）..A.在Dirl_Click事件中加入Dirl.Path=Drivel.Drive.B.在Drivel_Click事件

中加入DirLPath=Drivel.Drive-cD.r-P;.K"?ElE

C.在Dirl_Click事件中加入Drive1.Path.Dir1.Drive.D.在Cirl_Click事件中加入

Drivel.Path.Dirl.Drive.4,為了使drivel驅(qū)動(dòng)器列表框、dirl目錄路徑列表框和filel文件列表框能

同步協(xié)調(diào)工作,需要在（B）.A.drivel的Change事件過程中加入drivel.Drive=dirl.Path,在dirl

的Change事件過程中加入cirl.Path=filel.Path代碼。3yA-kD]DQ（z#r#b%?no:?

B.drivel的Change事件過程中加入dirl.Pat..drivel.Drive,在dirl的Change事件過程中加入

filel.Pat.=dirl.Path代碼。.C.dirl的Change事件過程中加入dirl.Pat..driveLDrive,在filel的

Click事件過程中加入filel.Pat.=filel.fileName代碼。.D.dirl的Change事件過程中加入

dirl.Pat..drivel.Drive,在filel的Click事件過程中加入filel.Pat.=dirl.Path代碼。.5、下面關(guān)于順

序文件的描述正確的是（A.K3r90（Z]N"TE]g

A.每條記錄的長(zhǎng)度必須相同2QL]j（Z]N

j2r0\

B.可通過編程對(duì)文件中的某條記錄方便地修改口上6]9n5P.sDH7|

C.數(shù)據(jù)只能以ASCII碼形式存放在文件中，所以可通過文本編輯軟件顯示.D.文件的組織結(jié)構(gòu)復(fù)

雜.6.KILL語(yǔ)句在VB語(yǔ)言中的功能是（C）。.A.清內(nèi)存..B。清病毒.C。刪除磁盤上的文件..D。清屏

幕6y;J2?CLj+fC]OL]T4V

7、可用來改變坐標(biāo)度量單位的是（D）2?（人口@口卜1..｝國(guó)

A.Drawstyle屬性.B.DrawWidth屬性.C.Scale方法.D.ScaleMode屬性

lElhElYl'DoElelZIn.V

8、以下的屬性和方法中，可重定義坐標(biāo)系的是(C)-K9eUg3L%kO.eA.Drawstyle屬性.B.DrawWidth

屬性..C.Scale.Q.ScaleMode屬性.PC]h];Y[Z]W口)口1-1

9、當(dāng)用Line方法畫直線后，當(dāng)前坐標(biāo)在(C)?Z&w-cf/]&Z+J(ZlJZIW

A.(0z0).B.直線起點(diǎn).C.直線終點(diǎn).D.容器的中心.10、Lin.(200.200)-Step.500.500)將在窗體(C)

畫一直線。9pDm+Kle4U"H

A.(200.200)到(500.500)..B.(200.200)到(300.300):.xlJO-F-HEl\/jlGIZIy

C.(200.200)到(700.700)..D.(300.300)至iJ(500.500).11.設(shè)置對(duì)象的邊框類型的屬性是

(B)..A.Drawstyle.B.Bcrderstyle.C.DrawWidth.D.ScaleMode.12.為了清除圖片框Picturel

中的圖形，應(yīng)采取的正確方法是(B).A.選擇圖片框，然后按Del健.B.執(zhí)行語(yǔ)句

Picturel.picture=LoadPicture(MM)nR(@$B*)nkOBDJhni

C.執(zhí)行語(yǔ)句PictureLpicture."".D.選擇圖片框，在屬性窗口中選擇Picture屬性條，然后按回車鍵.13、

繪制多種形狀的圖形，需要設(shè)置Shape控件的(A)屬

性。...A.Shape.B.Borderstyle.C.FillStyleD.Style.14.繪制多種形狀的直線,需要設(shè)置Line

控件的(B)屬性。...A.Shape.B.Borderstyle.C.FillStyleD.StyleD[Do2G$unACP%[:q-

b)T4b

15、如果準(zhǔn)備讀文件,打開順序文件“text.dat”的正確語(yǔ)句是(C).A...ope.

4,text.dat.fo.writ.A.#l.B...ope.4<text.dat.fo.BinaryA.#13.l8}DO3L+a;x+m

C...ope.<4text.dat.fo.InputA.#1.D..ope.44text.dat.fo.RandomA.#1.16、如果準(zhǔn)備向隨機(jī)

文件中寫入數(shù)據(jù)，正確的語(yǔ)句是(C)9jQe&w+]4W4n#a3p

A.Prin.#l.rec.B.Write#l.recC.Pu.#l.rec.D.Ge.#1.rec.17、下列“CommandDialogl”控

件程序代碼，CommandDialogl.Action=l/代表(B).A.文件另存為.B.打開文件C.色彩.D.打印

□OD.q4.Q

18、FileFilter.Pattern=w*.bat.程序代碼執(zhí)行后，會(huì)顯示(A)….只包含擴(kuò)展文件名為"*.bat”的文

件..B.第一個(gè)bat文件.C.包含所有的文件..D.會(huì)顯示磁盤的路徑.19、卜列數(shù)據(jù)對(duì)象模型中采用OL.DB

訪問數(shù)據(jù)庫(kù)的是(C3.A.DA。B.RDO.C.ADO..D.RDO和ADO.20.設(shè)ADOrs為Recordset對(duì)乳從

“學(xué)生基本情況表”中獲取所有記錄的語(yǔ)句是(B).A.ADOrs.Ne."Seleu.Fro.學(xué)生基本情況表”

2AD~!q,tDg

B.ADOrs.Ope."Selec.Fro.學(xué)生基本情況表”;g(w']DrD|#Llz%C

C.ADOrs.Execut."Selec..Fro.學(xué)生基本情況表”.D.ADOrs.Selec.”Selec..Fro.學(xué)生基本情況表”

2@7nQJD'□..o$pQ@-W

21、VB中將變量xl聲明為Excel應(yīng)用程序?qū)ο蟮姆椒ㄊ?/p>

(A).A.Di.x.A.Excel.ApplicationB.Di.x.A.Excel.WorkbookDg(pnjn{D<nK

C.Di.x.A.Excel.Worksheet.D.Di.x.A.Excel.Worksheets.二、填空

題：)口丫**口(:口~口\/7口1%>口口(人)i

1、如果要新建一個(gè)順序文件,用Open語(yǔ)句時(shí)，操作方式關(guān)鍵詞.outpu.。.2.在V如ua.Basic程序中實(shí)

現(xiàn)復(fù)制文件“C：\^^到D:盤根目錄下的語(yǔ)句口0.RD..i2f

.filecopy"c:\"d:\.0.3.在Visua.Basic程序中實(shí)現(xiàn)刪除文件"D:\tem.tmp”的

語(yǔ)句為_kil."d:\tem.tmp.。.4.按文件號(hào)為1打開順序文件SEQNEW.DAT,用于寫入數(shù)據(jù)，語(yǔ)句.為

___ope.nSEQNEW.DAT.fo.outpu.as…*E%e"POk)tn.S&B

5.按文件號(hào)為2打開順序文件SEQOLD.DAT,用于從該文件讀出數(shù)據(jù),語(yǔ)句為—ope.”

5￡(^01_口.口八「1:0」叩11刀.#.。.6,若窗體的左上角坐標(biāo)為(-200,250),右下角坐標(biāo)為(300,-150),則X軸

的正向..,Y軸的正向.上_0.7.Stretch屬性設(shè)置為_false」j，圖像框可自動(dòng)改變大小以適應(yīng)其中的圖形..8.

在圖片框Picturel中畫一個(gè)左上角在(500,500),邊長(zhǎng)為500的紅色實(shí)心正方形的語(yǔ)句為

_picturel.lin.(500,500)-step(500,500).vbre..B.o.9.設(shè).CurrentX=50,CurrentY=100,執(zhí)行指

w

line(100,20)-Step(300/500)后,Current=_(400,520)_..10.使用ADO模型時(shí)，可通過

_ActiveConnect_屬性建立Recordset和Connection對(duì)象的連接..11.VB中將數(shù)據(jù)庫(kù)分為本地?cái)?shù)據(jù)庫(kù).

遠(yuǎn)程數(shù)據(jù)庫(kù)和_外部數(shù)據(jù)庫(kù)一三種類型..12.采用ADO模型時(shí)，當(dāng)使用Open方法打開一個(gè)記錄集后，與

ADOrs.Fields(“學(xué)號(hào)”)等效的語(yǔ)句是_ADOrs(“符號(hào)”)_..13.ADO模型中一般可通過Connection

對(duì)象的Execute方法執(zhí)行―增加_、—?jiǎng)h除_、一修改一等三類不返回結(jié)果集的SQL語(yǔ)句..14.設(shè)

StrSQL.Strl為字符串變量，其中Strl的值為“001”，那么執(zhí)行賦值語(yǔ)句S"SQL="

Selec..fro.Tabel.Where學(xué)號(hào)='"+Strl+”'”后,StrSQL的值等于」select..fro.tabel.wher.學(xué)

號(hào)='001'15.在VB中，將Foxpro稱為外部數(shù)據(jù)庫(kù),Access稱為_本地?cái)?shù)據(jù)庫(kù)一SQ.Server稱

為—遠(yuǎn)程數(shù)據(jù)庫(kù)—..三、程序設(shè)計(jì)題□DWEIY'HOfCOz+fIZIKEl.R

1、在窗體上建立一個(gè)驅(qū)動(dòng)器列表框、目錄列表框、文件列表框、圖片框。要求程序運(yùn)行后，驅(qū)動(dòng)器列表框

Drivel的默認(rèn)驅(qū)動(dòng)器設(shè)置為C盤，選擇Filel中所列的確圖片文件(*.Bmp和*Jpg),則相應(yīng)的圖片

顯示在圖片框Picturel中。程序運(yùn)行結(jié)果如圖10所示。.解：依據(jù)圖10設(shè)計(jì)界面，文件列表框的pattern

屬性設(shè)置為：*,Bm..*.jp.wDCD|8m;mnR

驅(qū)動(dòng)器列表框的change事件中添加如下代

碼：.chdriv.drivel.drive.dirl.path=drivel.driveDyDF-X

目錄列表框的change事件中添加如下代碼：

chdirdirl.path

filel.path=dirl.pathDkDeD|4|%w0j5d

文件列表框的click事件中添加如下代碼："C/U1@2GDU/M

picturel.picture=loadpicturefilel.filename

2.余弦曲線的方程為y=cosx,畫出x從-2到2的確余弦曲線，并在坐標(biāo)軸上標(biāo)出刻度,如圖11所示。

如圖窗體的單擊事件中添加如下代碼：

Forml.scale(-2*3.141594)-(2*3.14159,nk'LD?x

Forml.line(-2*3.14159,0)-(2*3.14159/0)!m!)lQDf0G)z.QDBH

Forml.line(0,1)-(0,-l)nq!M+qnJzOC-j

Y

Forml.currentx=0.2：forml.currentY=-0.1:print"0"

G4B:zC[DS

Forml.currentx=-3.2：forml.currentY=-O.l:print"-pi”

Forml.currentx=3.3：forml.currentY=-O.l:print"pi”~DI9_De-\;EOV*G

Forml.currentx=-6.2:forml.currentY=-O.l:print"-2pi”

Forml.currentx=5.7:fo-ml.currentY=-O.l:print”2piv

Forml.currentx=0.2:fo*ml.currentY=0.5:print”0.5”

Forml.currentx=0.2:fo-ml.currentY=-0.5:printw-0,5M□|DfPOu8f*]:p

ForI=-6.282to6.282step0.08

Forml.pset(I,cos(I))

NextI

-[□uDgDt/FD~

3,使用Line控件顯示宣線，并且可以顯示直線的線寬和線型.程序運(yùn)行界面如圖12所示.

如圖添加代碼如下!l?ilz)U2zr+?"'f>Cp

復(fù)選框的單擊事件代碼：0wOkE)ii;[l\#QW

Ifcheckl.value=1then*~nr,N6R,clL"Z3f(wnt

Linel.borderwidth=4

Else

Linel.borderwidth=1

Endif'[6D(D7[

E

u-]8@nADL2E4D-[

實(shí)線、虛線、單選框要弄成?個(gè)optionl單選框控件數(shù)組。單選框單擊事件代碼:

Selectcaseindexnk#]Cs:SDS-x

Case0+L&WDV"OaN"rlr4?

Linel.borderstyle=lh-@L%vE

Cas.1□j&]nwnW$I2HDR%F:p&_

Llnei.borderstyl..23P)R-tnT&P

x

Cas.2.Linel.borderstyl..3EDIDh8d;R&'DK&dDKD]3s/O

En.select.4.使用Shape控件顯示幾種圖形，并可以設(shè)置圖形的邊框和填充效果等.程序運(yùn)行界面如圖13

所示..首先按圖作出程序界而。形狀框架里的單選框要做成optionl控件數(shù)組，邊框類型框架里的單選框

最成option2控件數(shù)組，填充風(fēng)格框架里的單選做成option3控件數(shù)組。□o*CD]0v$c"k+'

Optio.l單擊事件代碼如下：口環(huán)13討0}(9.2口「口'

'3s:FCI

Selec.cas.index(.iDS5l)W-.W.F$M，A

Cas.O.Shapel.shap..O.Cas.in.JDX$wOmh$.W#.K

Shapel.shap..l.Cas.2.Shapel.shap..3Db"h

o8c.u)inunNngnv3{D]

Cas..uDI];XFB+h

Shapel.shap..4nqnBOODpD|

En.select.Optio.2單擊事件代碼如下：.Selec.cas.indexCLa9.WC]F

Cas.O.Shapel.borderstyl..OzYDG!m"Vn'-~*0ncDn(y

Cas..dnB-CDCD~aA&i-N(j

Shapel.borderstyl..24bDY3{CZD.I3_DE;j5T

Cas.2nB'pn|*R%Qz

Shapel.borderstyL.l.Cas.34kO}D\)IDc"Gni5r4-z

Shapel.borderstyl..3....Cas.4.Shapel.borderstyl.=4.En.select.Optio.3單擊事件代碼如

下：..Selec.cas.inde.VDD匚{7@口".

Cas.0$N8.U+.SnMng7m

Shapel.fillstyl..l.Cas..<Dp'E![n_$H!SO~Diae%Q

Shapel.fillstyl..l.Cas.2,Shapel.fillstyl..3!J-MDn;J8{;J7]3sn.mq

Cas.3.Shapel.fillstyl..6n.Sn.ZDB%HnpawaP

En.selec.jDb5T|8HDG

5.使用SQ.Server或Access建立名稱為“學(xué)生的數(shù)據(jù)庫(kù)，并在其中創(chuàng)建“students"的數(shù)據(jù)庫(kù)表,其結(jié)構(gòu)

及初始記錄如表1所示.使用ADO對(duì)象和MSFIexGrid控件設(shè)計(jì)數(shù)據(jù)庫(kù)列表顯示程序.程序的設(shè)計(jì)界面和

運(yùn)行結(jié)果如圖14、圖15所示。匚^口'/口口13口人5b

.......表1.學(xué).姓,專..200400.張徽件專.)ZLI]$P|[ZlHt]](DcA3'Elv

200400.李.會(huì)計(jì)專..200400.王.軟件?！?NwUnElj.聲名對(duì)象變量ADOcn,用于創(chuàng)建與數(shù)據(jù)庫(kù)的連

^.Privat.ADOc.A.connection.ReadfromtableO[%,e4U-aleD~

Privat.su.readfromtable.)3[4-BDwDvn{ne&?

A

Di.strtm.A.string*Gn.?a]&Dm7JzUF(Dnu

Di.ADOr.A.ne.recordsetDd3[Cod.W*h(Z

ADOrs.activeconnectio.=ADOcn.ADOrs.ope.''select*^?.student.orde.b.

.MSFIexgridl.clear.MSFIexgridl.row..onS5C%..tO@ng2Y

MSFIexgridl.col..3nc/.i!@

Strtm..“學(xué)號(hào)”+vbtab+“姓名"+vbtab+“專

業(yè)”.MSFIexgridl.addite.s:rtmp.D.whil.no.ADOrs.eofvnjnCD.e,|

Strtmp=ADOrs(“學(xué)號(hào)”)+vbtab+ADOrs(.姓名")+vbtab+ADOrs(“專業(yè)”)口0口~1_口6火

MSFIexgridl.addtte.strtmpDmDr+]npnu)..jCd

ADOr.movenextD^Dc.q4KnM

Loop*ghUq8{EIM□乙A

MSFIexgridl.fixedcol..0nv.'iOF;F8[3N

MSFIexgridl.fixedrow..l.En.sub.Privat.su.form_load().D.strD.A.string.strDB=H

provider=SQLOLEDB;LSF;Use.ID=sa;password=;database=?r:

生”.i.ADOc.i.nothin.then"s/r.xP

se.ADOcn=ne.connection.ADOcn.ope.strDBDu)MDU$}D[4j

En.if+I;W,HDvzinwDL

Readfro.tabl._,nDizfni:..V

En.subuDq8]3K2A&,Oo+O

Pmandl_click()no;g-}F:j

Unloa.me.En.su.

佩因?yàn)榱惆l(fā)表于2007-11-1416:32

作業(yè)4

一、選擇題

1.WinsockServer.LocalPcrt=10001語(yǔ)句的含義是（A）（□rCzDD7lewo2[

A.設(shè)置偵聽端口B.設(shè)置計(jì)厚機(jī)IP地址C.設(shè)置中斷地址D.設(shè)置通訊協(xié)議DNbQZlR-TOI\

2.當(dāng)Winsock控件處于關(guān)閉狀態(tài)時(shí)，其State屬性的值是（B）°&U-aDBDh@np#O!n

A.lB.OC.2D.60z,|

3.相對(duì)于UDP協(xié)議而言，TCP協(xié)議是一種（A）.

A.面向連接的協(xié)議B.無連接協(xié)議C.計(jì)算機(jī)間不建立連接D.適用于傳送少量數(shù)據(jù)

4.VB程序中通常不會(huì)產(chǎn)生錯(cuò)誤提示的（D）。

A.編譯錯(cuò)誤B.實(shí)時(shí)錯(cuò)誤C.運(yùn)行時(shí)借誤D.邏輯錯(cuò)誤

5.VB程序的編譯錯(cuò)誤一般可通過VB集成環(huán)境的何種設(shè)置自動(dòng)檢測(cè)（B）o

7cnc4?%vnRnA/_-[nq

A.要求變量聲明B.自動(dòng)語(yǔ)法檢測(cè)C.自動(dòng)顯示快速信息量D.根本無法自動(dòng)檢測(cè)9S!x"n#B{loDhDv

6.VB程序中設(shè)置斷點(diǎn)的按鍵是（C）。

A.F5鍵B.F6鍵C.F9健D.F10鍵口？"wEIH+ehf:GUu-U&b

7、OnErrorGoToErrLB語(yǔ)句中，ErrLB的含義是（A）。m'tOECI+sDcDM

A.行標(biāo)識(shí)號(hào)B.SUB過程名C.FUNCTION過程名D.錯(cuò)誤號(hào)Dbg&IdntJUdg

DDK"]nn7{

8、Err對(duì)象中，用來表示錯(cuò)誤描述的屬性是（B）。/q3x"AVDn-QOZ

A、ErrNoB、DescriptionC、NumberD、Sotrce

二、填空題。

1、使用Winsock控件時(shí)，一旦有數(shù)據(jù)到達(dá)，將首先觸發(fā)該控件的DataArrival事件。而如果要發(fā)送數(shù)據(jù),

則通常使用該控件的senddata方法。

2、Winsock控件主要用來編制或基于TCP/IP經(jīng)UDP協(xié)議的通話程序。

3、ActiveXEX文件的后綴是exe?！鮬OiLJ'OD.gCR_

4、COM對(duì)象有兩種類型接廠，即標(biāo)準(zhǔn)接口和用戶接口.

5、如果希望得到本地計(jì)算機(jī)的IP地址，可以使用Winsock控件的locallP屬性。

6、Winsock控件的BytesReceived屬性返回接受到的數(shù)據(jù)，通常使用getdata方法來獲取這些數(shù)據(jù)/°

7、Winsockl.Listen語(yǔ)句的含義是使服務(wù)程序處于偵聽狀態(tài)等待客戶訪問。□OQ|Dq-t#^CT3e

8,常用中的VB網(wǎng)絡(luò)編程控件主要有Winsock、InternetTransfer.WebBrowser二種。

□MDDOAnV9D!x-n

9、VB中的程序錯(cuò)誤類型主要有編譯錯(cuò)誤、邏輯錯(cuò)誤、實(shí)時(shí)錯(cuò)誤等三種。C@"_*lX+q9onnn|:a

10、VB中用于關(guān)閉錯(cuò)誤捕獲機(jī)制的語(yǔ)句是onerrorgoto0。

三、問答題。

1、簡(jiǎn)述基于Socket的通信過程。

Socket在計(jì)算機(jī)提供了一個(gè)通信端口，可以通過這個(gè)端口與任何一個(gè)也同時(shí)具有Socket接口的計(jì)

算機(jī)進(jìn)行通信，應(yīng)用程序在網(wǎng)絡(luò)上傳輸、接收的信息都通過這個(gè)Socket接口實(shí)現(xiàn)，只需要對(duì)Socket接口

進(jìn)行數(shù)據(jù)的讀寫操作就可以了。

2、簡(jiǎn)要設(shè)計(jì)錯(cuò)誤處理程序的3個(gè)步驟。

<1）捕捉錯(cuò)誤，并強(qiáng)制程序跳轉(zhuǎn)

<2）編寫錯(cuò)誤處理程序，對(duì)所有可預(yù)見的錯(cuò)誤作出反應(yīng)

（3）退出錯(cuò)誤處理程序

3、簡(jiǎn)述常用的程序調(diào)式技巧

<1）事先做好備份Lj"?f;g（FOu

（2）分離受懷疑的程序:p/@DE4wL]V"fllmLI\

（3）縮小搜索范圍□八+R!M3J6]9RC]u[Z]@EIX

E

(4)使