Basic程序设计形成性考核3

1、Visual Basic程序设计形成性考核3班级学号姓名成绩一、单项选选择题1在下列列有关VVisuual Bassic的的叙述中中，错误误的是（ ）。A采用了了事件驱驱动的编编程机制制 B是面向向对象的的编程语语言 C是可视视化的程程序设计计语言 DD是面向向过程的的程序设设计语言言 2应用程程序打包包后，其其包文件件的后缀缀为（ ）。A.exxe B.txxtC.caabD.occx3在新建建一个“标准EEXE”工程后后，不在在工具箱箱中出现现的控件件是（ ）。A列表框框 BB通用对对话框C驱动器器列表框框 DD图片框框4设窗体体的名称称为Foorm11，则在在程序运运行过程程中，单单击窗

2、体体时，被被执行的的事件过过程的名名称是（ ）。AForrm1_Cliick() B.Forrm1_DbCClicck()CForrm_CClicck() DFFormm_DbbCliick()5对于定定时器（TTimeer）控控件,设置其其定时是是否开启启的属性性是（ ）。AInddex BTagg CCEnaableed DInttervval6在Viisuaal BBasiic中，工工程文件件的扩展展名为（ ）。A.frrm BB.vbbp C.clls D.baas7有程序序代码如如下：Text11.Teext = 欢迎走走进VBB世界！则Textt1，Texxt ，和和欢迎走走进VB

3、B世界！分别代代表（ ）。A对象，值值，属性性 B对象象，属性性，值C对象，方方法，属属性D属性性，对象象，值8以下叙叙述中正正确的是是（ ）。A窗体的的Namme属性性指定窗窗体的名名称，用用来标识识一个窗窗体 B窗体的的Namme属性性的值是是显示在在窗体标标题栏中中的文本本C可以在在运行期期间改变变对象的的Namme属性性的值 D对象的的Namme属性性值可以以为空9. VBB提供了了结构化化程序设设计的三三种基本本结构是是（ ）。A选择结结构、过过程结构构、顺序序结构 B选择结结构、循循环结构构、顺序序结构C过程结结构、转转向结构构、递归归结构D递归结结构、选选择结构构、循环环结构10

4、在VVB中，下列变量名不合法的是（ ）。Atakke_11 BtakkeCtakke_11_2DD taake-111下列列说法中中正确的的是（ ）。 为了保保存一个个Vissua Bassic应应用程序序，应当当A只保存存窗体文文件 B只保存存工程文文件 C分别保保存工程程文件和和标准模模块文件件 D分别保保存工程程文件、窗窗体文件件和标准准模块文文件12确定定一个控控件在窗窗体上的的位置的的属性是是（ ）。AWiddth或或Heiightt BWWidtth和HHeigghtCTopp和Leeft DTopp或Leeft13确定定一个窗窗体或控控件的大大小的属属性是（）AWiddth或或H

5、eiightt BBWiidthh和HeeighhtCTopp或LeeftDDToop和LLeftt14当一一个工程程含有多多个窗体体时，其其中的启启动窗体体是（ ）。A第一个个添加的的窗体 BB最后后一个添添加的窗窗体 C包含控控件最多多的窗体体 D在“工程属属性”对话框框中指定定的窗体体15在一一个语句句行内写写多条语语句时，语语句之间间应该用用（ ）分分隔。A逗号BB冒号C顿号DD分号16要设设置命令令按钮的的背景图图形，必必须设置置的两个个属性是是（ ）。AStyyle和和PiccturreBStyyle和和IcoonCCapptioon和PiccturreDVallue和和Icoon

6、17目录录列表框框的Paath属属性的作作用是（ ）。A显示当当前驱动动器或指指定驱动动器上的的某目录录下的文文件名B只显示示当前路路径下的的文件 C显示根根目录下下的文件件名D显示当当前驱动动器或指指定驱动动器上的的路径 18将数数据 Chhinaa项添加加到列表表框（LListt1）中中成为第第一项应应使用的的语句是是（ ）。ALisst1.AdddIteem 00, ChhinaaBLiist11.AdddIttem 1, ChhinaaCLisst1.AdddIteem Chhinaa,0DLiist11.AdddIttem Chhinaa,119要绘绘制多种种形状的的图形，需需要设置

7、置Shaape控控件的（ ）属性性。A、Styyle BB、BorrderrstyyleC、FilllSttylee D、Shape20下列列可以把把当前目目录下的的图形文文件piic1.jpgg装入图图片框PPictturee1中的的语句为为（ ）。APiccturre1= piic1.jpgg BPiccturre1 =LooadPPictturee(picc1.jjpg) CPiccturre 11.Piictuure=LoaadPiictuure(picc1.jjpg) DPiccturre 11.Piictuure=LoaadPiictuure(picc1 ) 21如果果要在窗窗体代

