单选题窗口上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commmand1_Click() x=InputBox(“Input”) Select Case x Case 1，3 Print”分支1” Case Is>4 Print”分支2” Case Else Print”Else分支” End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是
单选题下列叙述中正确的是( )。
单选题一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub frmFunctionl() ... End Sub Form2中定义的过程： Public Sub frmFunction2() ... End Sub md1Func中定义的过程： Public Sub mdlFunction() ... End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是 A) 上述三个过程都可以在工程中的任何窗体或模块中被调用 B) frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用 C) 上述三个过程都只能在各自被定义的模块中调用 D) 只有mdlFunction过程能够被工程中各个窗体或模块调用
单选题某人编写了下面的程序 Privme Sub Command1_Click() Private Sub pro(n As Integer) Dim a As Integer，b As Integer While(n>0) a=InputBox("请输入整数") Print n Mod 10；n=n＼10 b=InputBox("请输入整数") Wend pro a：pro b Print Call pro(a+b) End Sub End Sub 此程序功能是：输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之和的每一位数字。例如：若输入123和234，则应该输出： 3 2 1 4 3 2 7 5 3 但调试时发现只输出了前2行(即2个数的反序)，而未输出第3行(即2个数之和的反序)，程序需要修改。下面的修改方案中正确的是
单选题求1! +2! +……+10! 的程序如下： Private Function s(x As Integer) f=1 For i = 1 To x f=f * i Next s=f End Function Private Sub Command1_Click( ) Dim i As Integer Dim y As Long Fori=1 To 10 ______ Next Print y End Sub 为实现功能要求，程序的横线处应该填入的内容是( )。 A) Call s(i) B) Call s C) y=y+s(i) D) y=y+s
单选题组合框是文本框和( )特性的组合。
单选题阅读程序： Private Sub Command1_Click() Dim arr Dim i As Integer art=Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10) For i=0 To 2 Print arr(7-i); Next End Sub 程序运行后，窗体上显示的是( )。
单选题算法的时间复杂度是指( )。 A) 执行算法程序所需要的时间 B) 算法程序的长度 C) 算法执行过程中所需要的基本运算次数 D) 算法程序中的指令条数
单选题为了判断字符串变量ch中是否是一个大写字母，需要编写这样一个表达式：当ch中字符为大写字母时，表达式的值为True，否则为False。下面能正确实现这一目的的表达式是
单选题下面关于菜单的叙述中错误的是【 】
单选题在窗体上按顺序，分别画出变量按钮Command1、文本框Text1和Text2。为了将Text2的Tab顺序设置为第一，应将Text2的TabIndex属性设置为
单选题为了清除列表框中指定的项目，应使用的方法是
单选题下面关于标准模块的叙述中，错误的是______。
单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码： Option Base j Private Sub Command1_Click() Dim a a=Array(1，2，3，4) j=l For i=4 To 1 Step一1 s=s+a(i)*j j=j*10 Next i Print s End Sub 程序运行后，单击命令按钮，其输出结果是( )。
单选题下列对变量的定义中，不能定义a为变体变量的是 A) Dim a As Double B) Dim a As Variant C) Dim a D) a=24
单选题在窗体上画1名为Command1的命令按钮和1名Text1的文本框，再编写如下程序：
Dim ss As String
Private Sub Text1_KeyPress(KeyAscii_
As Integer)
If Chr(KeyAscii)＜＞""Then
ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Dim m As String, i As Integer
For i=Len(ss) To 1 Step-1
m=m+Mid(ss, i, 1)
Next
Text1.Text=UCase(m)
End Sub
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的是
单选题在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Commandl_click() CommonDialogl.Friter="AllFiles(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Executable Files(*.exe)|*.exe" CommonDialog1.FilterIndex=3 CommonDialog1.Show Open MsgBOX CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是( )。
单选题要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为( )。
单选题已知图片框Picturel中已装入一个图形，为了在不删除图片框的前提下，清除该图形，应采取的正确操作是
单选题当在滚动条内拖动滚动块时触发