单选题单击命令按钮时，下列程序段的执行结果为( )。
Private Sub Commandl_Click()
Print Funcl(24，18)
End Sub
Public Function Funcl(m As Integer，n As Integer)As Integer
Do While m<>n
Do While m>n：m=m-n：Loop
Do While m
单选题往窗体Form1上添加一个列表框控件List1，并编写如下代码：
Private Sub Form_Load()
For i=0 To 6
List1.AddItemi
Next i
End Sub
为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置List1的属性 ______。
单选题下列有关数据库的描述，正确的是
单选题工程资源管理器窗口中包含的文件类型有( )种。
单选题数据管理技术随着计算机技术的发展而发展。数据库阶段具有许多特点，但下面列出的特点中，______ 不是数据库阶段的特点。
单选题通过以下 ______ 窗口可以在设计时直观的调整窗体在屏幕上的位置。
A. 代码窗口
B. 窗体布局窗口
C. 窗体设计窗口
D. 属性窗口
单选题有如下程序： Private Sub Form_Click() Dim Check, Counter Check=True Counter=0 Do Do While Counter＜20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter, Check End Sub 程序运行后，单击窗体，输出结果为______。
单选题能够产生1到50之间(含1和50)随机整数的表达式是
单选题以下自定义数据类型的语句中，正确的是( )。 A) Type student ID As String * 20 name As String * 10 age As Integer End student B) Type student ID As String * 20 name As String * 10 age As Integer End Type C) Type student ID As String name As String age As Integer End student D) Type ID As String * 20 name As String * 10 age As Integer End Type student
单选题下列程序的输出图形是{{U}} {{/U}}。 For k=0 To
360 cr=Int(160*Rnd)
ang=-3.1415926/180*k Circle(2000, 2000), 500, cr, 0,
ang Next
A.一段彩色圆弧
B.一个彩色扇形
C.一个彩色空心圆
D.一个辐射状彩色圆形
单选题在窗体上添加一个命令按钮，名为Command1，事件过程如下，则执行结果是______。
单选题下列程序段的执行结果为______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer Fori=1 To 3 m(i.i)=i Next Fori=0 To 3 For j=0 To 3 x=x+m(i,j) Next Next Print x
单选题设有如下变量声明Dim timel As Date，为变量time1正确赋值的表达式是
单选题设工程中有2个窗体：Form1、Form2，Form1为启动窗体，Form2中有菜单。其结构如下表所示。要求在程序运行时，在Form1的文本框Text1中输入口令并按Enter键(Enter键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单项都可见；否则看不到“成绩录入”菜单项。为此，某人在Form1窗体文件中编写如下程序：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If Text1.Text="Teacher" Then
Form2.input.visible=True
Else
Form2.input.visible=False
End If
End If
Form1.Hide
Form2.Show
End Sub
菜单结构
标题
名称
级别
成绩管理
Mark
1
成绩查询
Query
2
成绩录入
Input
2
程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是______。
单选题设栈的存储空间为S(1：50)，初始状态为top=51。现经过一系列正常的人栈与退栈操作后，top=50，则栈中的元素个数为( )。
单选题在数据结构中，根据各数据元素之间前后件关系的复杂程度，一般将数据结构分成两类，它们是
A. 动态结构和静态结构
B. 紧凑结构和非紧凑结构
C. 线性结构和非线性结构
D. 内部结构和外部结构
单选题编写如下程序： Private Sub Command1_Click() Dim a(3，3)As Integer，s As Integer For i=l To 3 For j=1 To 3 a(i，j)=i*j+i Next i Next i s=0 For i=1 To 3 s=s+a(i，4-i) Next i Print s End Sub 程序运行后，单击命令按钮Command1，输出结果为
单选题下面程序的功能是输出100以内所有素数： Private Sub Command1_Click() For n=2 To 100 isprime=True：k=2 Do While k＜=n／2 And If n Mod k=0 Then isprime=False k=k+1 Loop If isprime Then Print n Next n End Sub 为使上面程序可以实现该功能，程序代码中横线处应填写的代码是
单选题在对下拉菜单（假设菜单名为mnuH）快捷键设置中以下不正确的是_________。
A.mnuH.Shortcut="F1"
B.mnuH.Shortcut="Ctrl+B"
C.mnuH.Shortcut="T"
D.mnuH.Shortcut="Del"
单选题对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为________。
A. log2n
B. n/2
C. n
D. n+l