D. ABC.SWF
19.信息系统软件开发瀑布模型包括系统规划、系统分析、系统设计、系统实施和系统维 护等几个阶段。下面各项工作中,属于系统实施阶段的是___(19)___ A.问题定义 B.可行性研究 C.系统测试 D.绘制E-R图
20.下列有关Micmsoft Word 2003和Microsoft Excel 2003软件的叙述中,错误的是___(20)___ A. 利用Word软件编辑文档,可以将其保存为TXT、DOC、RTF和HTM格式文件 B. 利用Word软件编辑文档时,可以统计选定文本的字符数
C. 在Excel软件中,可以打开(导入)TXT、DBF、HTML格式的文件(数据) D. Excel文件可以设置打开权限密码,但不可以单独设置修改权限密码
第二部分Visual Basic程序设计
一、选择题(用答题卡答题,答案依次填在21--30答题号内) 21.以下有关事件过程的说法中,正确的是___(21)___ A.所有的事件过程都是Sub子过程 B.所有的事件过程都没有参数
C.所有的事件都是由用户的操作直接引发的 D.事件过程不能使用Call语句调用执行 22.以下语句中,正确的是___(22)___ 。
A.List1.AddItem x,\ C.Text1.Text=x,\23.以下有关VB程序书写规则的说法中,错误的是___(23)_____ A.一行可以书写多条语句,语句间用\分隔
B.使用注释时,\可与注释语句定义符\互换使用 C.过长的语句,可使用续行标志\分写在多行上
D.代码输入时,可不用区分字母大小写,系统会将\保留字\首字母自动改为大写
24.设变量I和J是整型变量,K是长整型变量。I已赋值32763,J和K分别赋值5,若接着执行以 下语句,可正确执行的是___(24)___。 A.I=I+K B.J=I+K C.K=I+J+K D.K=K+I+J
25.以下关系表达式中,运算结果为False的是 ___(25)___ A.CInt(3.5)-Fix(3.5)>=0 B.CInt(3.5)-Int(3.5)>=0 C.Int(3.5)+Int(-3.5)>=0 D.Int(3.5)+Fix(-3.5)>=0
26.以下字符运算表达式中,其功能与函数Mid(s,i,i)相同的是___(26)___ A.Left(s,i) & Right(s,Len(s)-i) B.Left(Right(s,Len(s)-i+1),i) C.Left(Right(s,i),Len(s)-i+1) D.Left(s,Len(s)-i) & Right(s,i) 27.数学表达式的VB算术表达式为____(27)____ A.Sqr(x*y^3)+Abs(Exp(x)+Sin(x)^3/(x-y)) B.Sqr(x*y^3)+Abs((Exp(x)+Sin(x)^3)/(x-y)) C.Sqr(x*y^3)+Abs(Exp(x)+Sin(x)^3/x-y) D.Sqr((x*y)^3)+Abs((Exp(x)+Sin(x)^3)/(x-y)) 28.以下有关数组的说法中,错误的是___(28)___。 A.使用ReDim语句,可以改变任何数组的大小与维数 B.使用ReDim语句,可以定义一个新数组
C.使用ReDim语句重新定义动态数组时,维界表达式中可以采用变量 D.使用ReDim语句重新定义的新数组,既可比原数组大,也可比原数组小 29.以下有关Function过程的说法中,正确的是___(29)___ 。 A.函数名在过程中只能被赋值一次
B.如果在函数体内没有给函数名赋值,则该函数无返回值 C.如果在定义函数时没有说明函数的类型,则该函数是无类型的 D.执行函数过程中的Exit Function语句,将退出该函数,返回到调用点 30.以下有关文件用法的描述中,正确的是___(30)___ A.只有顺序文件在读写前需要使用Open语句打开 B.使用同一个文件号,可同时打开多个不同的文件
C.如果以Input方式试图打开一个不存在的顺序文件,则会出错
D.如果程序中缺少Close语句,即使程序运行结束,打开的文件也不会自动关闭 二、填空题(请将答案填写在答题纸的相应答题号内,每个答案只占一行)
1.运行下面程序,单击CmdRun,在窗体上显示a的值是___(1)___;b的值是___(2)___;i的值是___(3)___ 。 Option Explicit
Private Sub CmdRun_Click()
Dim i As Integer,a As Integer,b As Integer a=1:b=10
For i=a To b Step a+1 a=a+1 b=b+1 i=i+1 Next i Print a,b,i End Sub
2.执行下面程序,单击Command1,数组元素a(3,2)的值是___(4)___,a(1,2)的值是___(5)___,a(2,3)的值是___(6)___
Option Explicit Option Base 1
Private Sub Commandl_Click()
Dim n As Integer,i As Integer,j As Integer Dim a(3,3)As Integer,k As Integer n=3:k=1 i=n:j=(n+1)/2 a(i,j)=k For k=2 To n*n i=i+1:j=j+1
If i>n And j<=n Then i=1
ElseIf i<=n And j>n Then j=1
ElseIf i>n And j>n Then i=i-2:j=j-1
ElseIf i<=n And j<=n And a(i,j)<>0 Then i=i-2:j=j-1 End If a(i,j)=k Next k For i=1 To n For j=1 To n
Pic1.Print Right(\ Next j Pic1.Print Next i