|
|
一、单选题（共 20 道试题，共 100 分。）V 1. 假定有如下的Sub过程：Sub S（x As Single,y As Single）t = xx =t/y y =t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click ( )Dim a As SingleDim b As Singlea =5b =4S a,b Print a,bEnd Sub程序运行后，单击命令按钮，输出结果为! y9 i1 G9 `6 e* B, }- ?4 h
A. 5 4
3 ?6 T% V0 e, @) xB. 1 1
2 W6 [" v' l B- V0 k% [8 b0 Y8 R. I) qC. 1.25 4
! W3 g) m. m2 Y" J8 RD. 1.25 1- Y o% c2 c3 B% X
满分：5 分
2 y- `$ F: F, n8 m3 Y/ J2. 以下叙述中错误的是8 \3 t) G) x' T; u" ]' m
A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型! ]* }# P$ h* j& h: T
B. Sub过程中不能嵌套定义Sub过程
5 c9 j6 B7 B" Q9 z9 t) YC. Sub过程中可以嵌套调用Sub过程
" S6 J: T7 i X5 TD. 事件过程可以像通用过程一样由用户定义过程名8 A# G, T% P/ p- x0 v" h; ?
满分：5 分4 Q: @' R+ ^% r9 N8 s
3. 关于Line语句正确的说法是: @/ s0 X" m; O/ \4 |$ v7 h& S
A. Line只能绘制直线- i- n& e/ ?, }: P
B. Line可以绘制矩形，但是不可以设置填充色/ O- o. q" ^1 G* B T, ~
C. Line在绘制矩形，填充色由FillColor属性决定
3 W7 d) o! M& x3 _& [D. Line在绘制矩形，填充色由forecolor属性决定$ D8 P0 @+ a: t& b) e
满分：5 分
4 c& U. n6 P1 P7 l5 Z4 u4. 以下不能在“工程资源管理器”窗口中列出的文件类型是: Z+ b; e( M% T" |; {
A. .bas
( x1 `% Q" N: m9 N ]: pB. .res/ u# z- b+ m z' Z4 G+ S: V
C. .frm( O- T. }1 |8 ? |- K/ N
D. .bmp" ]- D9 H1 l- D: b4 ]
满分：5 分
1 n; v1 G; w1 W$ ?; z. T1 X) T5. 确定一个控件在窗体上的位置的属性是
: M+ f1 Q. _+ l9 q- ^7 h' r1 NA. Width和Height3 n6 O i$ W3 D9 b7 s) Z5 y
B. Width或Height
; N6 b$ q( k" F5 [0 j) \- Q& ]C. Top和Left
) }$ U. ?" b5 l/ k4 _D. Top或Left4 o$ F1 z) n! S! ^2 e2 l2 D
满分：5 分
3 V, T0 x$ Q: n8 R3 h" `) G% n( M; B6. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To sqr(i) If i Mod j = 0 Then Exit For Next j If j > Sqr(i) Then Print i Next iEnd Sub该事件过程的功能是
( R/ b, d. C' Z/ aA. 输出n以内的奇数5 X+ z) f- g* P
B. 输出n以内的偶数4 J ~: Q5 R5 x3 [
C. 输出n以内的素数2 o+ c1 Z/ O. m) J8 B& \
D. 输出n以内能被j整除的数
2 I9 W- h: n3 C U( y- g; G) N, n 满分：5 分% J5 |8 u, i( P* w3 C, g
7. (2)以下叙述中正确的是# m( U H/ @3 q. i/ g
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体; x! M! X0 t5 ]
B. " 窗体的Name属性的值是显示在窗体标题栏中的文本"5 {- J. ?3 C- W
C. 可以在运行期间改变对象的Name属性的值
- R0 F! }; O3 g/ k" Q5 \D. "对象的Name属性值可以为空
* H; T# n" @3 C) K1 @/ H4 @ 满分：5 分6 j- l7 ]- K1 V, z& D, Z% y
8. 关于记录操作的说明错误的) Z1 p# w* h/ e) o" p5 }( O
A. 在通过Addnew增加记录后，需要调用Update方法更新数据库
2 {4 i' M1 R. }! [/ f; C/ ?7 o5 jB. 在通过Delete删除记录后，需要调用Update方法更新数据库
2 L5 B1 z; @ w6 CC. 在通过Delete删除记录后，需要调用movelast或movenext方法$ D% \( q* U" W0 z: D. L$ f" `
D. 在通过Edit编辑记录后，需要调用Update方法更新数据库
6 x" y: m4 D7 R/ v; M. f 满分：5 分
/ m# G8 }" G" H+ N) _" \- W* A9. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
: S. X, C4 p, M2 pA. 2, q! ?" k& N1 M/ ~+ @
B. 3# K% C" U+ B$ h" K2 ]% i
C. 4
; C3 w3 J- ~- z, l* s7 A8 WD. / K: V" N2 N6 f7 q( s/ ]( ^
满分：5 分2 x _3 L0 b2 L9 ~. j
10. 假定窗体上有一个文本框，名为Txt1，为了使该文本框的内容能够换行，并且具有水平的垂直滚动条，正确的属性设置为（ ）& K0 z, G$ C; D1 d" J. k* g* ]
A. Txt1.MultiLine = True : Txt1.ScrollBars = 0
3 `# m! {, M5 o' R$ l7 B! mB. Txt1.MultiLine = True : Txt1.ScrollBars = 3
* J1 {7 Y4 R1 l, H" \( nC. Txt1.MultiLine = False: Txt1.ScrollBars = 0
2 H7 x% P9 |9 f; O3 V7 LD. Txt1.MultiLine = False Txt1.ScrollBars = 3
! V9 _' d- R# Q; W1 |; F 满分：5 分
6 w/ o8 Q' q& Q6 F8 V, R: O- l11. 设置图片框pic1大小随所加载图像大小变化的正确语句是
0 v. S; f, Q" C& P% ^: l# CA. pic1.autosize =true
" ^5 A% J9 Y2 A5 f8 \- O% vB. pic1.strech =true
$ l/ u! i, O) ^4 U. GC. pic1.drawmode =1
( Y2 Z; j* M0 ~D. pic1. drawmode =2
9 o7 { h7 u; I9 Q. w6 R+ e; N 满分：5 分
9 Z( A3 o: ^+ u% h9 K' ]12. 取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是: }# d0 N! \# f4 C! K! a
A. ControlBox$ R% c; M/ {3 k9 F: s
B. MinButton7 D. }' Y1 G* s8 \: ]' ]1 F% E0 ^
C. Enabled
$ U! ^+ O# W R A4 y; @. h+ Q3 dD. MaxButton- i4 q5 y F/ e; ~
满分：5 分7 T9 P. N7 F. y- E x( u( p) e
13. 实现MDI窗体mdiMainFrm中子窗体水平平铺的语句为, X% x% V: O3 _& ~: W b! W
A. mdiMainFrm.arrange = 07 f" o: O; {' R2 S8 B5 |! p% u
B. mdiMainFrm.arrange = 11 z; b7 F5 m2 B0 z u2 N
C. mdiMainFrm.arrange = 0
4 d) ?1 H! R% [7 N0 e' n- [& LD. mdiMainFrm.arrange = 03 W9 c" `/ b0 @ c( R
满分：5 分
) t* g% r8 g9 k- @; S( W) ~14. 关于PaintPicture spic,dx,dy,dw,dh,sx,sy,sw,sh,rop语句正确的说法是
8 n" o- ?* @9 ZA. "dx,dy为传送源左上角坐标": p5 m7 C/ {5 d. z
B. "dx,dy为传送目标左上角坐标"
( Z6 V1 V" Y: n9 E. tC. "sw,sh为传送目标的大小"/ q) J9 T" r1 v& V8 s
D. "dw,dh为传送源的大小"
/ z" q8 r# p' B Z8 F% D 满分：5 分+ h! @. V( o' \6 U
15. 若有如下定义：Dim fs As New FileSystemObject, f As File现在要引用C盘根目录下存放的文件text.txt，可以使用的代码是（ ）' l& Z9 j R2 G9 B' a0 ]
A. f=fs.GetFile(“c:\text.txt”)$ Z- T+ J& k! {+ S3 ]% z( J- J
B. Set f=fs.GetFile(“c:\text.txt”)* d* \8 f# T+ z3 l- C" L/ V
C. f=fs.GetFile(“text.txt”)1 v; L& Z H/ b$ ]/ o
D. Set f=fs.GetFile(“text.txt”)
5 |0 L3 H$ B/ z 满分：5 分
8 \( v0 U; e& _; g4 Y8 e16. 在窗体上画一个名称为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程序运行后，如果单击命令按钮，则在文本框中显示的内容是: C- I6 a7 H5 {
A. 0" ^' L2 z$ A* I
B. 12
- e; P9 Y$ }1 t1 c( E6 U5 dC. Str(z)& y' ^; s, O; x' w. ?6 z, ?+ C
D. 没有显示
* H" ~& v- i+ q* Q& m 满分：5 分
$ L" G0 N& F I( g/ `17. 如果在立即窗口中执行以下操作：a=8 <CR> (<CR>是回车键，下同)b=9 <CR>print a>b <CR>则输出结果是- z+ U0 E9 ^. W' S* P3 |
A. -1/ I1 E* W0 d* z: i+ Y: D5 l
B. 0
; W( N+ m# V6 U& B5 pC. FALSE
! x% w$ p" \! g: e5 ^7 hD. TRUE
6 N+ f, Q F# p 满分：5 分
2 ^/ G# h( s. f3 e9 D18. 以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)
. x$ @: u5 ?) k$ ]. RA. 32548.5
8 |. h3 H$ D% F+ o sB. "32,548.50"/ e! C' j1 V7 K6 Y' ?- c' Q
C. "32,548.50"# G, h( G C' I3 h# z+ k$ Z
D. "32,548.50"5 D8 ~6 Y1 \2 Q: f' ~
满分：5 分- I3 N' _2 `6 \, k7 Z" }& l
19. 以下叙述中错误的是/ k/ p0 @) r5 }- P
A. 一个工程中可以包含多个窗体文件
3 U5 Y' m5 k5 NB. 在一个窗体文件中用Private定义的通用过程能被其他窗体调用- B# K: y7 ]& l, ~9 r* G+ ^
C. 在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
# Y4 j( H/ `1 p JD. 全局变量必须在标准模块中定义$ F$ h6 _" P7 s3 K$ l- b
满分：5 分
& N( m2 ^: ]% @2 p0 T: h7 e v0 v20. 定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔
4 L3 }0 C0 Z' M9 nA. 分
0 ?8 U4 G9 `) F! c3 @4 F& U1 HB. 秒
! I { @) k3 r: N- F- Q1 wC. 毫秒
- k( R2 n# n# D) }4 kD. 微秒7 x; Q7 D! [3 j0 j$ R: b! @; f
满分：5 分
8 M5 `% d. r. [, D7 f0 J" H# Q8 d% H# F
|
|
IP卡
狗仔卡
发表于 2013-4-10 11:18:30
微信登陆 
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
客服一
