计算机软件技术基础 (1) 试题
学习中心专业学号姓名
一、判断题（共8题，每空2分，共计16分）
1、VB编译生成的可执行文件不再需要工程文件与各个模块文件。（ 0 ）
2、VB程序中不区分代码字符的大小写。（ 1 ）
3、当把浮点数赋给整型变量时，会出现溢出错误。（ 1 ）
4、在同一作用域中，变量名不能重复。（ 1 ）
5、日期时间型变量既可以保存日期值，也可以保存时间值，但不能同时保存日期和时间值。（ 0 ）
6、框架控件和形状控件都不能响应用户的鼠标单击事件。（ 0 ）
7、当定时器控件的Interval属性值为0时，会连续不断地发送Timer事件。（ 1 ）
8、一个菜单项是不是分隔条，由Caption属性决定。（ 1 ）
二、选择题（共10题，每题2分，共计20分）
1.多个语句可以书写在同一行上，但它们之间要加 A
A、：
B、；
C、，
D、、
2.在窗体Form1的Click事件过程中有以下语句：
Label1.Caption=”Visual BASIC”
设标签的原Caption属性值为默认值，则该语句执行之后该标签控件Name属性和Caption属性的值分别为 A
A、“Label1”、“Visual BASIC”
B、“Label1”、“Caption”
C、“Label”、“VisualBASIC”
D、“Label”、“Label1”
3.下面几对数据类型中，哪一对所占的内存大小一致： B
A、Integer、Single
B、 Integer、Boolean
C、 Date、Single
D、 Long、Variant
4.下面哪条语句可以正确地声明一个动态数组： B
A、 Dim A(n) As Integer
B、 Dim A(1 To n) As Integer
C、 Dim A() As Integer
D、 Dim A( , ) As Integer
5.如果在模块的声明段中有Option Base 0语句，则在该模块中使用Dim a(7,3 To 5)声明的数组有 C 个元素
A、 21
B、 28
C、 24
D、32
6.菜单控件没有下面哪一个属性： D
A、Caption
B、Checked
C、Enabled
D、Value
7.一个菜单项是不是一个分隔条，是由： B 属性决定的
A、 Name
B、Caption
C、Enabled
D、Visible
8.以下面哪种方式打开的文件，只能读不能写： D
A、 Input
B、Output
C、Random
D、Append
9.下列函数中，返回值是字符串的是： A
A、 Chr
B、 InStr
C、 Val
D、 Asc
10.调用一次Circle方法，不能绘制出下面哪个图形： D
A、圆弧
B、椭圆弧
C、扇形
D、螺旋线
三、填空题（共7题，每题2分，共计14分）
1、设有32块的物理存储区，每块1024字节，物理地址是 15 位。
2、存储器间接寻址方式指令中给出的是操作数地址所在的存储地址，CPU 需要访问
内存两次才能获得操作数。
3、一般的程序设计语言的定义都涉及语法、语义和语用三个方面。其中描述如何用
语言基本符号组成程序中各个语法成分的一组规则称为语法。
4、乔姆斯基(Chomsky)把文法分成四种类型，其中2型文法又称为上下文无关
文法，
3型文法又称为正则或正规文法。
5、编译方式与解释方式的根本区别在于是否生成目标代码。
6、在网络的拓扑结构中，中心结点的故障对星型拓扑结构危害最大。
7、1000 BASE-T标准，使用5类非屏蔽双绞线，双绞线长度可达到 100M 。
四、读程序写结果（本题共10分，共2小题，每小题5分）
1.下面程序段执行完毕，窗体上显示的结果是什么？
Dim b As Single,k As Integer
b=0.2
p=100
n=0
Do
p=p*(1+b)
n=n+1
Loop until p>200
Print p,n
答：207.36 4
2.下面程序段在窗体上输出的是什么？
Dim i As Integer, j As Integer
Dim k As Integer
For i=1 To 10 Step 3
For j=0 to 10
If j>=5 Then i=i+4:Exit For
j=j+1
k=k+1
Next
If i>8 Then Exit For
Next
Print i,j,k
答：12 6 6
五、程序题（共4题，每题10分，共计40分）
1.编写递归函数求1+2+3+……+m的值。
答：
Private Function Add(n As Integer) As Integer
If n = 1 Then
Add = 1
Exit Function
End If
Add = m + Add(m - 1)
End Function
2.设一窗体上有文本框、按钮、列表框各一个，在文本框中输入任意一个英文句子（包含多个词），单击按钮，程序将该句分解为单词，每一个单词作为一个条目添加到列表框中。
答：dinmPrivate Sub Command1_Click()
Dim kk As String, j As Integer
List1.Clear
kk = Trim(Text1.Text)
j = InStr(1, kk, " ")
While j > 0
List1.AddItem Left(kk, j - 1)
kk = Right(Trim(kk), Len(kk) - j)
j = InStr(1, kk, " ")
Wend
List1.AddItem kk
End Sub
