|
|
一、单选题（共 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程序运行后，单击命令按钮，输出结果为
6 P+ \1 q1 S/ x, C' A! hA. 5 4' \0 S. ^7 I4 O1 O
B. 1 1: y: w, c3 `$ h) Z8 e
C. 1.25 4
! X4 y( m1 ]+ X/ |/ PD. 1.25 1
& ^, ^6 H6 s1 o0 I1 r 满分：5 分
7 K) }3 J7 `7 v2. 以下叙述中错误的是
; Q& a. n9 p9 |. U! d; rA. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型, |1 R* X7 E1 d* E. }7 y
B. Sub过程中不能嵌套定义Sub过程
8 F9 L% M$ H. ^8 I u1 b1 mC. Sub过程中可以嵌套调用Sub过程 r" `) b' y/ s1 q2 F. Q
D. 事件过程可以像通用过程一样由用户定义过程名
3 ^; B- l7 U8 |; Z 满分：5 分
' F6 q1 O8 I% D$ W* a3. 关于Line语句正确的说法是
$ ?+ w; y( f3 DA. Line只能绘制直线
$ J% D9 n$ `/ s' G; s' jB. Line可以绘制矩形，但是不可以设置填充色
6 W) d; t3 S& O/ y# v8 nC. Line在绘制矩形，填充色由FillColor属性决定# ~* i3 ?) D6 u" W! y
D. Line在绘制矩形，填充色由forecolor属性决定
6 r: X4 k# h; X, i ? 满分：5 分
& W" M4 p6 K& a8 _( Y4. 以下不能在“工程资源管理器”窗口中列出的文件类型是( ?; H2 H. |- Y, ~$ a
A. .bas
+ b* \( B' F4 b" f3 U) ?# PB. .res% ?/ ^* s1 ?$ T% \4 K2 e+ ^) V; P( L
C. .frm, e( O" u' r1 A9 ]5 c* U: I0 ]
D. .bmp
9 Z% A+ h P5 i: H& a4 L 满分：5 分& L# x H- |* Z0 g+ D
5. 确定一个控件在窗体上的位置的属性是
4 B! [ G9 r, \! `A. Width和Height! }9 A1 v5 n& J: d: \8 q
B. Width或Height: l+ }, E, m5 v$ r& B* c6 F6 M
C. Top和Left
* o7 x N3 k3 ^& b! d# V' uD. Top或Left- F* y$ T! w1 ~ h( C6 |4 ]0 X% W
满分：5 分
9 I z$ U8 c" W0 x6. 在窗体上画一个名称为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该事件过程的功能是( {* f" ~) s% g7 f, N4 T% J
A. 输出n以内的奇数
8 u: ?1 K* Z# BB. 输出n以内的偶数
& v) m) y6 x& V fC. 输出n以内的素数
* c: L& D, `# \D. 输出n以内能被j整除的数" p R' v& Y7 c# Q7 y
满分：5 分$ |& h' [8 ]: O( T0 N" P" q
7. (2)以下叙述中正确的是7 h: L: w; D' L( r9 Y! B$ L" p
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体0 S d2 W% t7 ?* r& S) w. Z. a5 S) y
B. " 窗体的Name属性的值是显示在窗体标题栏中的文本"
3 V! w# C L7 Y8 q/ K3 M6 C+ ~+ SC. 可以在运行期间改变对象的Name属性的值
* I, p, f& g- Q* t0 l1 M! S( VD. "对象的Name属性值可以为空' S% u" r! [6 F. {3 i
满分：5 分$ o& D9 G B8 J: E
8. 关于记录操作的说明错误的1 u! d. N& t( ~5 h7 j3 m
A. 在通过Addnew增加记录后，需要调用Update方法更新数据库
4 g ^# a) C- V% n, f) w) P; `5 D$ LB. 在通过Delete删除记录后，需要调用Update方法更新数据库
) h5 R5 b' D7 q. Y8 EC. 在通过Delete删除记录后，需要调用movelast或movenext方法7 M. P+ p8 w6 L5 V9 h2 U
D. 在通过Edit编辑记录后，需要调用Update方法更新数据库5 C) ]- Q% X+ ~: T- T2 q) R3 n
满分：5 分
* J1 s" h2 _, c4 u0 K9. 在窗体上画一个名称为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程序运行后，单击命令按钮，在文本框中显示的值是
5 B! A* R; S: \0 @$ y9 r! H7 LA. 2. f& ]4 ?$ G! Q5 z1 D& K
B. 34 _# O% g0 N, Q5 @( ~- K. i
C. 4& N# I9 e) y! U0 L6 m
D.
! c, v p0 i. w/ c. \; s9 t 满分：5 分. x' @. J% M1 T1 C) M! ~* c% O
10. 假定窗体上有一个文本框，名为Txt1，为了使该文本框的内容能够换行，并且具有水平的垂直滚动条，正确的属性设置为（ ）
, j6 J2 ?) {$ x# S: Z* S8 F9 y9 K/ qA. Txt1.MultiLine = True : Txt1.ScrollBars = 0 K& }: b+ p" v* I% c# Y5 e0 P
B. Txt1.MultiLine = True : Txt1.ScrollBars = 31 Q1 A6 {0 F: K5 c' {8 g$ f7 e
C. Txt1.MultiLine = False: Txt1.ScrollBars = 02 d$ ]+ O% m& C* V: c
D. Txt1.MultiLine = False Txt1.ScrollBars = 32 w, n8 E, h* [. Q/ m( h% A
满分：5 分4 `7 g' M4 A+ D
11. 设置图片框pic1大小随所加载图像大小变化的正确语句是! _9 p' }2 {# T
A. pic1.autosize =true
/ C; \8 `. R3 \4 tB. pic1.strech =true2 V9 o: D& q/ A( ?( B+ w+ w' m
C. pic1.drawmode =13 r9 G M! }& X& N# o( X
D. pic1. drawmode =2
- Z: N3 J, e9 a; G 满分：5 分
& v Q* S/ f; c12. 取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是) J! E! D! A% y' X5 q" P& x9 O
A. ControlBox
; t2 C _& \( W! A vB. MinButton; X% r1 T4 E/ T. Z( F9 f: Q
C. Enabled& y; K2 ?& T* C5 n& J. X2 e; `
D. MaxButton
# g. [. G2 X" a3 U( \6 H6 _ 满分：5 分4 ]; Y1 |$ D4 ]- n/ T: n
13. 实现MDI窗体mdiMainFrm中子窗体水平平铺的语句为7 X1 N% [) ^4 k* u& ~5 B
A. mdiMainFrm.arrange = 0% o0 p' Y) T; w' f: [9 @
B. mdiMainFrm.arrange = 12 {, z2 W- G, T! h/ X8 J
C. mdiMainFrm.arrange = 0
3 L0 m! ~- S; [: i% Q8 p" qD. mdiMainFrm.arrange = 0
* v& E9 G# ~9 T9 m4 M0 o I/ S: N' O 满分：5 分1 s7 @# P/ V0 u' v
14. 关于PaintPicture spic,dx,dy,dw,dh,sx,sy,sw,sh,rop语句正确的说法是; C, U1 [9 w4 u2 F4 n7 m8 X6 w
A. "dx,dy为传送源左上角坐标"
_% @' r4 \+ P# l g/ jB. "dx,dy为传送目标左上角坐标"
. G4 M* b2 b/ A8 n. }+ S% ZC. "sw,sh为传送目标的大小"
1 ?6 P) v7 g, c3 V* x" v+ Z% mD. "dw,dh为传送源的大小"* K5 Z; w! K6 W0 H
满分：5 分* g2 V; w/ T9 |" D
15. 若有如下定义：Dim fs As New FileSystemObject, f As File现在要引用C盘根目录下存放的文件text.txt，可以使用的代码是（ ）
1 O/ c9 @/ q! V$ OA. f=fs.GetFile(“c:\text.txt”)
: g4 ]5 X6 R3 L+ _B. Set f=fs.GetFile(“c:\text.txt”)
5 q( I" b$ k! M# ~0 p! ?% C ZC. f=fs.GetFile(“text.txt”)
/ N6 ~0 ^' e' ` B$ YD. Set f=fs.GetFile(“text.txt”)8 o" C) ^+ K! N, g' T' _
满分：5 分$ G4 ?* a3 q0 t+ z4 k
16. 在窗体上画一个名称为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程序运行后，如果单击命令按钮，则在文本框中显示的内容是
6 M; [4 w) t" t X: @A. 0) f4 h) Y& g* p
B. 12
( i$ w0 W% M( e( v" GC. Str(z)
/ m" d! a9 O- pD. 没有显示
/ m: C9 f! ~# |8 S' b) y 满分：5 分
* ^" q7 g4 \" V17. 如果在立即窗口中执行以下操作：a=8 <CR> (<CR>是回车键，下同)b=9 <CR>print a>b <CR>则输出结果是: k4 o& b. a% l- h% h
A. -1+ x1 R6 w* ?" E O
B. 0
* o5 w6 r* a2 ~5 t% {* ^" OC. FALSE
' r ~ ~: p% v' H8 o/ pD. TRUE
6 J7 R z) W* M& }: { 满分：5 分2 }+ _8 R G9 [, H2 q7 B: R
18. 以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)0 G1 ]9 {! \5 r
A. 32548.5
% y* c+ @ ~1 L7 q2 mB. "32,548.50"* X/ l' Q+ J% _% O& G, R' l8 V
C. "32,548.50"
4 n# j& l1 M4 y1 |9 _" dD. "32,548.50"
/ e0 X# L; i8 \0 O+ B% u 满分：5 分
# o8 k3 k, E( t) e1 i( e) s19. 以下叙述中错误的是
9 [2 b& t& B) V" x4 b0 V5 [. Z) W8 PA. 一个工程中可以包含多个窗体文件
$ J7 f& [8 C: UB. 在一个窗体文件中用Private定义的通用过程能被其他窗体调用
% l9 X' o6 _1 R- G0 p0 EC. 在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
; L1 n/ R( e7 x. ~' G- [4 TD. 全局变量必须在标准模块中定义
^- F( Q4 z8 j, \& J# ` 满分：5 分
n! G8 \9 Q5 Y2 D. Y! S) j20. 定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔
$ I: @, T4 [( j& I3 Q! t4 _% cA. 分 q! l5 @' Y) |: B
B. 秒( { _8 j6 j7 y( G
C. 毫秒1 X1 |; B4 B" K; I x. m
D. 微秒
l5 \8 I. j: C0 ~1 j1 O1 x 满分：5 分 - ?1 |% O/ S9 H2 `, r* f
+ K1 O1 ]' s, h* l9 t) w7 O7 e
|
|
IP卡
狗仔卡
发表于 2013-4-10 11:18:30
微信登陆 
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
客服一
