|
21春学期《可视化程序设计(VB)》在线平时作业20 ^% i" H2 O! j0 ~ M- s& E
试卷总分:100 得分:100# C. O7 s. ?4 }1 c2 w
一、单选题 (共 15 道试题,共 75 分). n e4 L# g6 z3 R6 O% z
1.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即 .txt文件),则正确的描述格式是()。6 j! k4 A) g8 q5 w a
A.“text (.txt)|(*.txt)”
9 u! z! a1 r( P; x2 C2 U AB.“文本文件( .txt) | (.txt)”& A$ S. f) d2 T: D! n
C.“text(.txt)||(*.txt)”: Z3 ]) \9 O' n, p
D.“text(.txt)(*.txt)”
! ~' z% W- \) |) x8 ?资料:A
# g3 i6 f9 y# p! {+ V) e9 V' ~, P4 t( X! C2 |
2.为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是()。 T1 K7 m/ d' L. }( i
A.Value
8 r& {! Q! `1 N- ^& i; |- g3 qB.Default
+ R% j* S; M0 J& c" w5 K: v" AC.Cancel' F' ?. V* H* T# Z/ M
D.Enabled* T" B/ k$ C* n. l; a1 ~: A
资料:C
, K) I; w: @' ]. H, ?! Q) U; K
! X5 D0 v: H$ ]7 F) B" \/ W& P3.下列Visual Basic程序段运行后,变量s、t的值为()。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k4 N4 @5 o# H3 ]! w) G
A.2 2
% H9 i4 r9 n+ W* D( c) c2 vB.9 24
3 m* l+ h- Y, d& S) n" h2 @C.5 68 _& I7 i5 W/ K* e3 T' a& z9 l
D.0 1
; R" ^, h9 H1 `& N资料:B5 i5 Z2 l3 u3 Y/ {* J5 O
, G$ L: F# u. ] G( h8 a
4.窗体能够响应的事件是( )。1 `, x- h) X$ J* x1 l( u) S
A.ActiveForm
( F9 j/ B( m, gB.Drive H$ C0 X0 P# @( ]) u4 C
C.Load
$ z& |, @. W. H" X3 K% y8 [! \D.Change
+ k5 c) p0 d% y) v$ i) j资料:C! a7 t% [5 y' y5 h) {5 Q" r; W6 R
; a$ @/ I7 n; r7 d1 O# v3 x
5.正确定义实型变量的是( )。
$ h- I+ G8 \- [: F. |A.Dim I As Integer
6 n( X) S3 W( N0 ^( F# e6 r+ lB.Dim Sum As Single
* r' }" q! r4 n, YC.Dim Name As String
8 s# C7 `1 ?6 b$ Q4 p" [, k* sD."wjm="信息技术"% r! S$ H$ ] G4 Y ]
资料:% Q }$ s( P* E. ?1 @
8 C* E1 Q h$ S( \ o6.设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应使用的语句是()3 l1 X- Q; e1 e& g H+ K; w
A.menu1.Enabled=True
, s* a" K3 W& R: E4 I8 ZB.Munu1.Enabled=False0 ]& H* c. F- B" Z$ Y1 O% k
C.Menu1.Visible=True" }+ \ ~8 d& X: x" B
D.Menu1.Visible=False' Q0 J$ Q) B" h- s% |% {; m
资料:- A: ?9 Q7 A2 G0 U( D7 S, N( X
z* N# w! F4 e7.在窗体上有一个文本框控件,名称为TxtTime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序如下: Private Sub Timer1_ () TxtTime.text=Time End Sub在下划线上应填入的内容是()。4 u- \) ]3 }! R& G( T$ e+ p1 z% F2 |0 [& R
A.Enabled" i' F4 V4 B" Y4 z
B.Visible% h6 d: ~; E" W1 B% p
C.Interval, |) a1 i& }( [& P5 P$ _
D.Timer
# E# ~3 s! R" a8 Q% {. |. K/ _资料:
# C7 Y4 l4 k V. K0 H6 Q' r* |8 }
3 O9 A4 K& {* ?( _6 i6 @6 ^5 E8.假定X是数值型变量,由函数组成的表达式INT(X/2)=X/2的作用是( )。3 X- D$ s$ L ~( H" y
A.用于测试X是否偶数, [; p" V2 Z$ Q( H! m# `0 r
B.返回一个整数
2 S$ h7 L/ @, w l4 o, ?C.返回一个奇数
6 p3 ^8 ^, O$ W$ o f) kD.用于测试X是否整数+ R7 Z4 s0 t2 [$ V
资料: b, \ z8 t) x# o5 M; K: y
: }- O' v. D5 g5 Y/ `' Q
9.设有语句:x=InputBox(“输入数值”,“0”,“示例”)程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是()。 V" w% g5 ~& f! t5 e* p' z \# r0 S* ~
A.变量X的值是数值10/ W) C2 P, A1 [; E7 n# Q6 O" [
B.在InputBox对话框标题栏中显示的是“示例”5 d+ w0 N) G0 S! a
C.0是默认值9 b) t# g# s% p& c7 B5 N
D.变量X的值是字符串“10”
. S1 h% V; O( Z2 i9 c: Z( E资料:
7 G: P6 ?7 \7 D/ |+ d1 h. K. c" A3 u* C) A- G
10.在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click() CommonDialog1.FileName ="" CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDial, D2 n; z8 i! D
A.该对话框被设置为“打开”对话框) q7 o- e4 Q; ]5 e+ k
B.在该对话框中指定的默认文件名为空
B8 c, _7 W' D! i0 rC.该对话框的标题为VBTest
# ^ J7 z' O* I. ]* Y. k, Y/ K7 hD.在该对话框中指定的默认文件类型为文本文件(*.Txt)+ I7 R! ^. u6 Q8 h( z+ `
资料:
6 ?6 ]4 l# p: F
' U/ {8 i q3 F7 \' A11.下面程序段运行后,变量x的值为( )。 x=3 y=77 Do x=x+2 Loop Until x>Sqr(y)
* I% M! }/ \% |, [5 j4 qA.7+ j8 P; S- A5 X* |) [7 C; u
B.8( C' R" J# a/ B4 }/ J2 l
C.9
" y5 F) a% {' ?# P: A8 d3 ?9 T5 TD.10
% N, V. |: z0 x5 X# J C资料:
7 p' T) C/ y! e1 } n# t
$ ]- e/ w! O* P* Y* S' g12.单击命令按钮Command1必将调用已写在( )事件中的代码。
; x2 s! ?- R: T/ x0 M1 w4 ]3 cA.LostFocus3 L8 K0 e+ r% u+ T* g
B.KeyPress
! j1 u) ]3 J/ u7 ~# GC.Dbclick
o/ q3 i; G, h/ ^D.Click
* Y) X; {1 f/ R; b资料:( c( Y l0 ^; [5 h
! U0 P5 s4 F8 p
13.设a=“Visual Basic”,下面使b=“Basic”的语句是()。/ L* `8 i3 N; `+ R a* I
A.b=Left(a,8,12)5 B7 ?9 x/ u* C" Q F# @$ E% P
B."b=Mid(a,8,5)"
6 @) _( r2 k# W( J% OC."b=Rigth(a,5,5)", {( K+ Q, J/ P9 t3 m
D."b=Left(a,8,5)"5 Q! Z& U. U* N
资料:! }- o) G7 `0 H* U& U& u
8 D3 K# S! N. p, i+ g( {
14.以下不能在"工程资源管理器"窗口中列出的文件类型是( )。
& H1 L: M `+ \. RA..bas) n% t4 L& q- q, D
B..res
% F3 ~5 ^3 J B: G0 w6 cC..frm; W: `! t. ?8 x+ W
D..ocx
8 ]5 j5 W/ }4 t1 B, S资料:
! r2 z$ P. w, @) A! K" q. s' e7 ^$ D; h0 z7 L- T
15.设x=4,y=8,z=7,表达式x<y And (Not y>z) Or z<x的值是()。 l9 a0 C* F1 U. d9 ^3 s
A.1
4 O; d! X/ ` y$ h- i, D6 _ Z8 XB.-1; r( A2 d% ], K8 W, h
C.TRUE
! [" v" [* U {7 J. e% C7 e. AD.FALSE
; \; \* [% ?& |% x资料:' U! M4 D& D# N* q
# k+ b' T, l% M; a
二、资料来源:谋学网(www.mouxue.com) (共 5 道试题,共 25 分)
: u4 m; k8 m+ r: o16.OPTION EXPLICIT语句可以放在窗体模块的声明段中。& v6 E" j! i& H, n
资料:6 {- \8 f4 Z, P2 m4 J3 F
6 a1 U1 L# f, D% `! Z: t
17.若一个工程含有多个窗体及标准模块,当工程中含有sub main 过程,则程序一定首先执行该过程。5 H* i6 ?$ a" r% k
资料:3 P) u; c5 w/ ^* V9 _; b
( ?1 S8 [: C$ L5 L. b* A9 ~- Y
18.下列程序段的语法是正确的。 Redim a ( 2 , 4 ) …… Redim preserve a ( 2 , 8)7 `# F' [0 ?4 U5 k
资料:
# A# Z, z1 J4 V4 ^( c: g" ?' G0 k) T
( r! [* \7 X$ d9 b, V0 s19.name属性可以在属性窗口修改,也可以在代码中修改
! t5 r; h% C9 v) q资料:3 |5 r$ Q1 S( ?" f3 o: a2 F3 X
6 n9 e2 c' l* p+ P1 g# M20.在VB中,“FOR计数变量=初值TO终值[STEP步长]”语句中的“步长”不能为0,否则造成死循环。% z3 S2 X/ ]9 \& J [/ r
资料:- }2 w$ Z2 X8 h
|
|