(1)在结构化设计方法中,生成的结构图(SC)中,带有箭头的连线表示
A)模块之间的调用关系
B)程序的组成成分
C)控制程序的执行顺序
D)数据的流向
(2)编写如下事件过程:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按"T"键,则程序输出的结果是
A)T T
B)t TC)T
t
D)t t
(3)在用菜单编辑器设计菜单时,不可缺少的项目是
A)快捷键
B)名称
C)索引
D)标题
(4)在Visual Basic中,要将一个窗体加载到内存进行预处理但不显示所使用的语句是
A)Hide
B)Show
C)Load
D)Unload
(4)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
x=-5
If Sgn(x)Then
y=Sgn(x∧2)
Else
y=Sgn(x)
End If
Print y
End Sub
程序运行后,单击命令按钮,窗体上显示的是
A)-5
B)25
C)1
D)-1
(5)假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:
Private Type animal
animalName AsString *20
aColor As String *10
EndType
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim rec As animal
Open "c:\vbTest.dat"For Random As #1 Len=Len(reC)
rec.animalName="Cat"
rec.aColor="White"
Put #1,,rec
Close #1
End Sub
则以下叙述中正确的是
A)记录类型animal不能在Form1中定义,必须在标准模块中定义
B)如果文件c:\vbTest.dat不存在,则Open命令执行失败
C)由于Put命令中没有指明记录号,因此每次都把记录写在文件的末尾
D)语句"Put #1,,rec"将animal类型的两个数据元素写到文件中
(6)在窗体上画4个文本框(如图所示)并用这4个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编写如下事件过程:
Private Sub Command1_Click()
For Each TextBox In Text1
Text1(i)=Text1(i).Index
i=i+1
Next
EndSub
程序运行后,单击命令按钮,4个文本框中显示的内容分别为
A)0 1 2 3
B)1 2 3 4
C)0 1 3 2
D)出错信息
(7)检查软件产品是否符合需求定义的过程称为
A)确认测试
B)集成测试
C)验证测试
D)验收测试
(8)在窗体上画一个名称为Command1的命令按钮。然后编写如下程序:
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer
For i=1 To 10
a(i)=i
Next
Call swap ( 【9】 )
For i=1 To 10
Print a(i);
Next
End Sub
Sub swap(b() As Integer)
n=Ubound(b)
For i=1 To n / 2
t=b(i)
b(i)=b(n)
b(n)=t
【10】
Next
End Sub
上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……。请填空。