单选题窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Option Base 1 Private Sub Commandl_Click() Dim a％(3，3) For i=1 To 3 Forj=1 To 3 Ifi>4 Andj>1 Then a(i，j)=a(a(i—1，j-1)，a(i，j-1))+1 Else a(i，j)=i*j End If Next Next Print a(2，2)；a(3，3)End Sub 运行程序，单击命令按钮，窗体上显示的是
单选题以下控件中不是标准控件的是 ( )
单选题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim I, Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
Print Num;
Select Case Num
Case 12
Exit For
Case 58
Exit Do
Case 65, 68, 92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是______。
单选题若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是( ) A．用鼠标右键单击此按钮 B．按键盘上的Esc键 C．按键盘上的Enter键 D．用鼠标右键双击此按钮
单选题假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“等级考试”的语句为______。
A. Form1="等级考试"
B. Caption="等级考试"
C. Form1.Text="等级考试"
D. Form1.Name="等级考试"
单选题在命令窗口中，可用DO命令运行菜单程序的扩展名为( )
A..FMT B..MPR C..MNX D..FRM
单选题单精度浮点数的正值取值范围为______。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base1 Private Sub Command1_Click() d=0：c=10：x=Array(10，12，21，32，24) For i=l To 5 Ifx(i)>c Then d=d+x(i)：c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为
单选题设窗体上有一个Conunand1命令按钮，还有以下程序代码：Private Sub Command1_Click()Static x As Integerx=x+1Call proc(x)Print x，End SubPrivate Sub proc(a As Integer)Static xA s Integerx=x+aa=xEnd Sub程序运行后，3次单击命令按钮，则产生的输出是
单选题在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click( ) Dim Arr1(12)As Integer，Arr2(3)As Integer Dim Smm As Integer Sum=2 For i=1 To 12 Arr1(i)=i Next i For i=1 To 3 Arr2(i)=Arr1(i*i) Next i For i=1 To 3 Sum=Sum+Arr2(i) Next i Print Sum End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是______。 A) 16 B) 24 C) 32 D) 36
单选题在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Labell和 Command1，然后编写如下两个事件过程：
Private Sub Command1_Click()
strText=InputBox("请输入")
Text1.Text=strText
End Sub
Private Sub Text1_Change()
Labell.Caption=Right(Trim(Text1.Text)，3)
End Sub
程序运行后，单击命令按钮，如果在输入对话框中输入Visual，则在标签中显示的内容是
单选题在Visual Basic中，要将一个窗体加载到内存进行预处理但不显示所使用的语句是
单选题下列关于畋片框控件的语句中不正确的是( )。
单选题在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第-件事是______。
单选题图像框有—个属性，可以自动调整图像框的大小，以适应图像的尺寸，这个属性是 ______ 。 A) AutoSize B) Stretch C) AutoRedraw D) Appearance
单选题在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：
Private Sub Command1_Click()
Move 500,500
End Sub
程序执行时，单击命令按钮，实现的功能是______。
单选题窗体上有1个Timer1计时器，1个Shape1形状控件，还有下面程序代码：
Dim flag As Boolean
Private Sub Form_Load()
flag=True
Timer1.Enabled=True
Timer1.Interval=1000
End Sub
Private Sub Timer1_Timer()
If flag Then
Shape1.Height=Shape1.Height*2
Shape1.Width=Shape 1.Width*2
Else
Shape1.Height=Shape1.Height*0.5
Shape1.Width=Shape1.Width*0.5
End If
flag=Not flag
End Sub
执行程序所产生的效果是
单选题在窗体上画两个滚动条，名称分别为Hscrolll、Hscroll2;六个标签，名称分别为Label1、Label2、 Label3、Label4、Label5、Label6，其中标签Label4-Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是 ______。
单选题运行下列程序段后，显示的结果为 J1=23 J2=32 If J1＜J2 Then Print J2 Else Print J1
单选题在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程： Private Sub Form_Load0 List1.AddItem"Item 1" List1.AddItem"Item 2" Lis1.AddItem"Irem 3" End Sub Private Sub Command1_Click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后，单击命令按钮，其结果为( )。