奥鹏作业资料东大11春学期《可视化程序设计Ⅰ》在线作业二

久爱奥鹏晓林

东北大学
11春学期《可视化程序设计Ⅰ》在线作业二
单选题
1.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是___。
A. 工程资源管理器窗口
B. 工具箱窗口
C. 代码窗口
) _$ i7 R/ d1 f- S7 GD. 属性窗口
资料：C
9 O! a1 ]; y0 U6 ?* z2.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i=1 To 4x=4For j =1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是
& P+ e* ]$ Z8 M* S1 B0 ~% dA. 7
* I( o& B4 P0 t5 Y6 {B. 15
C. 157
  ?! H5 u2 [: r6 U1 E7 t2 q% fD. 538
% t) r9 _! M$ v0 I( Q, p& E资料：B
# j* k5 H7 W0 E) n' R7 _3.假定窗体上有一个Text1文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为
, j) }1 l" I( A2 D4 ?A. Text1.Alignment=1: Text1.BorderStyle=0
1 g4 A; D9 w: b. L' ^% w* T' R! PB. Text1.Alignment=2: Text1.BorderStyle=1
: |% k$ i; c% {5 B+ ~6 V# qC. Text1.Alignment=1 : Text1.BorderStyle=1
9 M3 ^, w/ e: m2 m8 ^) y. j+ GD. Text1.Alignment=2 : Text1.BorderStyle=0
资料：D
+ B% Q! D: b9 m" [4.在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是
A. "rivate Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd Sub Function F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function"
: V! ~: L0 M* X) Y$ b3 JB. "rivate Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd Sub Function F1(ByRef b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Function"
! Q. Z6 T6 I/ i# z/ S/ `2 AC. "rivate Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd Sub Function F1(ByRef b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd Function"
( J, v! U* a% M6 v' KD. "rivate Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd Sub Function F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function"
资料：B
5.以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)
5 O0 i- S9 W0 j4 J7 ?  [1 CA. 32548.5
B. "32,548.50"
C. "32,548.50"
D. "32,548.50"
$ @3 |0 j  P* C1 d% b7 E. \8 o资料：
( H7 O1 r; K7 H) n& v  t# a6.下面关于多重窗体的叙述中，正确的是（）
A. 作为启动对象的Main 子过程只能放在窗体模块内
B. 如果启动对象是Main 子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载窗体或加载哪一个窗体
C. 没有启动窗体，程序不能执行
D. 以上都不对
资料：
, Q- P2 d+ ^6 P0 T6 @, ]/ M7.下列叙述中正确的是
9 \1 W1 k5 |9 V! t: ~8 mA. 在窗体的Form_Load事件过程中定义的变量是全局变量
& ~; a* ?: f6 l5 P% |. YB. 局部变量的作用域可以超出所定义的过程
! ?' l+ G+ y. _( @4 uC. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程
D. 在调用过程时，所有局部变量被系统初始化为0或空字符串
资料：
: ]4 W# _" ^5 f; I. p8.(8)下列不能打开属性窗口的操作是（）
A. "执行“视图”菜单中的“属性窗口”命令"
1 b4 b$ ?! T, tB. "按F4键"
C. 按Ctrl+T
/ l+ |; i( x, z# nD. 单击工具栏上的“属性窗口”按钮
资料：
3 r/ p8 \0 o& X2 K! {' x1 P5 U4 {9.对窗体编写如下事件过程：Private Sub Form _MouseDown(Button As Integer, _ Shift As Integer, X As Single Y As Single)If Button =2 ThenPrint "AAAAA"End IfEnd Sub Private Sub Form _ MouseUp(Button As Integer, _ Shift As Integer, X As Single, Y As Single)Print "BBBBB"End
/ W3 ?) ~) j: K9 M; J2 P8 U% sA. AAAAABBBBB"
B. BBBBB
C. AAAAA
D. "BBBBBAAAAA"
$ A  z3 e) H9 }( ^  m+ F资料：
10.在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程rivate Sub Command1_Click()a$="software and hardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,,b$,c$,1End Sub则在弹出的信息框的标题栏中显示的信息是
% A0 k' O2 t( ^: {7 E4 tA. software and hardwar
! `0 Z. V0 j  `/ c8 T: X$ E5 VB. software
3 k1 Q5 K' ^; v2 W& gC. hardware
0 Y7 @- `% l3 m$ G4 O9 ?5 ED. 1
6 `# z5 z7 F* Y9 c* _! a# d; T资料：
4 O- j+ }: W3 w" W1 \11.在窗体上画一个文本框（其中Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Ttext1.Text=""Text1.SetFocusFor i=1 To 10Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是
A. 在文本框Text1中输出55
B. 在文本框Text1中输出0
C. 出错
5 [5 |  V& b6 u+ ?D. 在文本框Text1中输出不定值
, M8 @  D+ j( T* ^0 M! e) ~资料：
/ B6 }0 R4 _+ M8 R! O4 g/ j12.下列可作为Visual Basic变量名的是
& y2 H) i: M  V( M% R* D7 w4 LA.
# `$ V- z3 _$ R5 o8 _% {0 e/ LB. 4A
C. ?xy
D. constA
资料：
' Q8 o1 Y$ h2 r: V: ?! ^2 s13.以下程序的输出结果是Option Base 1Private Sub Command1_Click()Dim a(10),p(3) As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next IFor i=1 To 3k=k+p(i)*2Next iPrint kEnd sub
+ U& O# b- v, z6 X  ^A. 33
( m. q1 T0 b  E" sB. 28
( R2 s( Q2 E# ?7 |/ PC. 35
D. 37
资料：
' B4 v- U9 U  @* f! r2 e4 B14.一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称md1Func的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：Form1中定义的过程：Private Sub frmFunction1()……End SubForm2中定义的过程Public Sub frmFunction2()……End SubmdlFunc中定义的过程：Public Sub md1Function()……End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
7 z6 b6 d. T- H0 @" hB. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
3 A3 `& I4 J+ D4 w& yC. 上述三个过程都只能在各自被定义的模块中调用
- W2 y; o4 [$ O1 A1 [$ Q# h. y2 MD. 只有md1Function过程能够被工程中各个窗体或模块调用
5 K, j3 K) j6 j7 h. ^4 _1 J资料：
15.在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为
5 |7 ]  W( V8 M- Q$ r9 {. BA. A) For i=0 To List1.ListCount-1……
B. B) For i=0 To ListCount-1……Next
, P- C2 ~* w* N8 D; j& y0 HC. C) For i=1 To List1.listCount……Next
: V* U& M. f) j' G+ B& rD. D) For i=1 To ListCount……Next
资料：
/ ^: z- Q+ r5 C2 N" Q& N16.下面的变量名合法的是（）
4 B# M0 W/ j; H9 x( f- pA. k_name
B. k ame
C. name
5 x3 D( |4 y; b/ b" [D. k-name
* d9 R' x5 ]  a/ l( I+ `' I资料：
17.一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是
5 F+ ?* \6 y8 r' X8 p: EA. 变量X、Y的作用域相同
B. Y的作用域是Model1
C. 在Form1中可以直接使用X
D. 在Form2中可以直接使用X和Y
- s1 A) E; K( V资料：
3 C; }$ ^, m! c, F; }' f1 k" f% |18.下列不能打开菜单编辑器的操作是
" o7 H2 @- V4 H. _& [# O  c0 Y5 n: kA. 按Ctrl+E
; J5 L* R2 k9 _B. 单击工具栏中的“菜单编辑器”按钮
C. 执行“工具”菜单中的“菜单编辑器”命令
D. 按Shift + Alt + M
1 }" D/ }: A" M. ~3 h& d: z% [; Y资料：
19.有窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程rivate Sub Command1_Click()s=0For i=1 To 15x=2*i-1If x Mod 3=0 Then s=s+1Next iLabel1.Caption=sEnd Sub程序运行后，单击命令按钮，则标签中显示的内容是
A. 1
, G+ C5 x5 ~4 t  M. y; QB. 5
C. 27
# l& `2 z  h) G+ F% n7 T) u; sD. 45
! a1 _0 x" S2 t3 j" ?资料：
2 h2 _& N3 b( s20.在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer,n As Integerx=1n=0Do While x<20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别是
& t- y9 G8 A. G6 s& b) g! Z% qA. 15和1
2 w5 s! U. x3 d8 UB. 27和3
C. 195和3
D. 600和4
* _5 y  U7 m* w- R- ?- d资料：