|
|
一、单选题（共 20 道试题，共 100 分。）V 1. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：Private Sub Command1_Click()Dim x,y,z As Integerx=5y=7z=0Text1.text=“”Call P1(x,y,z)Text1.Text=Str(x)End SubSub P1(ByVal a As Integer,ByVal b As Integer,c As Integer)c=a+bEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是
- x+ B! i; m. a$ Q8 K$ FA. 0
# p8 j1 Y; }+ `3 g: GB. 127 S5 I3 u2 `" i. n* E- X1 `6 r" z
C. Str(z)
6 j/ s1 y4 ~1 E; ?' V8 Z8 LD. 没有显示
" C5 B5 s( a" N; T' @, | 满分：5 分
, g) q `" V5 t2. 下列叙述中正确的是5 M5 p+ i0 ~! }6 m- `8 ?
A. 在窗体的Form_Load事件过程中定义的变量是全局变量3 z: P y- E8 q/ h
B. 局部变量的作用域可以超出所定义的过程
. Z ]4 D( a2 d& i4 S3 BC. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程0 O0 i; T5 ^4 }5 [/ m: }6 Y! f
D. 在调用过程时，所有局部变量被系统初始化为0或空字符串
$ P5 _% ?, J5 d+ m+ K 满分：5 分9 Q6 D/ w# h7 c' u. h; H+ C
3. 对窗体编写如下事件过程：Private Sub Form _MouseDown(Button As Integer, _ Shift As Integer, X As Single Y As Single)If Button =2 ThenPrint "AAAAA"End IfEnd Sub Private Sub Form _ MouseUp(Button As Integer, _ Shift As Integer, X As Single, Y As Single)Print "BBBBB"End7 y! _. f+ m/ c! d& x ^
A. AAAAABBBBB"( E4 l$ X$ ^1 x3 G9 i. a$ ^0 c
B. BBBBB+ r2 K% w' i }; h% [: j3 L" J
C. AAAAA G9 j: e$ Z# H1 a) F5 V- @' G
D. "BBBBBAAAAA"
0 X' c/ b/ J1 f$ d 满分：5 分' y* ~. a& P& b2 i' G1 o6 S c; Y) R
4. 以下叙述中错误的是
& _. S ^, }6 I0 B1 \- Q. ZA. 一个工程中只能有一个Sub Main过程* T7 E) C1 d% o! [7 {; g
B. 窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
! I% v. T0 p. Z8 E/ L; r( PC. 窗体的Hide方法和Unload方法的作用完全相同3 C2 t9 L1 p- |2 z
D. 若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体
! p1 v* B! ?7 p0 l- ^& u 满分：5 分/ j8 U2 B3 x0 s4 S
5. 要清除组合框Combol中的所有内容，可以使用（ ）语句3 z. s; s x$ g( }$ P9 t2 D$ Z
A. / ?9 I; P3 [+ ] r/ S2 A7 J' t
B. Combo1.Clear
: b: _6 T# G7 C/ hC. Combo1.Delete' C! K3 i. o% S: I+ j2 C! e+ i. p
D. Combo1.Remove
. Z' E: f4 \# x; e3 R1 W7 Q 满分：5 分+ G9 h' n9 a( y. e c! s
6. 删除ListBox对象list1最后一个列表项的可行语句
6 H* `1 M5 r0 B. y/ M5 xA. list1.removeitem list1.listcount
5 D/ K3 g. F. yB. list1.removeitem list1.listcount -15 O0 u! j& j+ `2 ?% s. B8 `
C. list1.deleteitem list1.listcount -1" `& l4 l) b% t$ D1 i: g
D. list1.deleteitem list1.listcount6 i O: p7 S: y+ L# B
满分：5 分: ]4 `& V# v: k
7. 以下程序的输出结果是Option Base 1Private Sub Command1_Click()Dim a(10),p(3) As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next IFor i=1 To 3k=k+p(i)*2Next iPrint kEnd sub, I, q% \% x$ H, m2 h3 M. K6 Q
A. 332 [: M. c8 B9 a3 x
B. 284 e5 L# |) f* `$ w
C. 35* t+ |1 Q3 a3 @$ R; n
D. 37
! ~' k: O6 @4 V. O( Q6 R 满分：5 分
1 I! ?9 U: a4 l) E: L' j8. 以下关于变量作用域的叙述中，正确的是
0 Y- |; m3 s% G# b' GA. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用4 u' A8 k7 V6 u' s$ c1 E
B. 全局变量必须在标准模块中声明" z- ~& m: @/ ?
C. 模块级变量只能用Private关键字声明: e# D3 V5 U1 i0 L/ L/ V; t- i
D. Static类型变量的作用域是它所在的窗体或模块文件0 r9 o2 `2 t1 P7 r! _8 d
满分：5 分
" e. C# @+ }" I7 Y" G5 b7 ]9. 下面关于多重窗体的叙述中，正确的是（）- v4 ^+ x2 I3 k/ E0 [
A. 作为启动对象的Main 子过程只能放在窗体模块内3 Q, P' p4 J7 z% u+ m0 D
B. 如果启动对象是Main 子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载窗体或加载哪一个窗体, | c7 U( ^7 ?3 b. f9 D
C. 没有启动窗体，程序不能执行3 |* ?9 w* l" ~! i2 }+ k
D. 以上都不对
2 c* F: m% j- D 满分：5 分
6 Z4 u6 l0 e m( Q7 K10. 在窗体上有一个文本框控件，名称为TxtTime：一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序为：Private Sub Timer1_ ()TxtTime.text=TimeEnd Sub在下划线上应填入的内容是, ]) Y$ z3 U* J: i6 y
A. Enabled
% ~" \$ |1 I3 V# G) QB. Visible
, y$ k/ v5 W6 V. HC. Interval
+ X4 O) \2 Q7 L x7 aD. Timer
" c8 u" @$ {8 Y4 f5 T. R& L B 满分：5 分9 s* X% y/ N; z9 m9 \ Y. r$ ~
11. 以下叙述中错误的是7 n: j! N. H% ^* g. z
A. 下拉式菜单和弹出式菜单都用菜单编辑器建立
4 i9 z+ o8 _1 } y# L- E! f8 yB. 在多窗体程序中，每个窗体都可以建立自己的菜单系统
. H* P& F0 U9 k+ Q: }2 ?1 VC. 除分隔线外，所有菜单项都能接收Click事件( J% ?/ }% w% M
D. 如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见 [2 n$ z5 A, K, r
满分：5 分% f9 I2 K3 a5 M. {" i
12. 在一行内写多条语句时，语句之间要用某个符号分隔。这个符号是（）
" R" p5 K9 F& Q2 y G+ V0 C& oA. ","# C0 H% }; Y" Y. T0 ?6 S1 }$ L
B. ；5 _* k0 M) A: q& e( l8 j @8 w1 V
C. 、
, U, J' B0 V0 L: Z# w# ?5 hD. ：
% n. R( F4 C6 G 满分：5 分# Z/ j3 b' E& k7 q
13. 以下关系表达式中，其值为False的是
/ e1 m: o) U0 G2 G4 |A. """ABC"">""AbC"""
4 ^8 y% B& _9 F8 ^ \4 DB. """the""<>""they""" f: l4 ]0 R5 Z% T1 J
C. """VISUAL""=UCase(""Visual"")"* f# Y! g+ K5 H8 y
D. """Integer"">""Int"""4 R6 N. H0 C0 {* c O- q5 C' o. x6 L
满分：5 分/ A; j8 Y( w, H
14. 在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x窗体上有一组合框Combo1，并将下列项“Chardonnay”、“FunBlanc”、“Gewrzt”和“Zinfande”放置到组合框中，当窗体加载时的代码如下：Private Sub Form_Load()Combo1.AddIt$ f/ S+ i2 z5 \1 r6 `
A. Text1.Text=Combo1.List(0)- B& f6 h j' L; }1 E. o5 a
B. Text1.Text=Combo1.List(1)! f* `( r7 C( t+ I
C. Text1.Text=Combo1.List(2)* o: ^9 M* M% _
D. Text1.Text=Combo1.List(3), D' f; h A8 E3 t& \# M: M8 g
满分：5 分
& d& M" T1 y" D* w" K15. 假设有如下事件过程Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button=2 ThenPopupMenu popFormEnd IfEnd Sub则以下描述中错误的是! ^! f: J( x }( }* ?/ V
A. 该过程的功能是弹出一个菜单: a0 ~; U0 s- B- @% v
B. popForm是在菜单编辑器中定义的弹出式菜单的名称' k" O( E v% {# ?- ]2 h
C. 参数X、Y指明鼠标的当前位置
W+ D; v J* mD. Button=2表示按下的是鼠标左键8 s- w+ k$ r0 n! \! E- ~1 ~) J" V! O
满分：5 分
+ \! ?" R$ l: y) F' p, n: G16. 阅读程序：Function F(a As Integer)b = 0Static cb = b+1c = c+1f = a+b+cEnd Function Private Sub Commandl_Click ()Dim a As Integera =2For i =1 To 3Print F(a)Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为+ Y) D# k$ Q m1 N' l
A. 4 4 45 c/ u: s8 M- W, ?
B. 4 5 67 @ J. C! e' n3 H, ~, I9 `2 m
C. 4 6 8
) f+ c, O8 D3 M* m; RD. 4 7 96 ]) V' ~6 L* t$ [
满分：5 分
( `5 I1 ?+ B. _: i7 _4 d! I! F% X17. 不能实现向ListBox对象list1追加一项 “Test”的语句 z( D2 A5 s- l. F) s% r( R4 Q) |
A. list1.additem “Test”
! k3 |. t1 Z# R( x2 H5 ]4 ~2 aB. list1.additem “Test” list1.listcount0 ]/ V$ e% P' C
C. list1.List（list1.listcount -1）= “Test”
5 `9 s4 R7 M: S/ I& m& B2 x, dD. list1.List（list1.listcount）= “Test”
7 G0 S7 _4 ^6 n4 h/ q 满分：5 分- S* i% k5 N+ K& Z8 j4 n
18. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next i Text1.Text = array1(2, 3) + array1(3, 4)End Sub程序运0 V1 V) l7 l) h: }( n
A. 15% N( M) U/ E" L8 X* s% Z
B. 14
X h. h+ \* _# [ ?, e: [C. 131 q, E \1 W; \4 |/ R3 }
D. 12) Y L5 W9 r8 \7 u" l3 C
满分：5 分
C& u# z' Z* [19. 假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为& E& V$ U/ W/ n1 ~ f4 I3 t! e
A. MenuItem. Enabled=False
8 `8 l$ S( D5 Q' w( `9 iB. MenuItem. Enabled=True( W8 i+ B- n. f0 {1 D8 v8 M
C. MenuItem. Visible=True. K5 T q+ ~5 Y; Z; m
D. Menultem. Visible=False
# n# K$ p6 n4 W* w( y, x 满分：5 分
- a2 G" {+ `/ k- ?; \: V, x u20. 以下关于函数过程的叙述中，正确的是7 b8 @" }6 @+ ~- N
A. 函数过程形参的类型与函数返回值的类型没有关系
$ { A4 c& g( g. J% N4 GB. 在函数过程中，过程的返回值可以有多个& i ^ ]: p0 d3 D& h6 i# X% w. G6 g2 u
C. 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递9 r# f, V* v- G1 V! N8 @, o+ C
D. 如果不指明函数过程参数的类型，则该参数没有数据类型
: [3 u! ~* M) t1 K1 c 满分：5 分
# l" s1 ?& m- C
0 |/ t0 h" x2 T ?需要满分标准资料请直接加QQ :1306998094 |
|
IP卡
狗仔卡
发表于 2011-9-28 20:21:51
微信登陆 
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
客服一
