东北大学13春学期《可视化程序设计(VB)》在线作业3

谋学网

一、单选题（共 15 道试题，共 75 分。）V 1.  设a=5,b=10，在执行c=int((b-a)*Rnd +a)+1语句后，求c值的范围为（ ）。
A. 5~10
/ x7 {# }8 H* S  |* u' TB. 6~9
C. 6~10
8 U/ {8 f4 Y  [6 U  yD. 5~9
      满分：5  分
( m9 ^! y! _% [2 a6 t2.  以下Case语句中错误的是（ ）。
* K1 ^  @1 z; FA. Case 0 To 10
B. Case Is>10
C. Case Is>10 And Is<50
4 D. k. o8 `/ W* z2 ^& [" v+ xD. "Case 3,5,Is>10"
      满分：5  分
9 y- L! F/ h+ o! T. g, i( k3.  在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "沈阳") Print city(1) End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。
, q% F2 o" j/ e. w6 C' O0 j& ?A. 空白
B. 错误提示
' {. x% T+ P1 l- {6 x* xC. 北京
0 @5 M9 b2 @/ g' m$ VD. 上海
+ X" w0 z+ @" x5 j: }      满分：5  分
7 n  H7 ?1 S' @, x0 Y- t4.  设s=2,b=3,c=4,d=5 ，表达式Not a<=c Or 4*c=b^2 And b <> a+c的值是（ ）。
& O' H" a. ]* {7 a, ~A. -1
" K( _- ~. _+ p0 L5 _B. 1
; f- e) U1 u, R& jC. TRUE
D. FALSE
' B% t" e3 M, Q/ d' K; q  F- @      满分：5  分
5.  以下声明语句中错误的是（）。
8 U; f3 F! H; Q4 [6 }0 yA. Const var1=123
. g7 |7 o- a" iB. Dim var2 = 'ABC'
C. DefInt a-z
D. Static var3 As Integer
7 I/ ?; b. c6 X# o% k% f" r+ X      满分：5  分
6.  下列Visual Basic程序段运行后，变量s、t的值为（）。 s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k
A. 2 2
7 Y; m: h" l" g1 E7 cB. 9 24
C. 5 6
* [2 K2 y' k" f7 X* WD. 0 1
      满分：5  分
7.  以下不能在"工程资源管理器"窗口中列出的文件类型是( )。
# s+ S3 O( w8 N, S0 YA. .bas
8 C4 d0 d3 t5 H& uB. .res
6 Y% @# r" U8 w8 G8 D  Z; O3 MC. .frm
D. .ocx
      满分：5  分
8.  能显示窗体的方法是（ ）。
; `+ m! J) }1 ~1 }: ]5 |8 Q3 S, }A. Visible
B. Show
C. New
  F) Y6 G: H9 A; g% YD. Open
      满分：5  分
9.  窗体的MouseDown事件过程Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single)有4个参数，关于这些参数，正确的描述是（）。
A. 通过Button参数判定当前按下的是哪一个鼠标键
1 _, b4 U7 W" _! o/ v0 KB. Shift参数只能用来确定是否按下Shift键
C. Shift参数只能用来确定是否按下Alt和Ctrl键
* x9 Z/ s  m6 x. T' J- {* FD. "参数x,y用来设置鼠标当前位置的坐标"
' J, n2 V/ r4 o* m) ^( C      满分：5  分
10.  执行语句Open "Tel.dat" For Random As #1 Len = 50后，对文件Tel.dat中的数据能够执行的操作是（）。
A. 只能写，不能读
  X' {6 B" q# B8 u7 AB. 只能读，不能写
0 i  m# Q* x/ ~# h* L& mC. 既可以读，也可以写
D. 不能读，不能写
      满分：5  分
# P% d1 R- B+ {/ h11.  为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。
A. Value
B. Default
C. Cancel
5 E3 d, i" C3 h5 f' J, C, xD. Enabled
7 q" N, y; j* ^4 k5 d      满分：5  分
12.  函数Int(-3.6)的值是（ ）。
A. -3
B. 3
5 l* j9 A- z+ @4 I* WC. -4
; x) b* ~) `5 I% p" ~3 q, OD. 4
      满分：5  分
" ~& B$ w8 d! P; Q13.  下面程序段运行后，变量s的值为（）。 a=2:b=1:s=0 For i=10 To 6 Step-1 s=s+a c=a+b a=b b=c Next i
A. 10
B. 17
C. 6
D. 28
8 v1 @$ g' N/ c9 f: x      满分：5  分
14.  在窗体上画一个名称为File1的文件列表框，并编写如下程序： Private Sub File1_DblClick() x=Shell(File1.FileName,1) End Sub 以下关于该程序的叙述中，错误的是（）。
A. x没有实际作用，因此可以将该语句写为：Call Shell(File1,FileName,1)
B. 双击文件列表框中的文件，将触发该事件过程
C. 要执行的文件的名字通过File1.FileName指定
D. File1中显示的是当前驱动器、当前目录下的文件
      满分：5  分
15.  下面程序段运行后，变量a,b的值为（ ）。 a=3:b=4 IF a>b Then x=a:a=b:b=x
A. 3 4
B. 4 3
5 r7 J7 P- j2 ^! y! q1 CC. 3 3
, c' C; R8 h8 B  Q7 GD. 4 4
      满分：5  分

; J! x- A: ~/ X4 p  a二、判断题（共 5 道试题，共 25 分。）V 1.  鼠标左键单击“工具”菜单中的“菜单编辑器”菜单项就可打开“菜单编辑器”窗口。
A. 错误
4 W6 Q- ]5 v. P$ S7 @" [B. 正确
      满分：5  分
' w; c5 c2 I9 G, d2.  vb的窗体中凡被声明为Private的变量只能在某个指定的过程中使用。
A. 错误
B. 正确
      满分：5  分
3.  Visual Basic 应用程序只能以解释方式执行
+ X: a0 [, ?4 f. P6 kA. 错误
B. 正确
      满分：5  分
4.  当文本框失去焦点时，触发LostFocus事件
A. 错误
B. 正确
2 J5 Y9 R% m, J' M      满分：5  分
5.  “函数过程形参的类型与函数返回值的类型没有关系”的叙述是正确的。
7 E8 s/ ]8 U% {* D7 `- r3 c/ BA. 错误
B. 正确
      满分：5  分
# ?. H& p; c7 j3 P! W
) a) f6 J( a0 S