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

谋学网

一、单选题（共 20 道试题，共 100 分。）V 1.  确定一个控件在窗体上的位置的属性是
A. Width和Height
B. Width或Height
C. Top和Left
D. Top或Left
, F3 A# m) j* R1 p      满分：5  分
7 e2 L: r. m& l! Z. o5 o" O9 i2.  设置一个检查框所代表选项的选中状态，应当在属性窗口中改变的属性是（ ）
A.
% ^$ ?1 h* i6 I7 W) D0 W. q0 \8 c8 EB. Name
2 G4 h. D1 A1 `) j" G$ aC. Text
5 M* l% y* S, m8 }1 H# hD. Value
0 \7 Q" I1 t5 _$ o1 K5 G      满分：5  分
3.  设置图片框pic1大小随所加载图像大小变化的正确语句是
A. pic1.autosize =true
9 ]/ z4 M) G8 d4 F4 I1 Z; \9 yB. pic1.strech =true
5 T- R! d/ J+ N% O; K) H! R' vC. pic1.drawmode =1
- P( u- z% C4 k" ]4 H5 fD. pic1. drawmode =2
( A% O$ x0 b: L# |) C( m5 D6 y' Z      满分：5  分
* P, y7 @7 ?' M+ Q3 h4.  假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为
A. MenuItem. Enabled=False
B. MenuItem. Enabled=True
/ w* r  I5 g, uC. MenuItem. Visible=True
D. Menultem. Visible=False
" Q( c* T. P2 B/ n+ i      满分：5  分
0 k( |- }& W0 V! r5.  定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔
3 f! O- P5 Y5 `  a: n4 \A. 分
B. 秒
C. 毫秒
D. 微秒
      满分：5  分
6.  对窗体编写如下代码：Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后，按回车键，输出结果为
1 E& `3 U# x; bA. 48 4
B. 237 1
C. 498 5
& i6 B' h; K% Y: B& Y! QD. 498 4
      满分：5  分
7.  以下关于变量作用域的叙述中，正确的是
: Y( `( l9 ]: ^- I: cA. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用
B. 全局变量必须在标准模块中声明
' A% ~/ H8 _7 |+ b# l7 Q' SC. 模块级变量只能用Private关键字声明
D. Static类型变量的作用域是它所在的窗体或模块文件
      满分：5  分
8.  以下叙述中正确的是
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体
3 X, C# M9 f. ?; m- h2 t: }B. 窗体的Name属性的值是显示在窗体标题栏中的文本
C. 可以在运行期间改变对象的Name属性的值
D. 对象的Name属性值可以为空
      满分：5  分
9.  若要求在文本框中输入密码时在文本框中显示#号，则应在此文本框的属性窗口中设置
A. Text属性值为#
! ?/ i6 w4 T; s+ V; QB. Caption属性值为
+ C4 A4 U4 L3 \: ^# L2 y4 aC. #PasswordChar属性值为
5 a. e, P% K. Y4 uD. #PasswordChar属性值为真
      满分：5  分
10.  以下关于图片框控件的说法中，错误的是
A. 可以通过Print方法在图片框中输出文本
B. 清空图片框控件中图形的方法之一是加载一个空图形
C. 图片框控件可以作为容器使用
D. 用Stretch属性可以自动调整图片框中图形的大小
      满分：5  分
11.  语句Print 5/4*6\5 Mod 2的输出结果是
A. 0
8 s. s9 K5 V6 h0 R  @: i4 ?B. 1
C. 2
D. 3
3 d& D8 |; Y; h& k1 B      满分：5  分
0 H) {: I" L: Z+ y2 m: V12.  下列叙述中正确的是
A. 在窗体的Form_Load事件过程中定义的变量是全局变量
6 R% G/ w' U. G6 yB. 局部变量的作用域可以超出所定义的过程
C. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程
4 x( R7 [: p2 \& KD. 在调用过程时，所有局部变量被系统初始化为0或空字符串
: M  Y! m/ f" O, A      满分：5  分
2 K5 \+ V. Y+ Y  {# k13.  设a=“Visual Basic”，下面使b=“Basic”的语句是
$ d' c$ H% ?% Q3 H: C5 M. R: yA. "b=Left(a,8,12) "
B. " b=Mid(a,8,5)"
C. "b=Rigth(a,5,5)"
D. "b=Left(a,8,5)"
2 l1 R/ y- a; P% P      满分：5  分
1 l+ C& M7 s. V) h- g( o14.  下列叙述不正确的是（）
A. 驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框
" `8 u0 ~$ n- U. q9 dB. 驱动器列表框的Drive属性只能在运行时被设置
C. 从驱动器列表框中选择驱动器能自动变更系统当前的工作驱动器
+ z( P: k* |. V, }D. 要改变系统当前的工作驱动器需要使用ChDrive语句
      满分：5  分
6 F7 X3 G. }  X7 n! e9 z1 b15.  在窗体上画一个命令按钮（其NAME属性为Command1），然后编写如下代码:Option Base 1Private Sub Command1_Click() Dim a s = 0 a = Array(1,2,3,4) j = 1 For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10 Next i Print sEnd Sub运行上面的程序，单击命令按钮，其输出结果是
. E$ i5 }$ E; V" ]7 x/ p5 q' N$ C" lA. 4321
B. 1234
C. 34
' m4 `& j4 I8 B' h9 ^8 ]D. 12
      满分：5  分
+ T+ D0 E9 k1 b! Q16.  以下能够正确计算n!的程序是
A. Private Sub Command1_Click()n=5:x=1Dox=x*ii=i+1Loop While i<nPrint xEnd Sub
B. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<nPrint xEnd Sub
C. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<=nPrint xEnd Sub
  q- [" H" |7 E6 Y/ jD. Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i>nPrint xEnd Sub
8 W" p& x) Z' S/ L" e* L6 @      满分：5  分
17.  (3)刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是
, N2 E8 m8 ?, q5 D% v. V+ U) U, ^A. 单选按钮
B. 图片框
C. " 通用对话框
/ J& O5 D  A7 oD. "
E. 文本框
      满分：5  分
% l6 p  U, i6 d  `0 X18.  以下叙述中错误的是
0 v5 E5 q# m. r# a0 _0 pA. 在KeyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母(即具有相同的KeyCode)
" x5 q5 `1 Y; T" |9 t( M. a0 UB. 在KeyUp和KeyDown事件过程中，将键盘上的“1”和右侧小键盘上的“1”视作不同的数字(具有不同的KeyCode)
) L, \1 E3 V; E; XC. KeyPress事件中不能识别键盘上某个键的按下与释放
D. KeyPress事件中可以识别键盘上某个键的按下与释放
( V) m) h0 U( E5 L% m; P7 U- x      满分：5  分
19.  在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是
A. ") Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function"
& g4 p3 M5 Z, ^B. "Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function"
C. "Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function "
D. "Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
      满分：5  分
1 @* Y$ E0 j" M2 p  K/ O4 `4 c20.  为了把窗体上某个控件变成活动控件，应执行的操作是
A. 单击窗体的边框
B. 单击控件的内部
C. 双击控件
0 v' H  i# v2 H0 ?7 cD. 双击窗体
/ o* t: F9 H* W/ x  u5 [7 R, C* `      满分：5  分

3 j% C8 m1 _  p9 b+ w& @