|
21春学期《可视化程序设计(VB)》在线平时作业2 B/ n( M8 @# W/ G1 @/ x9 q, X
试卷总分:100 得分:1002 P5 W8 @: h8 h4 K8 Z+ P" R9 J9 B
一、单选题 (共 15 道试题,共 75 分)8 }; v- D' M) d( N2 W
1.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即 .txt文件),则正确的描述格式是()。7 y7 r' Q9 Z( ] ^% ^2 `. t. L
A.“text (.txt)|(*.txt)”
* ]/ Q: | L" M, ^: Z- B7 GB.“文本文件( .txt) | (.txt)”$ d/ H! u) x) c
C.“text(.txt)||(*.txt)”
' o) @+ D1 d( kD.“text(.txt)(*.txt)”
5 [( E- I; C. C: v9 E资料:A: a" ~3 H6 W, g9 e4 i. @
; x& s' u) b0 c" R, H+ K
2.为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是()。% A! ~: N* g3 B2 Y
A.Value7 G( {! b+ Q3 \8 ^
B.Default
5 V0 s6 M" [- v8 v7 k4 S sC.Cancel
5 x) I5 J. _8 y/ v( \( M! yD.Enabled) G7 v! [7 a% P# k& X* S0 D
资料:C3 p% P9 x9 ~ p- t
6 Y7 u0 m9 l+ |; Z5 V$ p3.下列Visual Basic程序段运行后,变量s、t的值为()。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k
3 d0 F# v$ U7 P& eA.2 2
. ~, ~8 o! R4 i/ I4 h" jB.9 24$ ?- K* }/ M' M7 [; I% i
C.5 6
9 Y% C5 a) w3 A8 f: Y+ BD.0 1 |) D, `; i' Q" n! { ?1 _
资料:B+ S$ v7 k6 F' A
2 t. Y$ B, q5 O: Q6 S
4.窗体能够响应的事件是( )。# ~3 o! o# g' t3 A$ |; M/ z
A.ActiveForm7 k2 R8 a7 I) N0 |* V/ c
B.Drive
& j. ]7 d- G3 N' ~; }" Z/ bC.Load
5 Q9 R! V& |; ~# }5 c1 rD.Change
% |: ]& k0 s U$ \1 Z9 u! o6 v资料:C
4 E, p; a, a! s) p6 Q( |' w5 R9 P5 `" I( G" j& X
5.正确定义实型变量的是( )。 |) h2 o# {5 r- Y: I
A.Dim I As Integer
3 A6 Y3 h2 Z0 D5 v: `4 Q* X! |$ r$ JB.Dim Sum As Single( D+ w3 y% y1 ^& J ^
C.Dim Name As String0 S0 A5 d& u' ]) s. M5 P; Y. e% r
D."wjm="信息技术"
' T$ u: f0 j! ?3 s资料:0 x! O. O* @1 p4 K1 f
s/ [/ ]3 L# Y! b( O4 L/ H6.设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应使用的语句是()" M( p6 b# B4 }- o; V: K! P3 ]2 y
A.menu1.Enabled=True# U* [$ e2 w& r1 M, `
B.Munu1.Enabled=False
4 ?6 G2 F% r* x: ~C.Menu1.Visible=True
( {$ r8 h" A8 }D.Menu1.Visible=False) l7 p) P8 g) d# d8 n, o( r
资料:$ |6 s8 [9 ~( O, A- |2 P; I: N' e
! G% ]4 z( F. y. \7.在窗体上有一个文本框控件,名称为TxtTime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序如下: Private Sub Timer1_ () TxtTime.text=Time End Sub在下划线上应填入的内容是()。
7 d9 |- {; k1 vA.Enabled
# s! X0 l1 U0 z& Z' s( tB.Visible, M$ ]5 a; H ]* I4 P I
C.Interval' K0 C! U" K" n' f* U+ E# e
D.Timer; @6 O2 M. F( u* m
资料:
! M. T4 \$ K: J* |4 I9 h
5 G! k% \" G& h0 S1 G6 N) ]+ x8.假定X是数值型变量,由函数组成的表达式INT(X/2)=X/2的作用是( )。
1 N9 a% v0 L I: u) J3 M; d+ KA.用于测试X是否偶数& h( W$ P1 E) F: Y' `1 r4 G
B.返回一个整数
* a$ k* f: T1 h. QC.返回一个奇数3 o$ Z# L8 n { ]
D.用于测试X是否整数
5 Z- ^ ?5 ^0 J9 E资料:5 ^* ^& y, x9 J% _5 T
6 v- X2 f1 j) l. D) K9.设有语句:x=InputBox(“输入数值”,“0”,“示例”)程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是()。
" e$ D8 g, n+ A1 N4 M- ^A.变量X的值是数值10
/ r( b2 n& ?7 d0 ]; O1 NB.在InputBox对话框标题栏中显示的是“示例”; ~$ u8 K4 B, [, |' z# J
C.0是默认值6 C3 b- @0 o; g0 R
D.变量X的值是字符串“10”, A' I$ i0 S6 m* t7 B
资料:
2 s6 \6 j& a7 e- u! s) Q1 z
( k8 b8 _0 r% }' l$ m% Y/ Y10.在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click() CommonDialog1.FileName ="" CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDial2 S. Q0 {: D! r' N
A.该对话框被设置为“打开”对话框
; X5 S0 q$ Q8 B" \B.在该对话框中指定的默认文件名为空
( n. A) G* E+ \C.该对话框的标题为VBTest
; }, L" `) ]( M2 z& iD.在该对话框中指定的默认文件类型为文本文件(*.Txt)! a9 ^: J! b2 t8 M3 J1 M, i
资料:
8 K& }& {* ^4 m2 l5 u: E
3 v/ [3 }8 ?9 ~0 ]5 {/ b11.下面程序段运行后,变量x的值为( )。 x=3 y=77 Do x=x+2 Loop Until x>Sqr(y)2 \6 T& A3 O% U5 M
A.7
9 [6 B. H; T @( `% D+ RB.8
6 b! z) X1 s9 T5 ?# V) lC.98 j3 @* O0 J9 M; }4 Q
D.10# J. v) @' i3 K6 W! q' C7 d
资料:
! G4 S. z q7 {$ ?% Z
2 Y) Z2 ?& p% P$ G# t1 i/ z12.单击命令按钮Command1必将调用已写在( )事件中的代码。" \" O$ V1 T* e) J {; J3 J
A.LostFocus
) y5 X5 f* k" K9 m" Y# wB.KeyPress
8 J' i; _+ I9 b0 z+ [8 O8 hC.Dbclick
a/ I7 o2 Q& u, o2 J) ^D.Click! w& \4 p8 c' C
资料:% |+ Z3 U3 R, k0 c2 J/ O& k: W
8 K) E# o, c; d6 {; }0 ~13.设a=“Visual Basic”,下面使b=“Basic”的语句是()。6 Z9 a6 X( v. `7 L: d
A.b=Left(a,8,12)" `1 p2 W4 E! @9 ]& i
B."b=Mid(a,8,5)"# p4 q1 d: S3 z/ m& V
C."b=Rigth(a,5,5)"
; {! y+ l+ o: \/ w0 P' OD."b=Left(a,8,5)"
5 k$ x8 ^: O+ Q' h资料:
5 c0 o5 t/ ~/ ^( P6 m2 ~% l, U3 `, V1 @" e `. u, [
14.以下不能在"工程资源管理器"窗口中列出的文件类型是( )。, }; \: X' I* l6 M
A..bas1 `6 j0 u3 Y& b+ C, D$ w8 G
B..res ]% A0 K0 ~6 k- e% E, z
C..frm
k% `& E* f* B# sD..ocx# i, F1 t3 d6 v' u
资料:& l6 N O& h' G- K% X! @2 s! O
( n( g) ~! s% A4 \. n w$ l
15.设x=4,y=8,z=7,表达式x<y And (Not y>z) Or z<x的值是()。. @! g- p: P& @% z
A.1
* Y( G6 p( _ p5 C5 _B.-1% q& w1 _1 H X6 {. b0 }
C.TRUE
4 R: c* ?( [7 [: A2 tD.FALSE
7 l u; o8 ^5 t- a! a% E3 B$ }: k资料:
" C3 x, ^5 `& q
% _: x+ \+ }0 t二、资料来源:谋学网(www.mouxue.com) (共 5 道试题,共 25 分)) |1 @, |0 A& H" g& V! I
16.OPTION EXPLICIT语句可以放在窗体模块的声明段中。
8 k( t' M9 _: T8 A资料:/ }, N% f- j5 u! u$ y4 @3 q9 |
+ R. u" q# L' f5 d- V& J3 h$ _
17.若一个工程含有多个窗体及标准模块,当工程中含有sub main 过程,则程序一定首先执行该过程。
0 |! p: s9 ~# d8 [& _ s. E资料:: ^$ \- l& g) C" f( ]) j
$ e& I$ Y ]* V4 N* u* [- {18.下列程序段的语法是正确的。 Redim a ( 2 , 4 ) …… Redim preserve a ( 2 , 8)
: j9 y' } j+ G* h6 `9 b4 Z资料:3 S) s: w, \8 {
0 B( I7 p1 g, z. n$ @$ r# b O3 w
19.name属性可以在属性窗口修改,也可以在代码中修改
3 E1 t$ s7 c6 z$ y- Q s# j资料:4 g/ e3 h2 n. [" z
% \5 N9 j L% Y! B- j* e20.在VB中,“FOR计数变量=初值TO终值[STEP步长]”语句中的“步长”不能为0,否则造成死循环。% _4 d/ u2 v8 e A3 v
资料:9 J8 n2 t. K9 {; x2 E
|
|