VB程序设计试题及答案一

1、VB程序设计试题及答案IMB standardization office IMB 5AB-IMBK 0& IMB 2C-、单选题是种面向B的编程环境。(A) 机器对象(C)过程(D)应用2. 耍使Forml窗体的标题栏显示"欢迎使用VB",以下D语句是正确的。(A) 才欢迎使用VB，?(B) i欢迎使用VB1(C) 二欢迎使用VB(D) J欢迎使用VB'13. 若要使命令按钮不可操作，要对A属性进行设置。(A) Enabled(B)Visible(C)Backcolor(D)Captio n4. 如果在窗体上已经创建了 个文本框对象Texth可以通过C事件

2、获得输入键值的ASCII码。(A) Change(B)LostFocus(C)KeyPress(D)GotFocus5. 下面A是合法的变量名。(A) X_yz(B)123abo (C)integer(D)X-Y6. 以下关系衣达式中，其值为False的是A。(A) ,ABC,>,AbC,l(B),女“丁男(C)”BASIC 性 UCase(“basic)(D)”123y'23“7. 为了给x、y、z三个变量賦初值1,下面正确的赋值语句是A。(A) x=l:y=l:z=l(B)x=l/y=l/z=l(C)x=y=z=l(D)xyz=l捉供了结构化程序设计的三种基本结构，三种基本结

3、构是D。(A) 递归结构、选择结构、循环结构(B) 选择结构、过程结构、顺序结构(C) 过程结构、输入输出结构、转向结构(D) 选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是D.(A) lfsex=M 男"Andage=40AndlnStr(duty» ”教授")>OThenn=n+l(B) Ifsex 二”男,Andage=40And(duty="教授 l,Orduty=H 副教授")Thenn=n+l(C) lfsex="男,Andage=40And

4、Right(duty» 2)="教授"Thenn=n+I(D) lfsex="男,An dage=40Andduty="教授,Andduty=,'副教授"Thenn=n+I10. 下列关于Do.Loop循环结构执行循环次数的描述正确的是D.(A)DoWhile.Loop循环和DoLoopUntil循环至少都执行次DoWhile.Loop循环和Do.LoopUntil循环可能都不执行(C) DoWhileLoop循环至少执行次和DoLoopUntil循环可能不执行(D) DoWhileLoop循环可能不执行和Do.LoopUnt

