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

奥鹏在线作业

21春学期《可视化程序设计（VB）》在线平时作业2
+ W! v+ Y; V/ A试卷总分:100  得分:100
4 v$ E  N8 _6 C1 g/ I* r( I: ]一、单选题 (共 15 道试题,共 75 分)
! e) B' ]* R$ P) S0 ^+ R7 f1.在用通用对话框控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即 .txt文件)，则正确的描述格式是（）。
A.“text (.txt)|(*.txt)”
: a- v: l; Z7 l" aB.“文本文件( .txt) | (.txt)”
* H5 O. @6 P6 Y0 A7 ^8 `( Y1 pC.“text(.txt)||(*.txt)”
' V3 a+ V6 [* E! l+ d+ G8 SD.“text(.txt)(*.txt)”
资料:A
$ @) `" g, M- }6 j+ N3 u8 L
2.为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。
A.Value
B.Default
C.Cancel
D.Enabled
资料:C
1 U! l/ O% J% l  z
0 P) ?5 l8 ^0 _3 s2 O) T3.下列Visual Basic程序段运行后，变量s、t的值为（）。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k
! B* {. e) n& O/ WA.2 2
B.9 24
. B5 }" S! H9 g* @3 A# jC.5 6
" Z4 j7 b' j/ U) c; q5 LD.0 1
资料:B

4.窗体能够响应的事件是（ ）。
- Y  g, }' C0 V2 o! c) X5 p3 [A.ActiveForm
) ]1 t/ \' V+ uB.Drive
  B  x# V: K. pC.Load
! K. J, |! r' o4 }0 m* V6 P( V( n* aD.Change
6 s! z$ y% g  m# P资料:C

5.正确定义实型变量的是（ ）。
A.Dim I As Integer
5 X( K' }: |) ^% E6 B# i+ FB.Dim Sum As Single
C.Dim Name As String
1 A' q) \: l/ @D."wjm="信息技术"
资料:

' q; F. \( R0 q2 a6.设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是（）
A.menu1.Enabled=True
B.Munu1.Enabled=False
C.Menu1.Visible=True
# n# S; N. K/ ^0 \) dD.Menu1.Visible=False
6 L0 d  E- ~, r资料:
) d4 W7 A0 N  I0 J: P4 m+ G' w0 f$ d
% M) J; @& W0 N' ^7.在窗体上有一个文本框控件，名称为TxtTime：一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序如下： Private Sub Timer1_ () TxtTime.text=Time End Sub在下划线上应填入的内容是（）。
( t! s# n# P# F4 G  R/ j9 t" A+ TA.Enabled
B.Visible
C.Interval
8 G0 o" k: {9 [D.Timer
7 D+ n% y1 j0 [" A* E# c1 w0 U: Z资料:

# J# O$ B. E8 ^$ x6 c* j: B8.假定X是数值型变量，由函数组成的表达式INT(X/2)=X/2的作用是（ ）。
A.用于测试X是否偶数
6 m  l- `5 l  D3 gB.返回一个整数
- m. g& S  m. DC.返回一个奇数
D.用于测试X是否整数
; y: s5 Q4 R% ]5 c资料:
* D; c5 n9 ?) N# T
( E: x$ Q1 Y" j  P9.设有语句：x=InputBox(“输入数值”，“0”，“示例”)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（）。
A.变量X的值是数值10
B.在InputBox对话框标题栏中显示的是“示例”
% X5 |! K6 e: b9 l6 jC.0是默认值
D.变量X的值是字符串“10”
资料:

4 N* ?! ^/ C' R' `7 m' q10.在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click() CommonDialog1.FileName ="" CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDial
* a8 c( d# A6 [4 T% F3 Y" aA.该对话框被设置为“打开”对话框
7 ^0 O6 r) K1 P1 VB.在该对话框中指定的默认文件名为空
C.该对话框的标题为VBTest
0 G% S- Q2 I" F, M' ~D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
* S) Y' j& z" b资料:
/ F: u) j  V" H+ O  I
3 O: y/ Y( |2 F8 |2 d) }  l11.下面程序段运行后，变量x的值为( )。 x=3 y=77 Do x=x+2 Loop Until x>Sqr(y)
3 N; S5 a: g0 C# Y2 yA.7
B.8
C.9
D.10
资料:
- j, o2 R6 `4 p0 c) q
12.单击命令按钮Command1必将调用已写在（ ）事件中的代码。
A.LostFocus
. `6 y7 G* ^) s2 I3 _B.KeyPress
C.Dbclick
D.Click
资料:
& b- O# Z# A( D" l* H2 s8 U2 T
13.设a=“Visual Basic”，下面使b=“Basic”的语句是（）。
+ E2 u& v- a/ Q( J2 H; T" cA.b=Left(a,8,12)
: |. M! u6 O" K9 V3 s4 J8 o- kB."b=Mid(a,8,5)"
C."b=Rigth(a,5,5)"
5 v- F* }4 `: ?4 c) z; T8 h+ _D."b=Left(a,8,5)"
0 A  Y8 ^- t7 D9 t% U资料:
8 u$ z9 D3 c# G) O. C& K; F
9 o9 K+ n4 T! _. a14.以下不能在"工程资源管理器"窗口中列出的文件类型是( )。
* E8 s( H0 \, lA..bas
" n* v  A, l: CB..res
1 d' f5 S6 a5 `5 f: }$ a6 W1 WC..frm
D..ocx
7 p' \# X8 ~# k+ w  i- \资料:
; z- x  J7 U3 p& q
15.设x=4,y=8,z=7，表达式x<y And (Not y>z) Or z<x的值是（）。
  w! }( X* _2 Z6 x2 c& s* m$ u: oA.1
, S7 B/ p* `4 C& {/ P1 TB.-1
C.TRUE
8 x, W2 w+ Y3 _2 x; Q, @( BD.FALSE
资料:
: l  ^2 J$ W. n& ~, D
- v2 I! p$ A, f7 A+ f+ V二、资料来源：谋学网（www.mouxue.com） (共 5 道试题,共 25 分)
16.OPTION EXPLICIT语句可以放在窗体模块的声明段中。
! F4 Y/ {: V" u, U  |0 x2 g资料:
# i3 G6 p* Z2 A+ w9 W
* h+ }4 h2 w: B7 h17.若一个工程含有多个窗体及标准模块，当工程中含有sub main 过程，则程序一定首先执行该过程。
资料:
" z: C5 _' k; C: c' c
18.下列程序段的语法是正确的。 Redim a ( 2 , 4 ) …… Redim preserve a ( 2 , 8)
资料:

19.name属性可以在属性窗口修改，也可以在代码中修改
: q! r! `+ a6 c1 g. Y8 F: a2 N资料:
' M5 }" Z& h9 A
1 ]) I" r( r; B20.在VB中，“FOR计数变量＝初值TO终值[STEP步长]”语句中的“步长”不能为0，否则造成死循环。
资料:
+ W& {# A9 D1 C6 Z9 B- X/ ^" y