单选题
单选题以下关于图片框控件的说法中，正确的是( )。
单选题能触发滚动条Scorll事件的操作是( )。
单选题已知学生关系是；学生(学号，姓名，性别，专业号，班长)，其中“学号”是主码，“班长”属性表示该学生所在班级的班长的学号，则学生关系是
______。
A. 是参照关系不是被参照关系
B. 是被参照关系不是参照关系
C. 既是参照关系又是被参照关系
D. 没有参照关系
单选题以下选项中，不合法的Visual Basic的变量名是______。
A.a5b
B._xyz
C.a_b
D.andif
单选题语句Print Sgn（-6^2）+ Abs（-6^2）+Int（-6^2）的输出结果是
单选题窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：PrivateSubTimer1_Timer()Fork=Line1.X1ToLine2.X1Step100IfShape1.Left+Shape1.Width＜Line2.X1ThenShape1.Left=Shape1.Left+100EndIfNextkEndSub运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是Ａ)把计时器的Interval属性设置为1Ｂ)把Fork=Line1.X1ToLine2.X1Step100和Nextk两行删除Ｃ)把Fork=Line1.X1ToLine2.X1Step100改为Fork=Line2.X1ToLine1.X1Step100Ｄ)把IfShape1.Left+Shape1.Width＜Line2.X1Then改为IfShape1.Left＜Line2.X1Then
单选题设a=4，b=3，c=2，d=1，下列表达式的值是( )。 a＞b+1 Or c＜dAnd b Modc
单选题以下叙述中错误的是( )。
单选题在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下程序：
Function Fun(x As Integer, y As Integer)As Integer
Fun=IIf(x＜y,x,y)
End Function
Private Sub Form_Load()
Command1.Default=True
End Sub
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=20
b=12
Text1.Text=Str(Fun(a,b))
End Sub
程序运行后，按Enter键，文本框中显示的内容为______。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Dim SW As Boolean
Function func(X As Integer) As Integer
If X < 20 Then
Y = X
Else
Y = 20 + X
End If func = Y
End Function
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As
Single)
SW = False
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = True
End Sub
Private Sub Command1_Click() Dim intNum As Integer intNum = InputBox("")
If SW Then
Print func(intNum) End If
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则 程序的执行结果为______。
单选题下列程序段的执行结果为( )。 Form1.Cls a="ABBACDDCBA" For i=6 To 2 Step-2 x=Mid(a,i,i) y=Left(a,i) z=Right(a,i) z=x&y&z Nexti Print z
单选题以下程序执行后，在窗体上输出的图案是
____
。
Form1.Cls
For a=1 To 5
Print Space(5-A) ;String(a,"*")
Next a
单选题对于长摩为n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是______。
单选题在窗体中添加一个命令按钮，并编写如下程序代码：程序运行后，消息对话框中显示______。
单选题窗体上有一个按钮和一个列表框(Sorted属性为True)，执行下列过程后的输出结果为______。 Private Sub Command1_Click() List1.Addltem"China" List1.Addltem"Great" List1.Addltem"Is"，1 List1.Addltem"!"，3 Print List1.List(2) End Sub
单选题设已经在“菜单编辑器”中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键的是( ) A．Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub B．Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) PopupMenu Bs End Sub C．Private Sub Form—MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) PopupMenu Bs,0 End Sub D．Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If(Button=vbLeftButton)0r(Button=vbRightButton)Then PopupMenu Bs End Sub
单选题设窗体上有一个List1列表框，其中的列表项如图所示。又编写了下面的程序代码：PrivateSubList1_Click()n=List1.ListIndexList1.RemoveItemnm=nIfn=List1.ListCountThenn=0EneIfList1.AddItemList1.List(n),mEndSub程序运行时，鼠标点击列表项“南京”，则产生的结果是
单选题不属于循环结构的语句是( )
单选题下列排序方法中，最坏情况下比较次数最少的是
____
。