单选题设有如下事件过程：Private Sub Commandl_Click()Dim a Private Function fun(x，Y)As Integer a=Array(12，3，8，5，10，3，5，9，2，4) Do While x＞=y For k=1 To 9 x=x－y Print fun(a(k－1)，a(k))；""； Loop Next k fun=xEnd Sub End Function程序运行时的输出结果是
单选题以下程序执行后，在窗体上输出的图案是______。
Form1.Cls
For a=1 To 5
Print Space(5-a); String(a, "*")
Next a
单选题以下程序的功能是随机产生10个两位的整数：
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer, i As Integer
Randomize
For i=1 To 10
a(i)=Int(Rnd*100)+1
Print a(i)
Next i
End Sub
运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是
单选题在VB中，函数过程与子程序过程的区别之一是
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Sum=0 For x=1 To 5 Call sub1(x，s) Sum=Sun+s Next x Print Sun End Sub Private Sub subl(y，w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
单选题以下关于VB对象属性的叙述中，错误的是
单选题窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim num As Integer, x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case num
Case Is＞100
x=x+num
Case Is＜90
x=num
Case Else
x=x*num
End Select
Print x;
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为
单选题在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, y As Integera =10: y = 0do a=a+2:y=y+ a Print "a="; a; "y=", y if y＞20 then exit doLoop until a＞14End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
单选题在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
i=3:j=1
Do While i＞=0
s=s+a(i)*j
i=1-1
j=j*10
Loop
Print s
End Sub
运行上面的程序，单击命令按钮，则输出结果是______。
单选题图像框有一个属性，可以自动调整图像框的大小，以适应图像的尺寸，这个属性是 ______。
A. AutoSize
B. Stretch
C. AutoRedraw
D. Appearance
单选题窗体上有名称为List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是( )。
单选题概要设计使用的工具是______。
A.系统结构图
B.程序流程图
C.PAD图
D.数据流图(DFD图)
单选题在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
a=InputBox("Enter an integer")
b=Text1. Text
Text1. Text=b+a
End Sub
程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是______。
单选题假定有如下事件过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是( )。
单选题下列程序段错误的是()。
单选题窗体上有一个列表框和一个文本框，编写下列两个事件过程： Private Sub Form Load() List1.Addltem"北京" List1.Addltem"天津" List1.Addltem"上海" Text1.Text="" End Sub Private Sub List1 Click() Print Text1.Text+List1.Text End Sub 程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。
单选题用于获得字符串S最左边4个字符的函数是( )。 A) Left(S,4) B) Left(1,4) C) Leftstr(S) D) Leftstr(3,4)
单选题下列叙述中正确的是( )。
单选题激活菜单栏的快捷键是（ ）。
单选题有如下程序： Private Sub Form_Click() Dim i As Integer，Sum As Integer Sum=0 For i=2 To 10 If i Mod 2＜＞0 And i Mod 3=0 Then Sum=Sum+i End If Next Print Sum End Sub 程序运行后，单击窗体，输出结果为