单选题若要将一个窗体从内存中清除，应该使用的方法是( )。
单选题设“A="87654321"”，则表达式Val(Left(A,4)+Mid(A,4,2))的值为( )。
单选题以下声明语句中错误的是______。
A.Cont Var1=123
B.Dim Var2='ABC'
C.DefInt a-z
D.Static var3 As Integer
单选题如果想让名为MenuItem1的菜单项在运行时变灰显示，则应执行( )语句。
单选题有如下函数：
Function fun(a As Integer, n As Integer)As Integer
Dim m As Integer
While a＞=n
a=a-n
m=m+1
Wend
fun=m
End Function
该函数的返回值是______。
单选题设“A="87654321"”，则表达式 Val(Left(A，4)+Mid(A，4，2))的值为( )。
单选题在菜单编辑器中建立如下图所示的菜单，并为每个菜单项编写了鼠标单击事件过程。关于此菜单，以下叙述中错误的是______。
单选题支持子程序调用的数据结构是( )。
单选题在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码： Option Base 1 Private Sub Command1_Click( ) Dim a s=0:j =1 a = Array(1,2,3,4) For i=4 To 1 Step -1 s =s +a(i) *j j=j * 10 Next Print s End Sub 运行上面的程序并单击命令按钮，其输出结果是
单选题下列程序段的执行结果为 ______。 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y＝X+3 Print X-Y；Y-X
单选题窗体上有一个名称为Command1的命令按钮。要求编写程序，把文件f1.txt的内容写到文件f2.txt中，然后将f1.txt删除。命令按钮的单击事件过程如下：
Private Sub Command1_Click()
Open"c:/f1.txt" For Input As #1
Open"c:/f2.txt: For Output As #2
Do While Not EOF(2)
Line Input #1.str1
Print #2.str1
Loop
Close Kill"c:/f1.txt"
End Sub
该程序运行时发生错误，应该进行的修改是
单选题在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。 Private Sub Option1_Click(Index AS Integer) Select Case______ Case 0 a="宋体" Case 1 a="黑体" Case 2 a="楷体 GB2312" End Select Text1.______=a End Sub
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Command1_Click()
Dim i As Integer, n As Integer
For i=0 To 50
i=i+3
n=n+1
If i＞10Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是______。
单选题为了在程序运行时弹出一个菜单，程序中应使用( )。
单选题窗体上有一个命令按钮Commalld1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command1_Click() Dim In As Integer In=______ List.Removc Ind End Sub 则在程序的空白行的语句是( )。
单选题关于自定义数据类型，下面叙述中不正确的是______。
单选题下列有关过程的叙述中错误的是( )。
单选题设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是
单选题三角形的构成条件是：任意2边之和大于第3边。设变量a、b、c是3条直线的长度，要求判断这3条直线能否构成一个三角形。下面有3个程序段可以正确判断，另一个不能正确判断的是
单选题在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是