试题B 西南财经大学天府学院VB复习资料试题B及答案

密 2009-2010-1学期

西南财经大学天府学院试卷(A卷)

考试科目：VB与动态网页设计_本

年级 层次

教学班 姓名： 学号：

试题号 一 二 三 四 五 六 总分 记 分 考分 表 阅卷人 注意： 1、本次考试为闭卷考试，考试时间120分钟。 2、请将答案依次写在专用答题纸上。

3、全卷共两部分，满分为100分。

一、单项选择题（共40题，每题1分，共计40分）

1、Visual Basic 是一种面向对象的程序设计语言，构成对象的3要素是（ B ）。

A、属性、控件和方法 B、属性、事件和方法 C、窗体、控件和过程 D、控件、过程和模块 2、不能打开“代码编辑器”窗口的操作是（ B ）。

A、双击窗体设计器的任何地方 B、按下F4键

C、单击“工程”窗口中的“查看代码”按钮 D、选择“视图”下拉菜单中的“代码窗口”命令 3、下列程序代码中说法正确的是（ B ）。

Text1.Left = 400 Text1.Top = 1000

A、Text1对象左边界距窗体的左边界400twip，上边界距屏幕的上边界1000twip B、Text1对象左边界距窗体的左边界400twip，上边界距窗体的上边界1000twip C、Text1对象的高度为400twip，宽度为1000twip D、Text1对象的高度为400点，宽度为1000点

4、设置窗体最小化时的图标可通过（ D ）属性来实现。

A、Image B、Picture C、MouseIcon D、Icon

5、如果要实现当鼠标暂时停留在一文本框上时，显示提示信息，应设置此文本框的（ B ）属性。

A、Text B、ToolTipText C、Caption D、HelpContextId

6、当运行程序时，系统自动执行启动窗体的某个事件过程。这个事件过程是（ C ）。

A、Click B、Load C、GotFocus D、UnLoad

7、当文本框的MaxLength属性值取（ C ）时，该文本框能容纳的字符数最多。

A、512 B、256 C、0 D、-1

8、若使用Textbox控件时，为对用户输入的内容立即进行检查，就对Textbox控件的（ A ）事件编程。

A、Change B、Interval C、Left D、Top 9、所有控件都具备的属性是（ B ）。

A、Text B、Name C、ForeColor D、Caption 10、在VB中，下面4个数作为常量有语法错误的是（ B ）。

第 1 页 共 11 页

A、2.56D4 B、2E1.4 C、1234！ D、1.8E-5 11、下面的变量名合法的是（ A ）。

A、k_name B、k name C、name D、k-name 12、表达式\的值是（ C ）。

A、123400 B、523 C、\ D、123100300 13、VB6.0中执行下面的4个语句时出现错误的是（ C ）。

A、 x = Cos(0) B、x = Sqr(4) C、 x = Exp(800) D、x = Sin(0) 14、设有如下声明：

Dim x As Integer

如果Sgn(x)的值为-1，则x的值是（ D ）。

A、整数 B、大于0的整数 C、等于0的整数 D、小于0的数 15、以下说法中不正确的是（ B ）。

A、使用ReDim语句可以改变数组的维数 B、使用ReDim语句可以改变数组的类型

C、使用ReDim语句可以改变数组的每一维的大小

D、使用ReDim语句可以对数组中的所有元素重新进行初始化

16、在VB中声明了Variant变量，但未赋值，则系统默认其初始化值为（ C ）。

A、Null B、0 C、Empty D、False

17、确定字符串str2在字符串str1中起始位置的函数是（ D ）。

A、Left B、Mid C、String D、Instr 18、表达式# 7/10/2009 + 5 的运算结果是（ A ）。

A、2009-7-15 B、2009-12-10 C、2014-7-10 D、无法运算

19、m、n是整数，且n > m，在下面4个语句中，能将x赋值为一个[m,n]之间（包含m,n）的任意

整数的是（ D ）。

A、x = Int(Rnd * (n-m)) + m B、x = Int(Rnd * n) + m C、x = Int(Rnd * m) + m D、x = Int(Rnd * (n-m+1)) + m 20、运行下面的程序后，单击命令按钮，则在窗体上输出（ B ）。

Private Sub Command1_Click( )

