奥鹏作业答案-谋学网

 找回密码
 会员注册

QQ登录

只需一步,快速开始

手机号码,快捷登录

VIP会员,3年作业免费下 !奥鹏作业,奥鹏毕业论文检测新手作业下载教程,充值问题没有找到答案,请在此处留言!
2020年07月最新全国统考资料投诉建议,加盟合作!点击这里给我发消息 点击这里给我发消息
奥鹏课程积分软件(ver:3.1)
查看: 1180|回复: 0

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

[复制链接]
发表于 2011-6-9 06:28:30 | 显示全部楼层 |阅读模式
谋学网
东北大学
+ l: a0 L  {  V! D1 L& u11春学期《可视化程序设计Ⅰ》在线作业三
4 n5 F5 D, o9 I6 c单选题
! M* b2 M0 J/ ?1.设在工程中有一个标准模块,其中定义了如下记录类型Type BooksName As String *10TelNum As String *20End Type在窗体上画一个名为Command1的命令按钮。要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是; ~/ [+ L- T' @0 A) D
A. "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"
# A% h! c6 P  N- n+ TB. "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"
, U, t) h! S5 _; w4 P0 B7 ?$ XC. "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"8 L- @# k( {! ^! B! h7 E& H
D. "Private Sub Command1_Click()Open “c:\Person.txt”For Input As #1Name=InputBox(“输入姓名”)TelNum=InputBox(“输入电话号码”)Print #1,Name,TelNumClose #1End Sub"
+ i$ X+ U, p' W; M- w' ^& v0 |9 C答案:A
6 W, M0 S. `; H, s/ j2.关于Line语句正确的说法是
- o  p7 @9 T3 f! V, D& [8 e! {: CA. Line只能绘制直线
1 H$ ~: n2 n- ^' y, OB. Line可以绘制矩形,但是不可以设置填充色; L" d) \  U& M# v
C. Line在绘制矩形,填充色由FillColor属性决定
3 ?: w* }9 Q( P& B  G* jD. Line在绘制矩形,填充色由forecolor属性决定
! ?' o' l" R2 s  B6 Y9 A0 y1 |) t答案:C
( |2 o9 y0 o% ?$ E1 G3.下面的变量名合法的是()
8 R0 K, y% a0 e- s. o1 K" pA. k_name6 `) P! M) i4 s8 h( S* J9 l
B. k ame$ _9 v1 ~) b/ `+ ]* G- j. e
C. name! n9 B0 t2 @+ q: H6 ^
D. k-name
. _' V8 x- B! z  _. [, u答案:A7 c0 ~- M1 Q* m5 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运行上面的程序,然后单击窗体,列表框中所显示的内
1 U9 J) k7 D1 }$ o; |A. AABB
) Q# Q/ {1 G4 {+ B' @% z  u, wB. DDEE5 P9 }/ i& B1 ]0 q# @& O' {
C. AACC
0 m, y9 y' ~  ^D. BBCC- J* O2 H0 B# g2 m& N# C
答案:C
# N( [3 k- Z- D0 e$ r( k# O5.要从磁盘上读入一个文件名为“c:\filel.txt”的顺序文件,下面程序段正确的是()
( l; V6 C% P! OA.
6 [% }* Q: K7 F0 UB. "F=""c:\filel.txt""Open ""F"" For Input As # 2"2 K( f$ B; m/ J& r5 B( m
C. "Open ""c:\filel.txt"" For Output As # 2"5 f$ h9 \# c: P5 _7 ]2 M. X
D. Open c:\filel.txt For Input As # 1
9 p& r0 ?6 D8 O答案:- {" g/ I; D2 e2 z* o% D" s
6.以下关于变量作用域的叙述中,正确的是# ~9 R8 D1 {" }" S$ d
A. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用
1 O# d- a1 G: i* u0 _5 WB. 全局变量必须在标准模块中声明
. p, z2 h) O+ C' u2 jC. 模块级变量只能用Private关键字声明* Q8 l& q9 f1 a& V6 G
D. Static类型变量的作用域是它所在的窗体或模块文件* ?) y9 A' C3 q. i, `0 U* _; r7 i
答案:
! r5 i% [$ C  ~$ r- I: {7 i2 C7.设置VB窗口frm1绘图所用线型调整为点划线的方法
3 l* P8 f. p, ]$ s. D  EA. frm1.DrawMode =16 m& A9 ?: i4 H+ i
B. frm1.BorderStyle =1
. Y4 S3 y% h# AC. frm1.DrawStyle =3
5 u; t3 Q& C' M# AD. frm1.DrawStyle =1% |2 l6 z) g! E" [( C$ j6 f
答案:; h& k* H" s8 m0 {( p0 z6 `
8.设置图片框pic1大小随所加载图像大小变化的正确语句是
! @. r. ^( y( J5 W: u  |" ^A. pic1.autosize =true/ F- P  Y& s2 L. \' W
B. pic1.strech =true
8 a3 C" o) ]3 W2 T4 J" XC. pic1.drawmode =1
0 ?; y- s' m) n* K# eD. pic1. drawmode =2
+ x# M5 Q' J5 {; s# ^# w7 o答案:$ ]1 c, a9 L. G6 j$ i$ w
9.执行语句Open“Tel.dat”For Random As #l Len=50后,对文件Tel.dat中的数据能够执行的操作是
7 \) i+ F. d% X: t! QA. 只能写,不能读
* T/ Y# Y. h3 `: dB. 只能读,不能写
+ S( m0 E; T# g0 ?, n' FC. 既可以读,也可以写
( N6 x$ M, C& f( @8 h& }( r) `D. 不能读,不能写
! y  J8 ]: \3 w$ G答案:
% r3 b& A  {- q4 ]/ Y* r+ ~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,结果是
" V# |' |; c4 m" h0 B6 CA. abcEFG# I( m$ v' P4 I
B. abcefg$ W9 [# q5 ~3 A" @' \% o+ \
C. ABCefg" d- o" X. u$ }- A5 c; B  V
D. ABCEFG# W& r) d( B0 H# Y
答案:
/ R' p6 [& B" h: q2 f6 s; q11.阅读下面的程序段:For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的三重循环后,a 的值为$ _4 n2 b5 V" V& I' s
A. 3
/ i2 ^& k$ N* d: b; SB. 14
7 E& M) b. m* I% f' gC. 21
; v$ g2 Q8 I  p: Q# I: D9 A' L' GD. 9+ J, G$ H5 }( [8 M/ v: u6 Q! m9 M
答案:1 O( k* T" `7 E4 F* c" u
12.(2)以下叙述中正确的是8 Y+ y  f, t' ^6 k. }/ z0 {. t
A. 窗体的Name属性指定窗体的名称,用来标识一个窗体
1 P/ S* R; _8 o! S" xB. " 窗体的Name属性的值是显示在窗体标题栏中的文本"
7 O2 K0 g8 K/ e% n* XC. 可以在运行期间改变对象的Name属性的值
3 O+ w: j: B) H& F4 d$ p5 hD. "对象的Name属性值可以为空% Z, K+ I) G! t1 T7 c
答案:$ P' R% k2 b# ]* p
13.以下叙述中错误的是
, L# d, h" o" O* [A. 一个工程中可以包含多个窗体文件2 p: e$ O) R' O8 b  A
B. 在一个窗体文件中用Private定义的通用过程能被其他窗体调用
: S5 e, U; f- OC. 在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件4 }( R8 D4 m6 p3 R! X
D. 全局变量必须在标准模块中定义
9 i! j( C3 h& a2 F" x" u答案:, w) H- k* y5 F; D% ?8 V; e& a
14.以下不能在“工程资源管理器”窗口中列出的文件类型是
2 z0 h5 ~3 @; d6 }) `% \9 x1 D3 W7 nA. .bas
8 g3 v0 L; `% p3 Q7 A- t; T" pB. .res/ E8 o3 _% ]/ a+ e9 L- `5 J
C. .frm
: C6 k( R' K; b2 H5 B2 x4 ?9 VD. .ocx7 b# Z6 n, l2 B% @
答案:8 h; x: `- B- ~+ E& h/ O
15.以下关于过程及过程参数的描述中,错误的是
2 N# @4 `  ]2 n" r3 ^- q$ k+ j) SA. 过程的参数可以是控件名称
2 p" v# @: u6 q9 AB. 用数组作为过程的参数时,使用的是“传地址”方式
7 }3 ]' f/ I4 c% m" YC. 只有函数过程能够将过程中处理的信息传回到调用的程序中6 f8 U- M0 ^& T9 y( w" ^- N
D. 窗体可以作为过程的参数
$ r% ]) _1 G9 U: J答案:
& S  t4 R# l7 [, K2 u* p16.设置一个检查框所代表选项的选中状态,应当在属性窗口中改变的属性是( ): S. E% P+ ]: h- e0 I- r
A. ! |+ P8 s" E' a  u" D6 l1 j, ]) P
B. Name/ E8 \2 \1 B1 L
C. Text
4 s. m& I0 k' H/ A: g. B. }6 ^1 |D. Value
2 `0 T! N$ ^5 G$ m答案:
$ i( D, T: j5 B. \! s( D4 y" P17.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1_Click()x=0n=InputBox("")For i=1 To nFor j=1 Toix=x+1Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是
/ O! S, t5 g6 C' u$ ~A. 3, a: e; W& i, _7 t6 j2 b
B. 4
2 \- B; X. H# _2 P' P, H4 mC. 5) c/ L3 T/ E% ?0 i" W/ I% _
D. 6; D% L% h- F; p8 Z& {% J, [
答案:$ R$ j. h% D% M; G5 \3 m
18.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Move 500,500End Sub0 ]( ]3 g$ `$ C. N  e1 t' a1 [
A. 命令按钮移动到距窗体左边界、上边界各500的位置
* C, q6 p! \$ j5 pB. 命令按钮移动到距窗体左边界、上边界各500的位置
0 D* d; ~: P3 sC. 命令按钮向左、上方向各移动500
3 \1 D/ o# @& K8 AD. 窗体向左、上方向各移动500
/ s% p' j* P+ h) M* b+ w答案:1 s6 m8 y( b; z' w3 r2 p
19.实现子窗体frmNewDoc自动加载的方法是
- Z8 {% B: J# E; q3 nA. frmNewDoc.show
! T7 P4 U! _5 a- A& @B. frmNewDoc.autoshowchildren=true
# W+ e! V- D7 r# c" CC. frmNewDoc.visible=true$ r( ^% b! D# L' f1 z
D. frmNewDoc.Enable=true
& j3 G( N% V' r$ ^! p* y答案:/ {+ Y; o! D1 Y  _. i/ U
20.设有如下的记录类型Type StudentNumber As StringName As StringAge As IntegerEnd Type则正确引用该记录类型变量的代码是
7 B& M, w0 \, g  \A. "Student.name=""张红"""! o$ ]& J+ Q: V9 x
B. Dim s As Student( B5 j# E( v+ y, J
C. "Dim s As Type Student s.name=""张红"""
$ y" \" o. J, G9 T& q, h: O9 oD. "Dim s As Types.name=""张红"""/ ^8 c- g" \* z  v; G
答案:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?会员注册

x
奥鹏作业答案,奥鹏在线作业答案
您需要登录后才可以回帖 登录 | 会员注册

本版积分规则

投诉建议
 
 
客服一
客服二
客服三
客服四
点这里给我发消息
点这里给我发消息
谋学网奥鹏同学群2
微信客服扫一扫
快速回复 返回顶部 返回列表