8、码码编辑器器的”通用”部分定定义私有有Subb过程，则则正确的的语句是是（）。APubblicc Suub BPriivatte SSubCPubblicc FuuncttionnDPPrivvatee Fuuncttionn22不属属于VBB数据库库引擎的的是（ ）。AODBBC BBBDDECJett引擎 DOLEEDB23.在VVB应用用程序中中，进行行断点设设置的按按键是（）。ACtrrl+F9键键BF9键键CCtrrl+FF8键 DF8键键24如果果准备读读文件，打打开顺序序文件”ttextt.daat”的的正确语语句是（ ）。Aopeentexxt.ddatForr wrriree

9、 Ass # 1Bopeentexxt.ddatForr Biinarry AAs # 1Copeentexxt.ddatForr Innputt Ass # 1Dopeentexxt.ddatForr Raandoom AAs # 125使用用ADOO对象模模型时，使使Reccorddsett和Coonneectiion对对象建立立连接的的属性是是（ ）。 AOOpenn BExxecuuteCCommmanndTyype DAcctivveCoonneectiion26.使用用ADOO对象模模型时，使使Reccorddsett和Coonneectiion对对象建立立连接的的属性是是（ ）。

10、 AOpeen BExeecutteCCommmanndTyype DActtiveeConnnecctioon 27在VVB中，一一旦数据据到达，将将首先触触发Wiinsoock控控件的（ ）。ADattaArrrivval事事件 BConnnecctioonReequeest事事件CDattaSeend事事件 DDGeetGeet事件件 28Wiinsoock控控件的LLocaalPoort属属性的作作用是（）A 仅返返回所用用断口 B仅设置置所用端端口C返回或或设置所所用端口口 D返返回或设设置IPP地址二、填空题题1每个应应用程序序必须有有一个惟惟一的文文件。2窗体文文件和类类模块文文

11、件的扩扩展名分分别是和和。3表达式式6 + 155 2 * 2 Modd 2的的值是。4表达式式172-223*5MODD6的值值是。5计时器器控件响响应的事事件是。 6在Viisuaal BBasiic中，变变量的默默认类型型是。7为了在在运行时时把当前前路径下下的图形形文件sshoww.jppg装入入图片框框P1，所所使用的的语句为为。8设某个个程序中中要用到到一个二二维数组组，要求求数组名名为A，类类型为整整型，第第一维下下标从00到2，第第二维下下标从11到3，则则相应数数组声明明语句为为。9用Diim AA(-22 too 3)语句声声明二维维数组后后，数组组A的元元素共有有个。10

12、. VVB中参参数传递递的机制制有两种种，一种种是参数数，另一一种是参数。11.控件件数组的的名字由由属性指指定，而而数组中中的每个个元素由由属性决决定。12若窗窗体的左左上角坐坐标为（-2000，2550），右右下角坐坐标为（3300，-1500），则则X轴的的正向向向，Y轴轴的正向向向。13窗体体、图片片框或图图像框中中的图形形通过对对象属性性。14在VVB中，将将Foxxproo称为外外部数据据库，AAcceess称称为，SQLL Seerveer称为为。15vbb应用程程序与数数据库进进行通信信的主要要机制称称为。16全局局变量必必须在模模块中定定义，所所使用的的关键字字为 。17全局

