单选题假定有如下情况语句：Select Case X能表示|X|>5的Case子句是
单选题要存放如下矩阵的数据，在不浪费存储空间的基础上，能实现声明的语句是 1 2 3 2 4 6 3 6 9
单选题要使得文件列表框File1中只显示文件扩展名为.jpg的图片文件，则下列正确的语句是
单选题设有如下程序代码： Private Sub Commandl_Click() Dim Sname As String，SNo As String，Score As Single Open”D：＼Score．txt"_______As#1 SNo=InputBox(”输入学号：”) Sname=InputBox(”输入姓名：”) Score=Val(InputBox(”输入成绩：”)) Print#1，SNo，Sname，Score Close#1 End Sub 以上程序的功能是，向文件D：＼Score．txt中写入一名同学的学号、姓名和成绩，当文件不存在时，则新建 该文件；当文件存在时，则覆盖原文件的内容。在横线处应填入的内容是( )。
单选题有如下程序：
Option Base 1
Dim arr() As Integer
Private Sub Form_Click()
Dim i As Integer, j As Integer
ReDim arr(3,2)
For i=1 To 3
for j=1 To 2
arr(i,j)=i*2+j
Next j
Next i
ReDim Preserve arr(3,4)
For j=3 To 4
arr(3,j)=j+9
Next j
Print arr(3,2); arr(3,4)
End Sub
程序运行后，单击窗体，输出结果为
单选题有如下程序 Private Sub Command1_Click() a = 100 Do s=s+a a=a+1 Loop While a＞120 Print a End Sub 程序运行后，单击命令按钮，其输出的结果为
单选题下列关于滚动条的叙述中，错误的是
单选题某人编写如下函数来判断a是否为素数，若是，则函数返回True；否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean If a＜2 Then isprime=False Else isprime=True k=2 Do While k＜a/2 And isprime If a Modk=0 Then isprime=False Else k=k+1 End If Loop End If prime=isprime End Function 在测试时发现有1个非素数也被判断为素数，这个错判的数是( )。
单选题下列关于随机文件中使用Put语句、Get语句、Print语句和Write语句的说法中，错误的是___________。
A.每执行一次Put #语句，会在随机文件中产生一个记录
B.每执行一次Get #语句，会在随机文件中读取一个记录的数据
C.一条Print #（或Write #）语句可以将若干个数据项写入数据文件中，但这些数据项类型必须是相同的
D.一条Print #（或Write #）语句可以将若干个数据项写入数据文件中，但这些数据项类型可以是不同的
单选题为了把窗体上的某个控件变为活动的，应执行的操作是（ ）
单选题设a=2，b=3，c=4，d=5，表达式Not a＜=c Or 4*c=b^2 And b＜＞a+c的值是
单选题定义无符号整数类为UInt，下面可以作为类UInt实例化值的是( )。
单选题下列语句的输出结果为 Print Format$(5689.36，"000，000.000")
单选题数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是______。
单选题设有如下的程序段：
n=0
For i=1 To 3
For j=1 To i
For k=j To 3
n=n+1
Next k
Next j
Next i
执行上面的程序段后，n的值为______。
单选题在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是______ 。
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：
Private Sub Form_Load()
Show
Text1.Text=""
Text2.Text=""
Text1.SetFocus
End Sub
Private Sub Text1_Change()
Text2.Text=Mid(Text1.Text,8)
End Sub
程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是______。
单选题在窗体上画一个名称为Text1的文体框，然后画一个名称为HScrolll的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是（）。
单选题设窗体上有Text1、Text2两个文本框，并编写了下面的程序代码：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z"Then
KeyAscii=KeyAscii+(Asc("a")-Asc("A"))
End If
n=0
If KeyAscii=13 Then
For k=1 To Len(Text1)
ch$=Mid(Text1, k, 1)
If "a"＜=ch And ch＜="z" Then n=n+1
Next k
Text2=n
End If
End Sub
程序运行时，在Textl文本框中输入“Visual Basic 6.0”后按回车键，则在Text2文本框显示的是
单选题以下关于Visual Basic程序模块的描述正确的是