单选题有如下程序： Private Sub Form_Click() Dim i As Integer，n As Integer For i=1 To 20 i：i+4：n=n+i Ifi>10 Then Exit For Next Print n End Sub 程序运行后，单击窗体，则输出结果是
单选题设窗体上有一个文本框Text1和一个命令按钮Commandl，并有以下事件过程： Private Sub Commandl—Click() Dim s As String，eh As String s=“” For k=1 To Lea(Textl) ch=Mid(Text1，k，1) s=ch+s Next k Text1．Text=s End Sub程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是( )。
单选题编写如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=3：b=2
If a*b0
End Sub
程序运行后，单击命令按钮Command1，输出结果为
单选题运行如下程序Private Sub Command1_Click() Dim a(5, 5) As Integer For i = 1 To 5 For j = 1 To 4 a(i, j) = i * 2 + j If a(i, j) / 7 = a(i, j) / 7 Then n = n + 1 End If Next j Next Print n End Sub则n的值是( )
单选题如果在c盘当前文件夹下已存在名称为studata.dat的顺序文件，那么执行语句Open" c:/ studata.dat" For
Append As #1之后，将
A. 删除文件中原有内容
B. 保留文件中原有内容，并在文件尾填加新内容
C. 保留文件中原有内容，并在文件头填加新内容
D. 以上均不对
单选题假定有以下函数过程：
Function fun(S As String)
Dim S1 As String
For i=1 To Len(S)
S1=LCaes(Mid(S，i，1))+S1
Next i
Fun=S1
End Function
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim Str1 As String，str2 As String
Str1=InputBox("请输入一个字符串")
str2=Fun(str1)
Print Str2
End SUb
程序运行后，单击命令按钮，如果在输入对话框中输入字符串“AbCDefG，则单击“确定”按钮后在窗体上的输出结果为
____
。
单选题如下图所示的四个CheckBox中，可以选择的个数最多为_______。
单选题在窗体上画一个通用对话框，其名称为CommonDialog1，则下列与CommonDialog1.ShowOpen方法等效的语句是______。
单选题为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是
单选题以下变量名中合法的是
单选题在下列栈的基本运算中，不是加工型运算的是______。
单选题窗体上有名称为Command1的命令按钮和名称为Text1的文本框( )。 Private Sub Command1_Click() Text1．Text="程序设计"：Text1．SetFocus End Sub Private Sub Text1_GotFocus() Text1．Text="等级考试" End Sub 运行以上程序，单击命令按钮后( )。
单选题以下( )操作不能触发滚动条Change事件。
单选题以下合法的VB变量名是
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下：
Private Sub Command1_Click()
Dim s As String
Open"c:/File1.txt"For Input As#1
Open"c:/File2.txt"For Output As#2
Do While Not EOF(1)
Input#1,s
Print#2,s
Loop
Close#1. #2
End Sub
关于上述程序，以下叙述中错误的是______。
单选题窗体上有1个名为List1的列表框，其中已经输入了若干个项目(如图3所示)；还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有以下程序：PrivateSubCommand1_Click()DimstrAsString，sAsString，kAsIntegers=Text1str=""Fork=List1．ListCount-1To0Step-1IfInStr(List1．List(k)，s)>0Thenstr=str＆List1．List(k)＆""EndIfNextkIfstr=""ThenText2="没有匹配项目"ElseText2=strEndIfEndSub程序运行时，在Text1中输入“京"，单击命令按钮，则在Text2中显示的内答是()。
单选题以下关于变量作用域的叙述中错误的是
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a-1 End If a=a+1 Next j Next i Print a End Sub 程序运行后，单击命令按钮，输出结果是
单选题英文缩写DDE的含义是______。
单选题在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() AS=”VisualBasic” Print String(3，aS) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是