5、il循环至少执行次11 以下B是正确的For.Next结构。(A)Forx=lToSteplO(B)Forx=3To-3Step-3NextxNextx(C)Forx=lTol0(D)Forx=3tol0step3re:NextxNextylfi=10ThenGoTOre12. 如下数组声明语句，B是正确的。(AjDimalSjAsInteger(B) Dima(3z4)Aslnteger(C) Dima(n,n)AslntegGr(D) Dima(34)Aslnteger13. 下列语句中(假定变虽n有值)，能正确声明可变长数组的是A。(A)Dima()Asl nteger(B)Dima()

6、AslntegerReDima(n)ReDima(n)AsString(C)Dima()Aslnteger(D)Dima(10)AslntegerReDima(3,4)ReDima(n+10)ReDimPreservea (4,4)14. 妥想从/过程调用后返回两个结果，下面了过程语句说明合法的是6(A)Subf2(ByVal n%/ByValm%)(B)Subfl(n%/ByValm%)(C)Subfl(n%/m%)(D)Subfl(ByValn%/m%)15. 设有如下程序段：PublicSubFl(n%)n=3*n+4EndSubPrivateSubCommandl_Click()Dim

7、n%zm%n=3m=4'调用Fl语句EndSub则在Commandl_Click事件中有效的调用语句是Bo(A)CallFl(n+m)(B)CallFl(m)(C)CallFl(5)(D)CallFl(m+5)16. 用来设置粗体字的属性是C。(A)Fontltalic(B)FontName(C)FontBold(D)FontSize17. 假定定时器的Interval属性为1000, Enabled属性为True,调用下而的事件过程，程序运行结束后变量x的值为DoDimxAsI ntegerSubTimerlTimerOFori=ltolOx=x+lNextiEndSub(A)100

8、0(B)10000(C)10(D)以上都不对在下列关于通用对话框的叙述中，错误的是B。(A)显示“字体"对话框在“打开"或为存为"对话框中，用户选择的文件名可以经FileTitle属性返回(C) 在“打开”或“另存为”对话框中，用户选择的文件名机器路径可以经FileName属性返回(D)19当用户按下并且释放个键后会触发Keypress. KeyUp fll KeyDown事件，这三个事件发生的顺序是6(A) KeyPressKeyDown、KeyUp(B) KeyDown、KeyUp、KeyPress(C) KeyDown、KeyPressx KeyUp(D)

9、没有规律20. 在下面关于顺序文件的描述中，正确的是Co(A) 顺序文件中每行的长度都是相同的。(B) 可以通过编程对文件中的某行方便地进行修改(C) 数据以ASCII码的形式存放在文件中，所以可通过记事本打开(D) 文件的组织结构复杂21. 随机文件是因为C。(A) 文件中的内容是通过随机数产生的(B) 文件中的记录号通过随机数产生的(C) 可对文件中的记录根据记录号随机地读/写(D) 文件的每条记录的长度是随机的22. 从磯盘上读入个文件名为“c:“顺序文件，如下A正确。(A)F=“c:"Open FForlnputAs#l F=kcVOpen'FForlnputAs#?

10、(C) Open4<c：VTorlnputAs #1(D) Openc:#223. 坐标度量单位可由通过来D改变。(A)Drawstyle 屈性(B)DrawWidth 属性(C)Scale 方法(D)ScaleMode 属性24. 指令“Circle(1000,：L000),500,8,-6,-3”将绘制 A。(A)画圆枷圆(C)圆弧(D)扇形25. 用ADO数据控件建立与数据源的链接，设置操作过程按A顺序进行。选择数据源连接方式：选择数据库类型：指定数据库文件名：指定记录源(A)噩(C)(D)二、填空题1. VB是建立在BASIC语言基础上的可见化编程语言或编程环境。2. 在窗体上已

11、建立多个控件如Text、Labella Commandl,若要程序运行时焦点就定位在Commandl控件 上，应对Commandl控件设置Tabindex属性的值为0。3. 在VB中，1234、123456&、+5、+5这4个常数分别衣示整形、长整形、单精度、双精度类型。4. 衣示x是5的倍数或是9的倍数的逻辑衣达式为xmod5=0orxmod9=05. 数组声明时下标下界默认为0,利用OpationBasel语句可以使下标为1。6. 传地址方式是当过程彼调用时，形参和实参共孚存储单元。7. 窗体中的模块级变量应在窗口模块段声明，它作用于该窗体的全局范围。&当用户单击滚动条的空

12、白处时，滑块移动的增量值由LargeChange属性决定。9.如果菜单标题的某个字母前输入个符号，那么该字母就成了热键字母；如果建立菜单时在标题文本 框中输入个减号)“符号，那么显示时形成-个分隔符。10使用Scale方法可以自定义坐标系。11. 使用Line方法画矩形，不许在指令中使用关键字B。12使用SQL语句设置ADO控件的Recordsource属性，这CommandType属性需要设置成l(adCmdText)或者(adCmdUnknown)o13. 为了显示个窗体，所使用的方法为show；而为了隐藏个窗体，所使用的方法为_Hideo14. 如果要将某个命令按钮不显示，则可将Visi

13、ble属性设置为False15. 在VB中窗体文件的扩展名为。三、编程应用题1. 程序阅读，写出下列程序的运行结果。PrivateSubCommandl_Click()Dima/i%/min%/imin%/sum%/t%a 二 Array(26,43,61,87,33,19,37,59,76,69)min=a(O):imin=O:sum=a(O)Fori=ltoUBound(a)sum=sum+a(i)lfa(i)<mi nThe nmin 二 a(i):imi n二iNextit=a(O):a(O)=a(imin):a(imin)=tPrintsum;a(O)EndSub输出结果：51

14、019(2)PrivateSubCommandl_Click()DimchasStri ngTch= M 8 ,rlfUCase(ch)>= M A ” AndUCase<= n Z ” Then;”是字母字符"Elselfch>= M 0 ” Andch<= M 9 H Then;”是数字字符“Else;"是其他字符"EndlfEndSub输出结果：是数字字符PublicSubProc(a%()Static!%Doa(i)=a(i)+a(i+l)i=i+lLoopWhilei<2EndSubPrivateSubCommandl_Cl

15、ick()Dimm%/n%/x%(10)Fori=0to4:x(i)=i+l:NextiFori=lto2:CallProc(x):NextiFori=0to4:Print x(i);:NextiEndSub输岀结果：357452. 补充程序(1) 如下是账号和密码输入的检验程序，运行界而如下图1所示。输入帐号和密码后，单击“检验密码"按钮，如 果密码正确则程序结束，假定密码为“S001"：如果密码不正确，则弹出如下图2所示对话框，单击“取消''则程 序结束，单击''重试”则返回图1窗体，且密码文本框Text2内容波淸空，等待再次输入。补充完整如下程序。 图调2PrivateSubCommandl_Click()DimiAsI ntegerosOOlTheni=MsgBox("密码错误笃 5+vbExclamationJ 警告”)lfi<>4The nEndElseEnd