东北大学21春学期《可视化程序设计（VB）》在线平时作业2

奥鹏在线作业

21春学期《可视化程序设计（VB）》在线平时作业2
试卷总分:100  得分:100
一、单选题 (共 15 道试题,共 75 分)
1 v# h  k) _  g1.在用通用对话框控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即 .txt文件)，则正确的描述格式是（）。
" z+ p8 S2 ]& v5 a# k' `; W' z$ xA.“text (.txt)|(*.txt)”
B.“文本文件( .txt) | (.txt)”
C.“text(.txt)||(*.txt)”
0 e; W0 t* |+ p6 e5 oD.“text(.txt)(*.txt)”
资料:A
( Z+ J. W6 a2 U' B) y
0 N( R( \/ a1 N: k7 r5 O2.为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。
A.Value
B.Default
C.Cancel
' P* b  W3 O0 z/ ~D.Enabled
# h# b; |2 `! {7 n资料:C

: K7 W# l. E3 b. M" l$ R3.下列Visual Basic程序段运行后，变量s、t的值为（）。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k
0 [* n/ |# @6 D$ Z: n. OA.2 2
. {! B- A/ ^- E1 T' k6 I6 BB.9 24
C.5 6
D.0 1
资料:B

& c& v- m1 h: c7 b4.窗体能够响应的事件是（ ）。
A.ActiveForm
B.Drive
! R" X0 o6 j# T+ O& z1 ]# bC.Load
D.Change
资料:C
5 e% P1 |: D9 g; \9 M
5.正确定义实型变量的是（ ）。
: T7 v: l7 t; S" JA.Dim I As Integer
B.Dim Sum As Single
9 @# c% I" X; q0 i9 B2 g7 ]C.Dim Name As String
D."wjm="信息技术"
! h/ ?- r6 Q8 t  Y; y5 q) w7 @资料:
. s/ }) _  e: ~( E# i7 M" a/ L' S/ |
6.设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是（）
0 [2 K: i; \6 F: I* T( C- [A.menu1.Enabled=True
B.Munu1.Enabled=False
C.Menu1.Visible=True
6 m: O* ~! L+ J* w, {& iD.Menu1.Visible=False
3 @1 D4 l! ~1 o: o: q/ O. `资料:
# b- X8 O3 o. b* V# o( H
7.在窗体上有一个文本框控件，名称为TxtTime：一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序如下： Private Sub Timer1_ () TxtTime.text=Time End Sub在下划线上应填入的内容是（）。
A.Enabled
+ G% p- [/ X4 V; {5 i# E( T( z4 K6 mB.Visible
C.Interval
D.Timer
资料:
3 K. f( R$ @" L6 x2 _1 _- ^
8.假定X是数值型变量，由函数组成的表达式INT(X/2)=X/2的作用是（ ）。
; p; Y+ G) O4 ^! i0 |A.用于测试X是否偶数
B.返回一个整数
" Q4 f% W0 Q  ?C.返回一个奇数
! s( W% a! P( n/ rD.用于测试X是否整数
资料:
2 Q1 @' n. C2 A3 B7 B
3 J$ F+ D4 H$ R8 H' T9.设有语句：x=InputBox(“输入数值”，“0”，“示例”)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（）。
# j9 `* K5 h. g& gA.变量X的值是数值10
B.在InputBox对话框标题栏中显示的是“示例”
C.0是默认值
0 v( L! q2 J: X( g" uD.变量X的值是字符串“10”
2 q( h! T$ ~' J- T资料:
" r4 o3 ^3 O* i: O3 @0 O& z/ {4 O
; t: H: J! O- o5 p4 p' o10.在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click() CommonDialog1.FileName ="" CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDial
A.该对话框被设置为“打开”对话框
' ?5 e7 }- |2 h! FB.在该对话框中指定的默认文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
" H$ X! r, e0 J1 D9 P5 L1 v资料:

11.下面程序段运行后，变量x的值为( )。 x=3 y=77 Do x=x+2 Loop Until x>Sqr(y)
A.7
1 m; ]8 A0 ?3 T" ]  l: Q$ F  G+ f6 HB.8
C.9
( W  V& |7 L4 s5 e; H' M$ G6 iD.10
资料:

! m3 x9 `  k3 ?; d. \12.单击命令按钮Command1必将调用已写在（ ）事件中的代码。
A.LostFocus
- |  c% n1 @0 }' u6 n) @1 VB.KeyPress
; P; }+ M; j6 c* SC.Dbclick
0 t3 D  Q6 b) `7 mD.Click
资料:

: R, m* t9 U3 [% ~. j% S0 i# s13.设a=“Visual Basic”，下面使b=“Basic”的语句是（）。
A.b=Left(a,8,12)
B."b=Mid(a,8,5)"
% c, k* F& p; Z) c/ A, h, NC."b=Rigth(a,5,5)"
! H  U' {2 H. I; v) l# b5 _0 M6 b9 q, QD."b=Left(a,8,5)"
, c  ]& c! j9 {8 v- J( B3 X7 C$ h8 j资料:
; O. h+ R1 F4 y+ J5 O
( @- K* C+ A, n8 U' E$ K, g/ ?14.以下不能在"工程资源管理器"窗口中列出的文件类型是( )。
* n* z' C* Q: H2 q4 g; D# jA..bas
B..res
C..frm
D..ocx
资料:
' \7 B( k: g8 J, t
15.设x=4,y=8,z=7，表达式x<y And (Not y>z) Or z<x的值是（）。
A.1
B.-1
$ T4 J" J; j* p: Z; BC.TRUE
  E! n) K( t$ wD.FALSE
3 s; S( C+ _- v, _2 Y& l资料:

二、资料来源：谋学网（www.mouxue.com） (共 5 道试题,共 25 分)
- {8 w5 J* s+ n6 `16.OPTION EXPLICIT语句可以放在窗体模块的声明段中。
资料:
: R& G6 K' C7 D2 c! R/ I% z
17.若一个工程含有多个窗体及标准模块，当工程中含有sub main 过程，则程序一定首先执行该过程。
4 d& Q' x  a! n0 `3 L9 S资料:

18.下列程序段的语法是正确的。 Redim a ( 2 , 4 ) …… Redim preserve a ( 2 , 8)
' V: {1 W- l5 q: U+ u8 M/ J资料:

19.name属性可以在属性窗口修改，也可以在代码中修改
( O4 B6 {* V. E- Z( y4 J0 P& o资料:
& v) ?( k! U& q" @4 S
0 h' b/ j/ ~7 D% z: G20.在VB中，“FOR计数变量＝初值TO终值[STEP步长]”语句中的“步长”不能为0，否则造成死循环。
资料:
. n- G8 z. c5 ~( \% C, m8 q