VB程序设计试题与答案

1.要使一个标签能够显示所需要的文本，应设置该标签的( )属性的值(单) A.Caption B.Name C.Text D.AutoSize

2.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为( )(单)

A.5 B.300 C.500 D.5000

3.下列的( )对象支持KeyPress事件(单)

A.文本框 B.命令按钮 C.标签框 D.图像框 4.确定一个控件在窗体上的位置的属性是( )(单)

A.Width或Height B.Top和Height C.Top或Width D.Top和Left 5.确定一个窗体或控件的大小的属性是( )(单)

A.Width或Height B.Top和Width C.Top或Left D.Top和Left

6.用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，这称为( )(单)

A.面向对象的程序设计 B.结构化程序设计 C.事件驱动的编程机制 D.程序设计 7.在VB中，工程文件的扩展名是( )(单) A..frm B..vbp C..bas D..frx 8.在VB中，窗体文件的扩展名是( )(单) A..frm B..vbp C..bas D..frx 9.VB集成开发环境可以( 单)

A.编辑、调试、运行程序，但不能生成可执行程序 B.编辑、生成可执行程序、运行程序，但不能调试程序 C.编辑、调试、生成可执行程序，但不能运行程序 D.编辑、调试、运行程序，也能生成可执行程序 10.英文\的含义是( )(单)

A.可视化 B.集成 C.结构化 D.调试

11.标准模块文件的扩展名是( )(单) A.frm B.vbp C.bas D.vbg

12.VB集成开发环境中，在( )中编写代码(单)

A.状态栏 B.属性列表框 C.代码框 D.标题栏

13.在面向对象的程序设计过程中，英文缩写\的含义是( )(单)

A.事件驱动的编程机制 B.结构化程序设计语言 C.面向对象的程序设计 D.可视化程序设计

14.在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是( )(单)

A.Timer1.Interval=0.5 B.Timer1.Interval=5 C.Timer1.Interval=50 D.Timer1.Interval=500 15在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) a$=\Print String(3,a$) End Sub

程序运行后，单击命令按钮，在窗体上显示的内容是( )(单) A.VVV B.Vis C.sic D.11

1

16.以下关于多重窗体程序的叙述中，错误的是( )(单) A.用Hide方法不但可以隐藏窗体,且能清除内存中的窗体 B.在多重窗体程序中，各窗体的菜单是彼此独立的 C.在多重窗体程序中，可以根据需要指定启动窗体 D.对于多重窗体程序中，单独保存每个窗体 17以下合法的Visual Basic变量的名称是( )(单) A.a3 B.Const C.9abc D.a#x!

18.当一个复选框被选中时，它的Value属性的值是( )(单) A.3 B.2 C.1 D.0

19.表达式 5 Mod 3+5\\3的值是( )(单) A.0 B.3 C.4 D.6

20设x=4,y=8,z=7, 表达式：(x＜y) Or z＜x 的值是( )(单) A.1 B.-1 C.TRUE D.FALSE 21设有如下程序段： x=2

For c=1 To 4 Step 2 x=x+c Next c

运行以上程序后，x的值是( )(单) A.6 B.7 C.8 D.9

22执行如下两条语句，窗体上显示的是( )(单) A=9.8596

