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

久爱奥鹏晓林

东北大学
3 ]9 n$ \9 O2 K11春学期《可视化程序设计Ⅰ》在线作业二
单选题
: p: D! K9 K6 A4 u2 i3 s1.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是___。
0 k& Q" h" r2 i1 g0 @; UA. 工程资源管理器窗口
B. 工具箱窗口
: a8 x; d5 e; z2 C: `" LC. 代码窗口
. P8 R' q/ `. L" K: x- sD. 属性窗口
3 i: q& p, j0 t; U, U) W资料：C
- n7 v" W& {' w6 @& f2 q2.在窗体上画一个命令按钮，然后编写如下事件过程：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程序运行后，单击命令按钮，输出结果是
A. 7
% n. M( c0 X; n4 M/ h6 H% d% RB. 15
* {8 J" J  U8 `% W  WC. 157
D. 538
资料：B
3.假定窗体上有一个Text1文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为
A. Text1.Alignment=1: Text1.BorderStyle=0
B. Text1.Alignment=2: Text1.BorderStyle=1
$ ^) i% ~" Q: IC. Text1.Alignment=1 : Text1.BorderStyle=1
D. Text1.Alignment=2 : Text1.BorderStyle=0
资料：D
& V) n( K  {& T9 c% ]( h4.在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是
, o# X- A8 W) U0 D, s; l, VA. "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"
B. "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"
C. "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"
4 _, Y" f  |# o$ `; E; Z$ QD. "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"
4 C6 B5 @! `  `7 @资料：B
5.以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)
A. 32548.5
B. "32,548.50"
C. "32,548.50"
D. "32,548.50"
, A7 @( J; X3 ^+ x6 e3 [; y资料：
- L6 N2 \# n) k# w( P6.下面关于多重窗体的叙述中，正确的是（）
A. 作为启动对象的Main 子过程只能放在窗体模块内
B. 如果启动对象是Main 子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载窗体或加载哪一个窗体
3 |8 J# k" c: P+ NC. 没有启动窗体，程序不能执行
D. 以上都不对
资料：
/ m& {& T9 N9 X7.下列叙述中正确的是
; u* M) C- R; f, M* X3 K3 sA. 在窗体的Form_Load事件过程中定义的变量是全局变量
; g9 F! u* J9 I  \B. 局部变量的作用域可以超出所定义的过程
C. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程
! X1 }* O2 w' bD. 在调用过程时，所有局部变量被系统初始化为0或空字符串
$ X2 l4 j- l7 c5 g( Z$ w资料：
8.(8)下列不能打开属性窗口的操作是（）
A. "执行“视图”菜单中的“属性窗口”命令"
2 {, n. {  J! `0 R0 j: NB. "按F4键"
7 y2 p0 Q* _" `1 \C. 按Ctrl+T
; C; ]# B+ i  L. H* O' qD. 单击工具栏上的“属性窗口”按钮
; ]7 D% M, ^. i) ^5 \$ i资料：
5 i  t0 J1 w7 G3 b+ F9.对窗体编写如下事件过程：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
* L. K- g1 ]( _- I/ h( K* M$ w. jA. AAAAABBBBB"
; S$ n$ t1 a  f- B1 dB. BBBBB
C. AAAAA
# `. u" q0 ~) }0 lD. "BBBBBAAAAA"
资料：
: k5 y1 n# _. ~2 G10.在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程rivate Sub Command1_Click()a$="software and hardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,,b$,c$,1End Sub则在弹出的信息框的标题栏中显示的信息是
  s  [# ~+ X- B$ h% LA. software and hardwar
B. software
C. hardware
D. 1
8 V0 m& g7 h& D+ `! _8 N6 \) k, s资料：
11.在窗体上画一个文本框（其中Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Ttext1.Text=""Text1.SetFocusFor i=1 To 10Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是
A. 在文本框Text1中输出55
% n# S0 l2 t# jB. 在文本框Text1中输出0
C. 出错
: k6 A* }! X1 \( [3 jD. 在文本框Text1中输出不定值
资料：
12.下列可作为Visual Basic变量名的是
# ]' T/ t4 D8 L) Z0 bA.
+ ^3 U8 x! g/ N$ CB. 4A
& l; e8 N' t" O/ E( w& k0 k" TC. ?xy
D. constA
资料：
" {; ]% X; k  {! j13.以下程序的输出结果是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
# r0 j9 j$ C  ZA. 33
B. 28
" B* H' x; V2 c8 yC. 35
D. 37
资料：
14.一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称md1Func的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：Form1中定义的过程：Private Sub frmFunction1()……End SubForm2中定义的过程Public Sub frmFunction2()……End SubmdlFunc中定义的过程：Public Sub md1Function()……End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以
' ~+ H. A* X, `2 F/ zA. 上述三个过程都可以在工程中的任何窗体或模块中被调用
2 D) @) F, l( z( PB. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
& [, v# d! b2 Y, lD. 只有md1Function过程能够被工程中各个窗体或模块调用
资料：
+ c- r% T1 \3 y5 L# u" B15.在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为
: E& M" Z# h# q5 CA. A) For i=0 To List1.ListCount-1……
3 ]2 i; M* v, J& tB. B) For i=0 To ListCount-1……Next
8 i8 q8 G5 U# n+ bC. C) For i=1 To List1.listCount……Next
D. D) For i=1 To ListCount……Next
资料：
2 L) t) V5 R+ ^  x  k16.下面的变量名合法的是（）
9 q2 r. H; w3 bA. k_name
B. k ame
C. name
% h4 Q: }8 `9 Z. S* yD. k-name
资料：
17.一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是
, O* B8 G1 s: z9 X. T3 jA. 变量X、Y的作用域相同
B. Y的作用域是Model1
8 F( T$ D+ |' f+ f8 X  s4 _; JC. 在Form1中可以直接使用X
& H. L4 A0 j8 ~: lD. 在Form2中可以直接使用X和Y
资料：
0 _2 ]5 `; V) R8 J18.下列不能打开菜单编辑器的操作是
A. 按Ctrl+E
B. 单击工具栏中的“菜单编辑器”按钮
C. 执行“工具”菜单中的“菜单编辑器”命令
D. 按Shift + Alt + M
2 ^8 o  b3 y( Z资料：
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程序运行后，单击命令按钮，则标签中显示的内容是
" I9 p# d: P9 F6 VA. 1
( I! b# ^5 m" r: L* o& P4 HB. 5
/ _  l" z; q" o, b  n) ?C. 27
- L+ B, ]  N$ b& ]9 p- d- VD. 45
1 T9 z( k7 q8 h' [6 U资料：
20.在窗体上画两个名称分别为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程序运行后，单击命令按钮，在两个文本框中显示的值分别是
: X$ c# S) E2 n' l3 v% SA. 15和1
B. 27和3
C. 195和3
D. 600和4
. H9 g+ U9 l) Z6 X6 m$ {- J资料：