单选题语句：Print Int(Rnd*5+20)的输出不可能是
单选题在窗体上有一个文本框控件，名称为TxtTime一个计时器控件，名称为Timer1，要求每1秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1 ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是 ______。
单选题设有一名称为txtName的文本框，则下列能使其具有输入焦点的语句是( )
单选题
单选题窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是( )。
单选题改变驱动器列表框的Drive属性值将激活______事件。
单选题文本框的Locked属性被设置为True后产生的效果是( )。
单选题在窗体上画一个单选按钮和一个复选框，其名称分别为Option1和Check1，然后编写如下事件过程：
Private Sub Option1_Click()
Check 1.Value=Option1.Value
End Sub
程序运行后，如果单击单选按钮，其结果为
单选题窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Dim c As String
c=UCase(Chr(KeyCode))
Text2.Text=Chr(Asc(c)+2)
End Sub
当向文本框Text1中输入小写字母a时，文本框Text2中显示的是______。
单选题窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框中删除。程序如下： Privat Sub Command1_Click() Dim In As Intger In=______ List.Remove In End Sub 则在程序的空白处的语句是( ) A．List1.Index B．List1.ListIndex C．List1.Text D．List1.ListCount
单选题设有如下程序： Private Sub Command1_Click() Dim C As Integer， d As Integer c=4 d=InputBox(“请输入一个整数”) Do While d＞0 If d＞c Then c=c+1 End If d=InputBox(“请输入一个整数”) Loop Print c+d End Sub 程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、 9和0，则输出结果是
单选题以下关于菜单的叙述中，错误的是
A.在程序运行过程中可以增加或减少菜单项
B.如果把一个菜单项的Enabled属性设置为False，则可删除该菜单项
C.弹出式菜单在菜单编辑器中设计
D.利用控件数组可以实现菜单项的增加或减少
单选题为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把ScrollBars属性设置为______。
A.0
B.1
C.2
D.3
单选题当变量x＝2，y＝5时，以下程序的输出结果为 Do Until y＞5 x=x*y y＝y+1 Loop Print x
单选题下列叙述不正确的是( )。 A) 命令按钮的默认属性为Caption B) 标签的默认属性为Caption C) 复选框的默认属性为Value D) 滚动条的默认属性为Value
单选题以下关于函数过程的叙述中，正确的是
A. 函数过程形参的类型与函数返回值的类型没有关系
B. 在函数过程中，过程的返回值可以有多个
C. 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递
D. 如果不指明函数过程参数的类型，则该参数没有数据类型
单选题下列程序的执行结果为 Private Sub Command1_C1ick( ) Dim sl As String，s2 AS String s1="abcdef" Call lnvert(s1，s2) Print s2 End Sub Private Sub lnvert(ByVal xstr As String，ystr As String) Dim tempstr As Stdng i=Len(xstr) Do While i＞=1 tempstr=tempstr+Mid(xstr，i，1) i=i-1 Loop ystr=tempstr End Sub
单选题在窗体上画一个名称为Label1的标签和一个名称为List1的列表框，并在设计阶段向List1中添加若干列表项。程序运行时，当双击List1中的某个列表项时，在Label1中显示所选中的列表项，能实现上述功能的语句是______。
单选题窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下：Private Sub Command1_Click() CD1.Filter＝"All File|*.*|Text File|*.txt|PPT|*.ppt" CD1.FilterIndex＝2 CD1.InitDir＝"C：" CD1.FileName＝"default" CD1.ShowSaveEnd Sub关于上述过程，以下叙述中正确的是( )。
单选题下列语句正确的是 A) If x≠y Then Print "x不等于y" B) If x＜＞y Then Print "x不等于y" C) If x＞＜y Then Print "x不等于y" D) If x＜＞y Print "x不等于y/