VB期末考试题(第1套)

1下列语句都是在Form中定义，__C____是错的。

A.Public a3 As Integer

B.Private Const A2 = 8

C.Public Const A1 = 2u

D.Private a4 As Integer

2 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

Private Sub Command1_Click()

For i = 1 To 4

If i = 1 Then x = i

If i <= 4 Then x = x + 1

Print x;

Next i

End Sub

程序运行后，单击命令按钮，其输出结果为：___A___。

A. 2 3 4 5

B. 1 2 3 4

C. 2 3 4 4

D. 3 4 5 6

3如果要在菜单中添加一个分隔线，则应将其Caption属性设置为__A____。

A.–

B.*

C.&

D.＝

4下列程序段的执行结果为___B___。

A = 0:

B = 1

Do

A = A + B

B = B + 1

Loop While A < 10

Print A; B

A. A B

B.10 5

C.0 1

D.10 30

5设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是___A___。

A.menu1.Visible=False

B.menu1.Enabled=False

C.menu1.Visible=True

D.menu1.Enabled=True

6. 以下叙述中正确的是___C___。

A.可以在运行期间改变窗体的Name属性的值

B. 窗体的Name属性值是显示在窗体标题栏中的文本

C. 窗体的Name属性指定窗体的名称，用来标识一个窗体

D. 窗体的Name属性值可以为空

7. 下列不能打开菜单编辑器的操作是__A____。

A. 按Shift+Alt+M

B. 单击工具栏中的"菜单编辑器"按钮

C. 执行"工具"菜单中的"菜单编辑器"命令

D. 按Ctrl+E

8. 在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。

设有如下的类型和变量声明：

Private Type Person

name As String*8

major As String*20

End Type

Dim p As Person

设文本框中的数据已正确地赋值给Person类型的变量p，当单击"保存"按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是__A___。

A. Open "c:\Test2.dat" For Random As #1 Len = Len(p)

Put #1,1,p

Close #1

B. Open "c:\Test2.dat" For Output As #1

Put #1,1,p

Close #1

C. Open "c:\Test2.dat" For Random As #1 Len = Len(p)

Get #1,1,p

Close #1

D. Open "c:\Test2.dat" For Random As #1

Get #1,1,p

Close #1

9. 以下关于图片框控件的说法中，错误的是__B____。

A. 可以通过Print方法在图片框中输出文本

B. 用Stretch属性可以自动调整图片框中图形的大小

C. 图片框控件可以作为容器使用

D. 清空图片框控件中图形的方法之一是加载一个空图形

10.在窗体上画一个文本框（其名称为Text1）和一个标签（其名称为Label1）。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述

操作的事件过程是：__A____。

A. Private Sub Text1_Change()

Label1.Caption = Text1.Text

End Sub

B. Private Sub Label1_Change()

Label1.Caption = Text1.Text

End Sub

C. Private Sub Text1_Click()

Label1.Caption = Text1.Text

End Sub

D. Private Sub Label1_Click()

Label1.Caption = Text1.Text

End Sub

11.以下语句用于打开一个顺序文件Open "C:\MyFile.txt" For OutPut 但该语句的一个重要错误是没有__B____。

A. 指定打开文件名

B. 指定文件号

C. 指定打开方式

D. 指定文件类型

12. 在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：

Private X As Integer

Private Sub Command1＿Click()

X=5:Y=3

Call proc(X,Y)

Label1.Caption=X

Label2.Caption=Y

End Sub

Private Sub proc(ByVal a AS Integer,ByVal b As Integer)

X=a*a

Y=b+b

End Sub

程序运行后，单击命令按钮，则两个标签中显示的内容分别是__A____。

A.25和3

B.5和3

C.25和6

D.5和6

13.要利用通用对话框控件来显示“保存文件”对话框，需要调用控件的__C____方法。

A. ShowColor

B. ShowOpen

C. ShowSave

D. ShowPrinter