13、局变量是是指那些些在中有有效的变变量，一一般在模模块代码码编辑器器的顶部部使用声声明。18Wiinsoock控控件主要要用来编编制或协议的的网络应应用程序序。三、阅读程程序题（共共25分）阅读下列程程序并写写出程序序运行结结果1Privaate Subb Coommaand11_Cllickk() Dimm x As InttegeerStatiic ss Ass Inntegger x = Vaal(IInpuutBoox(请输入入一个正正整数=) If x 5 Theen ss = s * x Elsse ss = s + x Endd Iff TTextt1.TTextt = s= &

14、Sttr(ss)End SSub程序运行时时连续33次单击击Commmannd1，且且设输入入的数据据为6、55、4时时，分别别写出文文本框TTextt1的值值。2.Privaate Subb Foorm_Cliick() Staaticc a As Inttegeer Dimm b As Inttegeer a = a + 33 b = b + 44 Texxt1 = aa Texxt2 = bbEnd SSub写出程序运运行时连连续单击击三次窗窗体后，文文本框TTextt1和Texxt2显显示结果果。3.Privaate Subb Foorm_Cliick() DDim A(11 Too

15、3) Ass Sttrinng DDim c AAs IInteegerr, jj Ass Inntegger AA(1) = 2 A(22) = 44 AA(3) = 6 cc = 2 FFor j = 1 To 3 c = c + VVal(A(jj) NNextt j PPrinnt cc End Subb写出程序运运行时单单击窗体体后，FFormm1上的的输出结结果。4.Privaate Subb Foorm_Cliick() n = 0 Forr i = 11 Too 2 Forr j = 22 Too 4 IIf jj Mood 22 0 Theenn = nn + 1 EEnd

16、If nn = n + 2Next j Nexxt ii Priint nEnd SSub写出程序运运行时单单击窗体体后，窗窗体Foorm11上的输输出结果果。5.Privaate Subb Coommaand11_Cllickk() DDim a AAs IInteegerr, bb Ass Inntegger aa = 2: b = 3 FFor i = 1 To 3 FFor j = 1 To i b = b + jj NNextt j a = aa + b NNextt i PPrinnt aaEnd SSub写出程序运运行时单单击命令令按钮后后，窗体体Forrm1上上的输出出结果。6

17、.Privaate Subb Foorm_Cliick() Dimm A(1 TTo 44) AAs SStriing Dimm c As Inttegeer Dimm j As Inttegeer A(11) = 44 A(22) = 66 A(33) = 88 A(44) = 110 c = 1 Forr j = 11 Too 4 cc = c + Vaal(AA(j) Nexxt jj Priint cEnd SSub写写出程序序运行时时单击窗窗体后，窗窗体Foorm11上的结结果。7.Sub CChannge(ByVVal x AAs IInteegerr, BByVaal yy As

18、s Inntegger)Dim tt Ass Inntegger t = xx x = yy y = tt Prrintt x, yEnd SSubPrivaate Subb Foorm_Cliick() Dimm a As Inttegeer, b AAs IInteegerr a = 100: bb = 20Changge aa, bbPrintt a, bEnd SSub写出程序运运行时单单击窗体体后，FFormm1上的的输出结结果。8.Functtionn F(n AAs IInteegerr) AAs LLongg Diim ii Ass Inntegger, Teemp As Lo

19、nng Teemp = 11 Foor ii = 1 TTo nn Teemp = TTempp * i Neext i F = TTemppEnd FFuncctioonPrivaate Subb Foorm_Cliick() Dimm k As Inttegeer, nj As Inttegeer k = 5 nj = FF(k) Priint k; ！=; njjEnd SSub写出程序运运行时，单单击窗体体Forrm1上上的输出出结果。四、完善程程序题（共共10分分）1已知存存在一名名为“学生”的SQQL SServver数数据库，其其中的“stuudennts”数据表表用来存存储学生

20、生的基本本情况信信息，包包括学号号、姓名名、籍贯贯、性别别。请编编写一个个简单的的应用程程序，向向stuudennts表表中添加加学生记记录。程程序的基基本逻辑辑是：当当窗体被被加载时时，程序序联接SSQL Serrverr数据库库；当点点击“增加”按钮时时，首先先查询学学号是否否重复，如如果不重重复则向向stuudennts表表中添加加学生记记录。其其运行界界面如图图1所示示。图1程序如下，请请补充完完整。声明对象象变量AADOccn，用用于创建建与数据据库的连连接Privaate ADOOcn As ConnnecctioonPrivaate Subb Foorm_Loaad()连接SQQ

21、L SServver数数据库Dim sstrDDB AAs SStriingstrDBB = Prroviiderr=SQQLOLLEDBB;LSSF;UUserr IDD=saa;Paasswwordd=;DDataabasse = 11 If ADDOcnn Iss Noothiing Theen2 3 End IIfEnd SSubPrivaate Subb Coommaand11_Cllickk()增加学生生记录Dim sstrSSQL As StrringgDim AADOrrs AAs 4 5 =ADDOcnnADOrss.Oppen “Seelecct 学学号 FFromm St

22、tudeentss Whheree 学号号=”+” “+Texxt1+” “6 Theen MssgBoox “你输入的学号已存在，不能新增加！”Else StrrSQLL=”IInseert Intto sstuddentts (学号,姓名,籍贯, 性别别) StrSQQL=sstrSSQL+Valluess(”+” “+texxt1+” , “+texxt2+” , “+ttextt3+” , “+texxt4+” )”ADOrss.Exxecuute 7 MsgBoox “添加成功，请继续！”End IIfPrivaate Subb Coommaand22_Cllickk()Unloaad MMeEnd SSub2在窗体上建建立一个个驱动器器列表框框、目录录列表框框、文件件列表框框