Print Format( 1234.567，\End Sub

A、123456.7 B、123456.7% C、1234.57% D、123456.70% 21、执行下列程序，单击命令按钮后在窗体上输出结果是（ C ）。

Private Sub Command1_Click( ) Dim A As Integer A% = 456

A = 232.45 B = 235

Print A，A%

End Sub

第 2 页 共 11 页

A、456 232.45 B、232.45 232.45 C、232 232 D、显示出错信息 22、执行以下程序段

a$ = “abbacddcba”

For i = 6 To 2 Step -2 X = Mid(a,i,i) Y = Left(a,i) Z = Right(a,i)

Z = UCase(X & Y & Z) Next i Print Z

输出结果为（ ）。

A、ABA B、BBABBA C、ABBABA D、AABAAB 23、如下程序：

Private Sub Command1_Click( ) x1 = InputBox(\请输入\ Print x1 + 111; x1 + \End Sub

运行程序，单击命令按钮并输入111，则在窗体上输出结果是（ B ）。 A、111111 222 B、222 111111 C、111111 111111 D、显示出错信息 24、下列关于MsgBox函数的说法中，正确的是（ B ）。

A、MsgBox函数的第二个参数是Prompt，表示在对话框中要显示用户的信息

B、MsgBox函数的第三个参数是Title，表示对话框的标题显示在对话框窗口顶部的标题栏区 C、MsgBox函数的必须有Title参数

D、MsgBox函数的可以不要Prompt参数 25、对象.print方法对（ B ）控件有效。

A、窗体、图像框 B、窗体、图片框 C、屏幕、窗体 D、图像框、图片框

26、若想使时钟控制每隔0.15秒触发一次Timer( )事件，则可将Interval属性值设为（ C ）。

A、0.15 B、15 C、150 D、1500

27、（ A ）组中的所有控件，可以在用户界面上作为其他控件的容器。

A、窗体、图形框、框架 B、窗体、图形框、组合框 C、窗体、图形框、文本框 D、窗体、文本框、命令按钮 28、在窗体上画一个名称为Check1的复选框，在程序运行的过程中，若选中复选框，则Check1.Value的值是（ C ）。

A、True B、0

C、1 D、2

29、在窗体上有一条直线，将窗体分成两部分。直线上方有2个单选按钮，直线下方有3个单选按

钮，则程序运行时可以同时选中（ A ）个单选按钮。 A、1 B、2

C、3 D、4 30、引用列表框List1最后一个数据项应使用（ C ）。

A、List1.List(ListCount) B、List1.List(ListCount - 1) C、List1.List(List1.ListCount - 1) D、List1.List(List1.ListCount) 31、窗体的MouseDown事件过程

第 3 页 共 11 页

Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single ) 有4个参数，关于这些参数，正确的描述是（ B ）。 A、Shift参数只能用来确定是否按下Shift键

B、通过Button参数判定当前按下的是哪一个鼠标键 C、Shift参数只能用来确定是否按下Alt和Ctrl键 D、参数X、Y用来设置鼠标当前位置的坐标

32、在一个列表框List1中已按序放入ONE、TWO、THREE、FOUR、FIVE、SIX 6个字符串数据

项，执行下面的程序后： Private Sub Form_Click( ) For i = 1 To 3

List1.RemoveItem i Next i End Sub

列表中的数据项是（ ）。

A、ONE、FIVE、SIX

B、TWO、FOUR、SIX

C、FOUR、FIVE、SIX

D、ONE、THREE、FIVE 33、假定有以下循环结构

Do Until 条件 循环体 Loop

则正确的描述是（ B ）。

A、如果“条件”是一个为0的常数，则一次循环体也不执行 B、如果“条件”是一个为0的常数，则无限次执行循环体 C、如果“条件”是一个不为0的常数，则至少执行一次循环体 D、不论条件是否为真，至少要执行一次循环体 34、如下程序：

Private Sub Form_Click( ) c = 4

x = Val(InputBox(\请输入一个数\ While x <> -999

If x > c Then c = x

x = Val(InputBox(\请输入一个数\Wend

Print c; Abs(x)

End Sub

运行后，单击窗体并输入9，8，2，-999，输出的结果是（ D ）。 A、9 2 B、9 8 C、2 999 D、9 999 35、执行下面的程序后，x的值为（ C ）。

x ＝ 50

For i = 1 To 20 Step 2 x = x + i \\ 5 Next i

A、68 B、69 C、66 D、16

36、在窗体上画两个名称分别是Text1、Text2的文本框和一个名称为Command1的命令按钮，然后

编写如下事件过程：

第 4 页 共 11 页