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

久爱奥鹏晓林

东北大学
( q0 b8 }4 V2 f1 M11春学期《可视化程序设计Ⅰ》在线作业三
# j! ]5 W' }7 o. f, e( A- o! C. `单选题
1.设在工程中有一个标准模块，其中定义了如下记录类型Type BooksName As String *10TelNum As String *20End Type在窗体上画一个名为Command1的命令按钮。要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是
* s5 t9 I' P2 n; `; v. P/ y, LA. "Private Sub Command1_Click()Dim B As BooksOpen “c:\Person.txt”For Output As #1B.Name=InputBox(“输入姓名”)B.TelNum=InputBox(“输入电话号码”)Write #1,B.Name,B.TelNumClose #1End Sub"
6 ^8 T- d2 R6 e* H, PB. "Private Sub Command1_Click()Dim B As BooksOpen “c:\Person.txt”For Input As #1B.Name=InputBox(“输入姓名”)B.TelNum=InputBox(“输入电话号码”)Print #1,B.Name,B.TelNumClose #1End Sub"
- e# L  Y6 d. Z3 V  IC. "Private Sub Command1_Click()Dim B As BooksOpen “c:\Person.txt”For Output As #1B.Name=InputBox(“输入姓名”)B.TelNum=InputBox(“输入电话号码”)Write #1,BClose #1End Sub"
D. "Private Sub Command1_Click()Open “c:\Person.txt”For Input As #1Name=InputBox(“输入姓名”)TelNum=InputBox(“输入电话号码”)Print #1,Name,TelNumClose #1End Sub"
, d7 P) i9 b. C资料：A
2.关于Line语句正确的说法是
8 |4 F" |* h* j4 i+ j6 N9 lA. Line只能绘制直线
B. Line可以绘制矩形，但是不可以设置填充色
C. Line在绘制矩形，填充色由FillColor属性决定
9 B) ^4 W9 D* nD. Line在绘制矩形，填充色由forecolor属性决定
7 I. D" u0 W9 a0 c# T3 X* E资料：C
4 @0 ?9 F' \" A$ X- ~" l3.下面的变量名合法的是（）
A. k_name
2 S5 ]: ~: Z) z& lB. k ame
8 c  u; H2 k# ]+ `C. name
5 {0 U  W7 e7 {9 ^D. k-name
资料：A
) G* O; J' C. \4.在窗体中添加一个列表框，然后编写如下两个事件过程： Private Sub Form_Click()List1.RemoveItem 1List1.RemoveItem 3List1.RemoveItem 2End SubPrivate Sub Form_Load()List1.AddItem "AA"List1.AddItem "BB"List1.AddItem "CC"List1.AddItem "DD"List1.AddItem "EE"End Sub运行上面的程序，然后单击窗体，列表框中所显示的内
A. AABB
6 ~; ?9 @, P0 F" d$ u% b# \B. DDEE
C. AACC
D. BBCC
资料：C
5.要从磁盘上读入一个文件名为“c:\filel.txt”的顺序文件，下面程序段正确的是（）
A.
B. "F=""c:\filel.txt""Open ""F"" For Input As # 2"
9 _$ O: ~1 g2 `* ~; a9 _% r& K1 BC. "Open ""c:\filel.txt"" For Output As # 2"
D. Open c:\filel.txt For Input As # 1
资料：
6.以下关于变量作用域的叙述中，正确的是
' K6 L* K+ u& c+ IA. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用
( f2 p; N1 _% v! r$ ~0 W+ D: s  i% kB. 全局变量必须在标准模块中声明
8 c* u/ A+ X# X- t/ ]C. 模块级变量只能用Private关键字声明
D. Static类型变量的作用域是它所在的窗体或模块文件
; i. s8 q4 w3 Z% n资料：
7.设置VB窗口frm1绘图所用线型调整为点划线的方法
A. frm1.DrawMode =1
B. frm1.BorderStyle =1
C. frm1.DrawStyle =3
D. frm1.DrawStyle =1
资料：
8.设置图片框pic1大小随所加载图像大小变化的正确语句是
A. pic1.autosize =true
B. pic1.strech =true
C. pic1.drawmode =1
D. pic1. drawmode =2
( V) E( U. d4 f* Y! g- A资料：
9.执行语句Open“Tel.dat”For Random As #l Len=50后，对文件Tel.dat中的数据能够执行的操作是
A. 只能写，不能读
B. 只能读，不能写
C. 既可以读，也可以写
% L2 o  C+ R; g6 s6 tD. 不能读，不能写
7 Y+ Y5 B% C  a# S; V资料：
) b$ U1 v; M( x2 [10.在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序： Private Sub Command1_Click( ) a=Text1.text b=Text2.text C=Lcase(a) D=Ucase(b) PrintC;D End Sub 程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是
A. abcEFG
; k2 Y3 s# g6 P' w) sB. abcefg
C. ABCefg
7 P8 ]) }+ m& S- d! K( g8 kD. ABCEFG
7 x0 a- Q% v8 ^资料：
11.阅读下面的程序段：For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的三重循环后，a 的值为
A. 3
B. 14
% Z- u( A6 s' \/ c; H1 eC. 21
D. 9
& l9 l; P$ A7 s$ H, a' o资料：
+ X6 Q6 c3 ]/ I12.(2)以下叙述中正确的是
, @8 T3 }6 e- R! }' xA. 窗体的Name属性指定窗体的名称，用来标识一个窗体
B. " 窗体的Name属性的值是显示在窗体标题栏中的文本"
7 Z# h+ h4 b1 n/ g1 O" v) qC. 可以在运行期间改变对象的Name属性的值
$ f8 V- F; w% b; yD. "对象的Name属性值可以为空
资料：
1 g1 J8 u5 P/ E" }7 }# ~  Y2 Q13.以下叙述中错误的是
A. 一个工程中可以包含多个窗体文件
B. 在一个窗体文件中用Private定义的通用过程能被其他窗体调用
2 s1 I9 s/ f9 B& ZC. 在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D. 全局变量必须在标准模块中定义
资料：
14.以下不能在“工程资源管理器”窗口中列出的文件类型是
& R0 g- P! C+ cA. .bas
5 _$ c2 T! @2 K, h- a5 y- kB. .res
C. .frm
D. .ocx
资料：
15.以下关于过程及过程参数的描述中，错误的是
; O& E( e/ ?. |* ~4 m/ ^A. 过程的参数可以是控件名称
# j0 C+ ^; @$ X# j* @) cB. 用数组作为过程的参数时，使用的是“传地址”方式
, ]3 E+ \8 w. C# I9 q8 c5 ?- ~C. 只有函数过程能够将过程中处理的信息传回到调用的程序中
0 ?5 _' t8 m% e& a" iD. 窗体可以作为过程的参数
资料：
3 j+ I0 m. F% w' d16.设置一个检查框所代表选项的选中状态，应当在属性窗口中改变的属性是（ ）
, B6 r: W1 E  t- p; e/ M* KA.
B. Name
9 N( ]$ L( U5 m: Y" _C. Text
D. Value
$ G1 X% [9 O  P资料：
8 S, _0 B- o5 c. c17.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()x=0n=InputBox("")For i=1 To nFor j=1 Toix=x+1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是
A. 3
B. 4
C. 5
D. 6
资料：
18.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub
% T5 |) s2 {" k. VA. 命令按钮移动到距窗体左边界、上边界各500的位置
7 x$ I5 s, D$ _B. 命令按钮移动到距窗体左边界、上边界各500的位置
. d& L! O" {. `& ~/ h2 `C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
$ n: u& |# R2 _6 I) L. f! E! I资料：
19.实现子窗体frmNewDoc自动加载的方法是
A. frmNewDoc.show
. t7 j0 d- C! M& s. e; yB. frmNewDoc.autoshowchildren=true
# [7 l+ ~% {( t" N* b# b4 l) }3 a7 oC. frmNewDoc.visible=true
8 |( b; P1 W" U: h7 t& J+ KD. frmNewDoc.Enable=true
资料：
20.设有如下的记录类型Type StudentNumber As StringName As StringAge As IntegerEnd Type则正确引用该记录类型变量的代码是
, l. ]4 c- S6 W3 f! r. gA. "Student.name=""张红"""
B. Dim s As Student
C. "Dim s As Type Student s.name=""张红"""
D. "Dim s As Types.name=""张红"""
资料：