|
一、单选题(共 20 道试题,共 100 分。)V 1. 确定一个控件在窗体上的位置的属性是
& G& V% j7 T6 `8 t9 MA. Width和Height* A0 {. L. a5 R2 b7 K! v$ Z: |
B. Width或Height8 [; Q) r1 Q4 P4 |" {# T
C. Top和Left2 t' Y+ `+ \' c& ^8 Z7 P4 D% `( r9 _
D. Top或Left
/ e! W# Z' S4 [% m 满分:5 分6 W( m8 @% @# G% b, B3 `, x$ a, o
2. 设置一个检查框所代表选项的选中状态,应当在属性窗口中改变的属性是( )1 y. c% ^$ D5 x9 F; T0 o# Z# t: J
A.
+ T: J- ]3 l3 x! XB. Name
8 }$ ~/ e# u( u# ]) jC. Text7 z$ f- V# L$ f6 D x, u, I
D. Value; I, q. Z, H: A+ ?5 z; w
满分:5 分
; x1 x* @- w% `0 I# C3. 设置图片框pic1大小随所加载图像大小变化的正确语句是" u; s, A* d% i) L& V! q4 D$ j
A. pic1.autosize =true! ]+ `9 K) X% z5 ]; I! e, ^
B. pic1.strech =true: f; H+ I: f7 l, I3 R- f
C. pic1.drawmode =17 x" Y, V5 l [8 a5 u% S S1 g
D. pic1. drawmode =2
5 y z0 C9 p' E& i 满分:5 分/ F( N) t: _) _
4. 假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为
j6 e* f' }; p! }A. MenuItem. Enabled=False3 x) }7 Q0 ?2 K( a$ E
B. MenuItem. Enabled=True
+ o2 e! }9 t3 P rC. MenuItem. Visible=True" c0 F- f w# b( G
D. Menultem. Visible=False/ I6 N5 x, B$ l+ b3 u8 T* s# L
满分:5 分
" u! F3 I4 c8 u5. 定时器的Interval属性以( )为单位指定Timer事件之间的时间间隔 u1 ?9 E. H' M# P4 F7 y; S
A. 分
5 U' v" D( Z. j' xB. 秒* \% g! {2 o; { N" ]% i
C. 毫秒
1 i1 d6 o, M4 h- w( aD. 微秒9 P2 Z# _% b( K M. [% U4 E( o! C
满分:5 分
5 p* C: F: F7 W3 b! g6. 对窗体编写如下代码:Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后,按回车键,输出结果为% Z, x9 D( m6 }
A. 48 4) `- a7 V0 t+ [" W- V9 s
B. 237 1' }% Y. I* h6 G1 x( z, R% K8 X/ h
C. 498 5
u, p+ X @; L6 {( r gD. 498 4' G& x W( a- j' {
满分:5 分
# D1 _& F9 G" Z5 i& i8 G, Z7. 以下关于变量作用域的叙述中,正确的是4 }: i9 h, u" z& p! p" Y, Q$ n
A. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用
! i) R# W$ R- O$ r) f1 XB. 全局变量必须在标准模块中声明
- O& [7 B. {/ ~- uC. 模块级变量只能用Private关键字声明8 f. |) @# C3 R" f# Q
D. Static类型变量的作用域是它所在的窗体或模块文件
6 X0 m3 ]$ H2 Z: c% j6 e 满分:5 分
2 i# N1 o1 D& c2 S. Q8. 以下叙述中正确的是
6 k5 `2 v( s* E: |* \% a% qA. 窗体的Name属性指定窗体的名称,用来标识一个窗体/ o* \( ?* S* L4 b: s+ c
B. 窗体的Name属性的值是显示在窗体标题栏中的文本
( r9 q$ w: D) O# VC. 可以在运行期间改变对象的Name属性的值* a; k: j7 F- m0 ~! a6 R- w
D. 对象的Name属性值可以为空6 g* {0 u# B2 b9 p! h" ~# w
满分:5 分& }% k, a9 X# `, y9 P4 l: _
9. 若要求在文本框中输入密码时在文本框中显示#号,则应在此文本框的属性窗口中设置0 M0 R5 ^% @+ s% J! B$ T! m
A. Text属性值为#
/ D* v/ @# l8 n( QB. Caption属性值为
6 F* H5 F" p8 U& ]1 M6 n; SC. #PasswordChar属性值为$ U! u+ ]0 \) v1 B1 H, K
D. #PasswordChar属性值为真
4 v2 W+ b# I' p: h1 D& h 满分:5 分
2 ` d% t9 U* y) _6 W$ U$ e7 n10. 以下关于图片框控件的说法中,错误的是
" J4 |# I4 `9 C5 T+ {. i4 BA. 可以通过Print方法在图片框中输出文本$ x- v- r. R1 w7 A+ ]$ i: P
B. 清空图片框控件中图形的方法之一是加载一个空图形
( X- I# s+ c# ?5 c) JC. 图片框控件可以作为容器使用
3 C7 z: M2 ?) bD. 用Stretch属性可以自动调整图片框中图形的大小: S* U3 `3 c. b$ P9 A, H7 C9 P7 D) k
满分:5 分" F' W1 S+ ^% ^ f: t& Z& e
11. 语句Print 5/4*6\5 Mod 2的输出结果是0 w# g* t, F# ^# |; G* H; i; g2 I
A. 0+ V( B% t! V8 E
B. 1) O3 H2 o( M. c% M# d1 s
C. 26 o( y" _$ K+ ?; H) C
D. 3
P7 |* Z' c, a7 Y* h 满分:5 分3 a3 H2 l2 ^7 y% _! H1 G# L
12. 下列叙述中正确的是2 W5 d6 @( O7 {% g/ n7 h
A. 在窗体的Form_Load事件过程中定义的变量是全局变量3 {4 f3 f" J, P1 O4 U' M# P0 J$ e% G9 M$ ]
B. 局部变量的作用域可以超出所定义的过程& r4 B \$ p: Q2 c
C. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程6 @( a% q/ k/ |8 B; M0 Z V1 u
D. 在调用过程时,所有局部变量被系统初始化为0或空字符串
% p# n, ^0 a, g* v0 S% X5 z# w0 e 满分:5 分
: A3 u" j* x5 U' d13. 设a=“Visual Basic”,下面使b=“Basic”的语句是 z2 h3 c6 p& d
A. "b=Left(a,8,12) "' D' {5 y2 W2 i( j
B. " b=Mid(a,8,5)"+ M3 H, s- Y4 \9 _3 L. I# i" }
C. "b=Rigth(a,5,5)"
) \) W f, t2 f' I; UD. "b=Left(a,8,5)") o* Q- L. r1 E: U* }8 n% f1 G
满分:5 分
' v1 n5 h' ?# y$ D: ?0 U14. 下列叙述不正确的是()! O% v& h) g' S( m
A. 驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框
5 N; v: D+ b3 ]5 BB. 驱动器列表框的Drive属性只能在运行时被设置
' H5 y% U! \! {: k2 u! |C. 从驱动器列表框中选择驱动器能自动变更系统当前的工作驱动器9 F- U- k: K4 F) l( a! U8 J
D. 要改变系统当前的工作驱动器需要使用ChDrive语句
- m+ T+ t1 C4 f- L7 a+ W) m 满分:5 分
: _, L! Y0 A! r% a, D. K& V15. 在窗体上画一个命令按钮(其NAME属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click() Dim a s = 0 a = Array(1,2,3,4) j = 1 For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10 Next i Print sEnd Sub运行上面的程序,单击命令按钮,其输出结果是
3 ?, c3 P8 C$ f5 u" g& f6 D& vA. 4321$ J( r. u% d- v7 b
B. 1234
' x4 x9 p) w5 d* x4 s' Q: FC. 34( m% u P5 Q8 U! C0 D6 C
D. 12
: X; k f; G4 |2 [5 s5 Z 满分:5 分
# u1 K) F8 V! [4 C }9 g! ]2 @/ V16. 以下能够正确计算n!的程序是; T0 z! m$ y1 O$ D
A. Private Sub Command1_Click()n=5:x=1Dox=x*ii=i+1Loop While i<nPrint xEnd Sub
% l2 W# y; z5 ~4 e4 m2 PB. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<nPrint xEnd Sub
6 e0 O, W' i/ ]' FC. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<=nPrint xEnd Sub! A* ]# ?: U% B. _% x8 _
D. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i>nPrint xEnd Sub
% a S5 {7 l2 x" ~7 A, ~3 ] 满分:5 分- g8 C& c$ R+ x- H6 ?1 f
17. (3)刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是
4 ]* b9 C/ A" w+ g I$ k3 oA. 单选按钮( Z: V) P M' L* T$ L$ \8 B
B. 图片框0 [; A; R# X. P5 u
C. " 通用对话框
5 Y& d7 t" m' ?$ |D. "
1 K0 [3 [9 N! \+ H/ s& i# n; D1 PE. 文本框. e" {1 y- C8 q2 P' z! Q0 q
满分:5 分# R- q& |: y) W
18. 以下叙述中错误的是
9 ]0 d# z: t: {- c) uA. 在KeyUp和KeyDown事件过程中,从键盘上输入A或a被视作相同的字母(即具有相同的KeyCode)
; Z! ]- i" O; ^+ T- o$ ?B. 在KeyUp和KeyDown事件过程中,将键盘上的“1”和右侧小键盘上的“1”视作不同的数字(具有不同的KeyCode)
; D f2 i% i' A! d) xC. KeyPress事件中不能识别键盘上某个键的按下与释放
7 K. S8 H1 Q) Q8 X1 Q9 ZD. KeyPress事件中可以识别键盘上某个键的按下与释放
( \7 w: }5 C* R. J% q/ p8 `: m 满分:5 分' A: Y6 {2 b5 [ d; p1 }
19. 在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是
! u5 h! U2 Q6 i! _! iA. ") Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function"
7 Y6 {" R& Z: W6 k! HB. "Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function"8 z$ Z9 D$ }+ O" c1 {* C: n2 `
C. "Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function "
7 j! T. r1 J) X; V( a+ KD. "Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
$ i% W* B5 p7 t 满分:5 分8 i/ H$ S% ?- }! k! a/ b
20. 为了把窗体上某个控件变成活动控件,应执行的操作是/ F! s: `+ a7 o+ U) `' [
A. 单击窗体的边框1 z% R) j m! B
B. 单击控件的内部- [5 u6 S) [0 Z$ K% H: n3 n
C. 双击控件- v5 [, q5 L9 w5 t; _8 j
D. 双击窗体1 a$ N7 i! U9 Z" J3 S0 h6 t% J1 n( k
满分:5 分
5 I" y3 P1 h% r3 E+ T
- y5 m) E5 B u: i9 p% o z |
|