1、VB笔试模拟试卷 190及答案与解析 1 启动 Visual Basic后，就意味着要建立一个新 ( )。 （ A）窗体 （ B）程序 （ C）工程 （ D）文件 2 Visual Basic集成环境的大部分窗口都可以从主菜单项 ( )的下拉菜单中找到相应的打开命令。 （ A）编辑 （ B）视图 （ C）格式 （ D）调式 3 下列程序段的执行结果为 ( )。 x=1:y=2 z=x=y Print x； y； z （ A） 1 1 2 （ B） 1 1 1 （ C） False False （ D） 1 2 False 4 货币型数据需 ( )字节内存容量。 （ A） 2 （ B） 4 （
2、C） 6 （ D） 8 5 有关 VB应用程序中过程的说法正确的是 ( )。 （ A）过程的定义可以嵌套，但过程的调用不能嵌套 （ B）过程的定义不可以嵌套，但过程的调用可以嵌套 （ C）过程的定义和调用都可能嵌套 （ D）过程的定义和调用都不能嵌套 6 下列程序段的执行结果为 ( )。 a=0:b=1 Do a=a+b b=b+1 Loop Whilea10 Print a； b （ A） 105 （ B） ab （ C） 01 （ D） 1030 7 表达式 12000+“129“X+Z*K;“)“ （ A） A(17) （ B） A(17.4) （ C） A(18) （ D） A(2.4
3、+3*5) 36 窗体布局窗口的主要用途是上 _。 37 在代码窗口对窗体的 BorderStyle、 MaxButton属性进行了设置，但运行后没有效果的原因是这些属性 _。 38 通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为_。 39 为了选择多个控件，可以按住上 _键，然后单击每个控件。 40 在 Visual Basic中，除了可以指定某个窗体作为启动对象外，还可以指定_为启动对象。 41 要想在文本框中显示垂直滚动条，必须把 Scrolebars属性设置为 2，同时还应把_属性设置为了 True。 42 为了使计时器控件 Timer1每隔 0.5秒触发一次 Time
4、r事件，应将 Timer1控件的_属性设置为 500. 43 在窗体上画一个名称为 Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为 Option1.程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。Private Sub Optionl_click(Index AS Integer) Select Case Index Case0 a=“宋体 ” Case 1 a=“黑体 ” Case2 44 若 A=20， B=80， C=70， D=30，则表达式 A+B 160 Or(B*C 200And Not D60)
5、的值是 _。 45 Private Sub Form_Activate() Forj=1 to 3 x=3 ForI=1 to 2 x=x+6 NextI Nextj Print x End Sub 程序运行后，窗体上显示的结果为上 _。 46 以下程序用来计算由键盘输入的 N个数中正数之和，负数之和，正数的个 数，负数的个数。其中用 C累加负数之和， IC累加负数的个数， D累加正数之和， ID累加正数的个数。 Privae Sub Commandl_Click N=10 C=0:IC=0:D=0:ID=0 For =1 To N A=Val(1nputBox(“请输入 A”) IFA 0
6、Then C=C+A： IC=IC+1 lf A O Then D= Next K Print“负数的个数为： “, 47 下列程序是将数组 a的元素倒序交换，即第 1个变为最后一个 ，第 2个变为倒数第 2个，完成下列程序。 Private Sub Backward(a() Dim i As Integer,Tmp As Integer Fori=1 To5 Tmp=a(i) a(5-i)=Tmp Nexti End Sub 48 在程序的空白处填写适当的语句 (一个空白处只能填写一条语句 )，使程序完成相应的数据处理。 Form_Load事件过程给数组赋初值 35， 48， 15， 22，
7、 67。Form_Click事件过程对数组元素进行处理。 DimA rr(1 To 5) Private Sub Form_Load() 11 End Sub Private Form_Click() 12 If Int(x/3)=x/3 Then PrintX End If Next VB笔试模拟试卷 190答案与解析 1 【正确答案】 C 2 【正确答案】 B 3 【正确答案】 D 4 【正确答案】 D 5 【正确答案】 B 6 【正确答案】 A 7 【正确 答案】 B 8 【正确答案】 A 9 【正确答案】 A 10 【正确答案】 D 11 【正确答案】 A 12 【正确答案】 B 13
8、 【正确答案】 B 14 【正确答案】 D 15 【正确答案】 B 16 【正确答案】 C 17 【正确答案】 D 18 【正确答案】 A 19 【正确答案】 C 20 【正确答案】 A 21 【正确答案】 C 22 【正确答案】 C 23 【正确答案】 B 24 【正确答案】 B 25 【正确答案】 B 26 【正确答案】 C 27 【正确答案】 B 28 【正确答案】 C 29 【正确答案】 C 30 【正确答案】 C 31 【正确答案】 C 32 【正确答案】 D 33 【正确答案】 A 34 【正确答案】 D 35 【正确答案】 B 36 【正确答案】 调整程序运行时窗体显示的位置 37 【正确答案】 在运行时设计是无效的 38 【正确答案】 软件生命周期 39 【正确答案】 Shift或 Ctrl 40 【正确答案】 Main子过程 41 【正确答案】 MulUline 42 【正确答案】 Intewal 43 【正确答案】 Font或 Font Name或 Font.Name 44 【正确答案】 True 45 【正确答案】 15 46 【正确答案】 D+A:ID=ID+1 47 【正确答案】 a(i)=a(5i) 48 【正确答案】 Arr=Anay(35,48,15,22,67),For Each x In Arr
