单选题在窗体上画—个名称为Text1的文本框和—个名为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
单选题如果想对多个控件进行操作，正确的操作是______ 。
单选题要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为
单选题下列关于栈的叙述正确的是( )。 A) 栈按“先进先出”组织数据 B) 栈按“先进后出”组织数据 C) 只能在栈底插入数据 D) 不能删除数据
单选题文本框TextBox中的内容若要设置为用户不能修改，应设置( )属性。
单选题编写如下程序： Private Sub Commandl_Click() Dim x As Integer,y As Integer x=InputBox(”输入第一个数”)：y=InputBox(”输入第二个数”) Call f(x，y) Print x，y End Sub Sub f(a As Integer，ByVal b As Integer) a=a*2：x=a+b：b=b+100 End Sub 程序运行后，单击命令按钮Command1，并输入数值10和15，则输出结果为
单选题阅读程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。
单选题为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的( )属性设置为True。
单选题为了清除列表框中的所有内容，应使用的方法是： ______。
单选题设有以下循环结构
Do
循环体
Loop While ＜条件＞
则以下叙述中错误的是（ ）
单选题执行下面的程序段后，变量c的值为_______。 a=29
b=33 Select Case b/10
Case 0 c=a*10+b Case 1 To
9 c=a*100+b Case 10 To
99 c=a*1000+b End
Select Print c
A.29
B.2933
C.33
D.3329
单选题数据表文件CJ.DBF已经打开，共有10条记录，按关键字XM排序，执行命令SORT ON XM TO CJ后，屏幕将显示( )
单选题在程序代码中，将图片文件“abc.jpg”装入图片框Picture1的语句是__________。
单选题为了对多个控件执行操作，必须选择这些控件。下列不能选择多个控件的操作是
单选题编写如下事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为 ______。 A) 左 B) 右 C) 同时按下左、右 D) 按什么键都不显示
单选题满足“当x的值是偶数时为真，奇数时为假”要求的表达式是( )。 A) x Mod 2=0 B) Not x Mod＜＞0 C) (x/2*2-x)=0 D) Not (x Mod 2)
单选题单击命令按钮之后，下列程序代码的执行结果为______。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End Sub
单选题以下关于命令按钮的叙述中正确的是
单选题编写如下程序： Private Sub Commandl_Click() Dim mAs Integer,nAs Integer m=2：n=1 Select Case m Case 1 Select Case n Case1 Print”AAA” Case 2 Prinnt”BBB” Case 2 Print”CCC” End SelectEnd Sub 程序运行后，单击命令按钮Command1，输出结果为
单选题下列程序的输出结果为( )。 Private Sub Command1_Click() Dim a(20) For j=1 To 20 Step2 a(j)=j Next i Print a(1)+a(2)+a(3) End Sub