单选题下面列出的条目中，哪些是数据库技术的主要特点 Ⅰ．数据的结构化
Ⅱ．数据的冗余度小 Ⅲ．较高的数据独立性 Ⅳ．程序的标准化
A. Ⅰ、Ⅱ和Ⅲ
B. Ⅰ和Ⅱ
C. Ⅰ、Ⅱ和Ⅳ
D.都是
单选题阅读程序：
Private Sub Form_Click()
a=0
For i=1 To 15
a=a+j Mod 3
Next j
Print a
End Sub
程序运行后，单击窗体，输出结果是
单选题在文本框中输入字符时，通过( )事件过程可以得到字符的ASCII码值。
单选题下面描述中，不属于软件危机表现的是______。 A) 软件过程不规范 B) 软件质量难以控制 C) 软件开发生产率低 D) 软件成本不断提高
单选题为把圆周率的近似值3．14159存放在变量pi中，应该把变量pi定义为( )。
单选题在窗体上有一个名称为Check1的复选框数组(含4个复选框)，还有一个名称为Text1的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的文字罗列在文本框中(如图所示)。下面能实现此功能的事件过程是()。
单选题假定有如下的窗体事件过程：
Private Sub Form_Click()
a$="Microsoft Visual Basic"
b$=Right(a$，5)
c$=Mid(a$，1，9)
MsgBox a$，34，b$，c$，5
End Sub
程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是
单选题程序流程图中带有箭头的线段表示的是( )。
单选题18所列的菜单结构。 表2.18 标题 名称 层次 显示 大图标 小图标 apper bigicon smallicon 1(主菜单) 2(子菜单) 2(子菜单) 要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是
单选题在窗体上画一个名为Command1的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim M(10) As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M(2+M(x)) End Sub 运行程序，单击命令按钮，在窗体上显示的是
单选题运行以下程序后，输出的结果是 for i=1 to 3 cls print" i=",i； Next
单选题对于循环队列，下列叙述中正确的是
单选题Mid("Hello Everyone",7,3)的执行结果是( )。 A) yon B) every C) Eve D) one
单选题下列程序的执行结果为（ ）。
Private Sub Command1_Click()
Dim FirStr As String
FirSt="abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat(xStr As String)As String
Dim tempStr As String，strLen As Integer
tempStr=" "
strLen=Len(xStr)
i=1
Do While i<=Len(xStr)-3
tempStr=tempStr+Mid(xStr，i，1)+Mid(xStr，strLen -i+1，1)
i=i+1
Loop
Pat=tempStr
End Function
单选题使用ReDim Preserve可以改变数组的
单选题在窗体有一个水平滚动条名为Hscrolll，其属性设置如下： LargeCh8nge=15,
SmallChange=3, Max=100，Min=20，Value=45 现单击该滚动条向右的箭头，Value的值将变为
______。
A.45
B.60
C.48
D.100
单选题软件测试的过程是______。a．验收测试 b．集成测试 c．单元测试 d．系统测试
A.a、b、c、d
B.d、c、b、a
C.b、a、d、c
D.c、b、a、d
单选题以下程序段的输出结果是( )。
x=1
y=4
Do Until y>4
x= x * y
y=y+1
Loop
Print X
单选题已知变量x，y为整数型，且x=4，y=12，s为字符串型，且s=“a”，lblok为标签控件，下列赋值语句合法的是______。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a As Variant
Dim i As Integer, m As Integer, index As Integer
a = Array(-10, 23, -50, 90)
m = a(LBound(A))
index = LBound(A)
For i = LBound(A) To UBound(A)
If a(i) < m Then
m = a(i)
index = i
End If
Next i
Print index
End Sub
程序运行时，单击Command1，则在窗体上输出的结果是