|
21春学期《可视化程序设计(VB)》在线平时作业2
+ V; S; e6 }& E: r k' `试卷总分:100 得分:100
& }7 }1 z8 F3 x5 ]一、单选题 (共 15 道试题,共 75 分)
/ T( Z* O( n- T1.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即 .txt文件),则正确的描述格式是()。" ~- M6 ~1 E3 J* }7 V! k, P
A.“text (.txt)|(*.txt)”
" B$ ` O5 X+ \B.“文本文件( .txt) | (.txt)”
" i( o; L4 a. y5 G. E) N- ZC.“text(.txt)||(*.txt)”
3 @3 U0 |& z9 v' U# j% ~D.“text(.txt)(*.txt)”; o& y }" [& |& u. J& i6 y
资料:A, w2 u% w; m1 Q
8 a0 m5 `) z' J! k* K- D4 I
2.为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是()。
o8 q% p2 y; U* J& QA.Value
& T& p$ v2 ?- B! {. k5 z1 m/ FB.Default
# q! {3 T4 g/ c H" HC.Cancel5 J( n$ l, ^6 ~
D.Enabled `! n4 d H4 b) c
资料:C) K0 r4 H# i. E3 I
% O, g8 C D" Y2 q
3.下列Visual Basic程序段运行后,变量s、t的值为()。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k
* D! W2 O$ h. W% y% ^A.2 2$ q g7 }4 W: j' [6 Z3 y
B.9 248 h- E, t- U/ c( u5 {. T* A
C.5 6
- s5 P4 h8 R/ s; u. _- r; nD.0 1
" R7 x% t! A- \( N/ j+ h资料:B0 {2 ^& ?9 b0 }$ H2 l: n1 {
+ m# s/ x- K2 T. a: G4.窗体能够响应的事件是( )。
+ \( X7 g/ F H& {; ` wA.ActiveForm8 t. Y' o8 x' ?& f* i
B.Drive
. F C8 ~( x$ ^7 b8 ?, _C.Load
+ ~% y# T5 z! l3 ^+ z7 ~2 iD.Change9 B& y) ` r; ^( N
资料:C
5 |9 w4 u4 b3 H7 |0 s+ W4 u+ I* @& ^ `+ n
5.正确定义实型变量的是( )。
; h0 R8 Z, p8 k& `4 g) p1 Y' yA.Dim I As Integer# T2 f/ C2 r$ g2 g
B.Dim Sum As Single4 c! y- |- z: T, d9 _$ o
C.Dim Name As String
8 d1 Z* k" I% ?7 C+ R4 z# R- K' sD."wjm="信息技术"5 V) G: e% f r% q
资料:
7 Z( V* }. @# u. r3 [/ Y1 \% K. X$ y Z4 h
6.设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应使用的语句是()
9 |' J, t- q: R V. `+ m L; a2 T* aA.menu1.Enabled=True3 D! K3 ?- f4 Z" n# c9 x
B.Munu1.Enabled=False2 B! p# M9 p# w. o( x* t
C.Menu1.Visible=True- a9 D8 x6 B3 D8 _' j
D.Menu1.Visible=False
: l; f& ^2 [3 ^/ F) j$ b/ b资料:
+ }4 T4 P3 ?" h/ w3 _; b' M% x/ u/ H$ D# E' F
7.在窗体上有一个文本框控件,名称为TxtTime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序如下: Private Sub Timer1_ () TxtTime.text=Time End Sub在下划线上应填入的内容是()。4 @( W4 P n/ N% _1 S3 v
A.Enabled$ F) M+ d# v- g+ G5 J7 ?) o* i3 j: [
B.Visible( q2 r8 X) k- C. s, {' H; v
C.Interval7 ~& Y" B, E! c& t- C
D.Timer& M# F4 [# `# Z& p) O; ~# m
资料:
4 e6 J/ c5 j8 L! V8 T% v# X, Q6 B) t8 [) J0 H. U4 B
8.假定X是数值型变量,由函数组成的表达式INT(X/2)=X/2的作用是( )。
8 u2 q% _. h+ x s9 ?0 \A.用于测试X是否偶数 j D) Y9 k V3 R
B.返回一个整数. n* U0 l5 w+ ?# W/ j
C.返回一个奇数
+ Q4 G: C2 K# N7 KD.用于测试X是否整数
9 @* a. ?2 i m' h" p资料:5 E/ E" r) }, {6 ]& N
4 }4 Z, v0 w0 d e/ g* p
9.设有语句:x=InputBox(“输入数值”,“0”,“示例”)程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是()。! e8 W1 ]; [' x* T7 ]
A.变量X的值是数值10
1 A9 d! Z3 ^; L/ n) Z8 n! l. tB.在InputBox对话框标题栏中显示的是“示例”9 O0 u% P, Y! b
C.0是默认值
( y: @4 a9 |0 r+ l5 u# Z" RD.变量X的值是字符串“10”; i! v$ E$ E+ O4 K! F; |
资料:1 Z8 h# k h* f# r) z" t8 s
+ T" W& Y! M3 P, L; \0 p2 m" Y# m9 R& r1 n
10.在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click() CommonDialog1.FileName ="" CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDial
" ?$ Z! h+ ^( K5 e' wA.该对话框被设置为“打开”对话框0 F9 e0 v. ]* o* ^
B.在该对话框中指定的默认文件名为空
/ \ Y2 c" f) i8 [C.该对话框的标题为VBTest
, l% r8 V& Q7 d# z9 Y- M1 y/ q$ eD.在该对话框中指定的默认文件类型为文本文件(*.Txt)
7 r+ v, h4 o6 u7 A资料:" w7 w8 n& f4 Z3 t ~
5 f/ J2 u( d( o; I& e* E" u" M7 s11.下面程序段运行后,变量x的值为( )。 x=3 y=77 Do x=x+2 Loop Until x>Sqr(y)5 d4 E. Z, k N) }4 h2 R
A.74 ^& m. z$ T$ E8 q& C% X8 c1 _+ d4 S
B.86 ^# z4 X9 c/ I
C.9
. ]: A! G0 E$ `! r: C, |' {D.10 ^ ] p3 \) t! r: Y
资料:4 k' p. I( W1 v: D( F& d1 \
, B6 \7 [( D/ v6 R12.单击命令按钮Command1必将调用已写在( )事件中的代码。
8 Q* O4 m3 d5 U5 \( ?A.LostFocus% l0 X: o2 D' H/ [7 [, X# ]
B.KeyPress
4 L* {/ i; h, J. ~4 A9 `% `) wC.Dbclick! @. d& C7 O; z8 v- O0 [
D.Click
% C6 s% O+ G) w资料:
3 o' r& ~ f9 Z5 K6 ~* F+ r6 A1 l) m. U8 V1 K& A3 e4 y; a
13.设a=“Visual Basic”,下面使b=“Basic”的语句是()。
) S# U! |; Z& D, LA.b=Left(a,8,12)3 G3 y2 u1 G) |+ I
B."b=Mid(a,8,5)"
; `& `* l, J8 [. DC."b=Rigth(a,5,5)"/ E$ M' o, [( W4 l* x& D. U/ I$ J
D."b=Left(a,8,5)"
+ |* R! Q+ B' c; O- K- d资料:
! S- h/ j0 S" g- v- x# c/ t4 O3 m3 w) ], X
14.以下不能在"工程资源管理器"窗口中列出的文件类型是( )。
* q# @2 M1 N/ u$ o9 z/ V$ nA..bas( ]6 J0 j6 p/ N9 X; {3 b* u& M
B..res
* D0 e1 D6 T; Z1 R! a9 K& p/ c- JC..frm
b! F) {6 Y3 W# {) _ ~- I$ BD..ocx4 S5 `! m# |1 I i3 n4 K. r9 `
资料:- o4 ]3 d$ d0 u6 T4 q- r2 V2 W5 G+ [
+ q- N O' o2 O0 I3 p! O! g15.设x=4,y=8,z=7,表达式x<y And (Not y>z) Or z<x的值是()。/ T1 \2 @3 T# {
A.1
. |( g+ c" Z! T8 v: D- QB.-1
; d3 g! J$ G# {9 S+ EC.TRUE
; E5 t! v' }& u3 E2 P; [2 eD.FALSE! k( d: D* N8 u- n
资料:
$ U/ G; B* T: \3 I. V
3 U$ C( ~! X6 r1 i' z二、资料来源:谋学网(www.mouxue.com) (共 5 道试题,共 25 分)3 d2 `, t8 s! {% V, s
16.OPTION EXPLICIT语句可以放在窗体模块的声明段中。, S+ v, x! L0 M8 p
资料:/ ?/ Z! u; j; k d
5 _% _! |0 a, c% [9 ^17.若一个工程含有多个窗体及标准模块,当工程中含有sub main 过程,则程序一定首先执行该过程。
' r+ W" }# A1 m) {+ A资料:+ m$ R4 U, P0 g4 y$ _
9 Q% p! q5 |% h8 t0 a9 I; [, }18.下列程序段的语法是正确的。 Redim a ( 2 , 4 ) …… Redim preserve a ( 2 , 8)1 X0 L& I: G7 ]8 K( S
资料:
3 b2 G* U! [3 v; C1 C c- y& m# `' k
19.name属性可以在属性窗口修改,也可以在代码中修改% k0 A! {! p0 W5 L4 V6 {. _
资料:- _5 I) M5 E) H! p$ m6 l, _. M1 v/ m
- S+ P# Q# [9 B1 j; e# }* a9 A8 {20.在VB中,“FOR计数变量=初值TO终值[STEP步长]”语句中的“步长”不能为0,否则造成死循环。0 l+ r* c+ r8 a
资料:8 C/ C2 K& H. U! b/ L- \' ]
|
|