Print Format(a,\

A.0,009.86 B.9.86 C.009.86 D.0,009.86

23下列说法中正确的是：为了保存一个Visual Basic应用程序，应当( )(单) A.只保存窗体模块文件(.frm) B.只保存工程文件(.vbp)

C.分别保存工程文件和标准模块文件(.bas)

D.分别保存工程文件、窗体文件和标准模块文件

24.要使一个文本框对象能够显示多行文字，应设置该对象的( )属性值为True(单) A.Text B.MultiLine C.Style D.Visible

25.若要将窗体从内存中卸载，其实现的方法或语句是( )(单) A.Show B.Unload C.Load D.Hide

26.以下选项中，不是VB标准控件的是( )(单) A.命令按钮 B.定时器 C.通用对话框 D.单选框

27在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim a As Variant

a = Array(1, 2, 3, 4, 5) Sum = 0

For i = 1 To 5

Sum = Sum + a(i - 1)

Print \Next i

x = Sum / 5

2

For i = 1 To 5

If a(i - 1) > x Then Print a(i - 1); x Next i

End Sub程序运行后，单击命令按钮，在窗体上显示的内容是( )(单) A.1 2 B.1 2 3 C.3 4 5 D.4 5

28以下Case语句中错误的是( )(单)

A.Case 0 To 10 B.Case Is＞10 C.Case Is＞10 And Is＜50 D.Case 3,5,Is＞10 29执行语句s=Len(Mid(\后，s的值是( )(单) A.Visual B.Basic C.6 D.11

30以下关于变量作用域的叙述中，正确的是( )(单) A.用dim定义变量是静态变量 B.静态变量必须在标准模块中声明 C.用public定义变量是全局变量

D.Static类型变量的作用域范围是它所在的窗体或模块文件

31以下关系表达式中，其值为False的是( )(单)

A.\＞\B.\＜＞\D.\＞\32.语句Print int(5/4*6\\5) Mod 2的输出结果是( )(单) A.0 B.1 C.2 D.3

33在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： Private Sub Command1_Click( ) strText = InputBox(\请输入\Text1.Text = strText End Sub

Private Sub Text1_Change( )

Label1.Caption = Right(Trim(Text1.Text), 3) End Sub

程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是( )(单) A.空 B.abcdef C.abc D.def

34在窗体上画一个名称为Text1的文本框，编写以下代码： Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii ＜ 65 Or KeyAscii＞ 90 Then msgBox \请输入大写字母\KeyAscii = 0 End If End Sub

以下能说明该事件过程正确是( )(单)

A.要求文本框只能接收大写字母的输入 B.要求文本框只能接收小写字母的输入

C.要求文本框只能接收数字的输入 D.要求文本框只能接收65到90之间的数值的输入 35在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c = \

3

For i = 1 To 4 c1 = Trim(Str( )) Print c1 Next i End Sub

程序运行后，单击命令按钮，要求在窗体上显示如下内容 1 12 123 1234

则在下划线处应填入的内容为( )(单)

A.Right(c1,i) B.Left(c1,i) C.Mid(c1,i,1) D.Mid(c1,i,i) 36在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换。

Private Sub Option1_Click(Index As Integer) Select Case index Case 0 a = \宋体\Case 1 a = \黑体\Case 2

a = \楷体＿GB2312\End Select text1.【 】=a End Sub

37在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序： Private Sub Text1_LostFocus( ) If Not IsNumeric(Text1) Then

MsgBox \帐号有非数字字符错误\Text1.Text = \Text1.SetFocus else

MsgBox \帐号正确\End If End Sub

当在text1文本框中输入字符\之后，单击命令按钮，结果为( )(单) A.显示对话框，提示信息为\帐号正确\

B.显示对话框，提示信息为\帐号有非数字字符错误\C.程序出错 D.没有任何提示

38.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序： Private Sub Text1_LostFocus( )

4

If Not IsNumeric(Text1) Then

MsgBox \帐号有非数字字符错误\Text1.Text = \Text1.SetFocus else

MsgBox \帐号正确\End If End Sub

当在text1文本框中输入数字123456之后，单击命令按钮，结果为( )(单) A.显示对话框，提示信息为\帐号正确\

B.显示对话框，提示信息为\帐号有非数字字符错误\C.程序出错 D.没有任何提示

39.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序： Private Sub Command1_Click( ) Dim I As Integer

If Text1.Text ＜＞ \

I = MsgBox(\密码错误\输入密码\If I ＜＞ 4 Then End Else

Text1.Text = \Text1.SetFocus End If Else

MsgBox \密码帐号正确！\End If End Sub

若在text1中输入字符串\，则程序运行结果为( )(单)

A.显示对话框，提示\密码帐号正确！\ B.显示对话框，提示\密码错误\C.程序出错 D.没有任何提示

40.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码： Private Sub Command1_Click( ) Dim x!, y!, z!, t! x = Text1 y = Text2 z = Text3

If x ＜ y Then t = x x = y y = t End If

If y ＜ z Then

5

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VB程序设计试题与答案在线全文阅读。