单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写以下程序代码：Private Sub sub1(ByRef d(), ByRef m1 As Integer) Dim i As Integer m1 = d(LBound(d)) For i = LBound(d) + 1 To UBound(d) If m1 < d(i) Then m1 = d(i) Next iEnd SubPrivate Sub Command1_Click() Dim n1 As Integer n1=-1 Dim data() data = Array(10, 20, -20, 50, 15, -5) Call sub1(data(), n1) Text1.Text = n1End Sub程序运行过程中，当单击命令按钮Command1时，则在文本框Text1中显示的结果为( )。
单选题以下测试方法是白盒测试法的是
单选题窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click()Dimn%，k%n=Len(Text1.Text)Fork=0ToList1.ListCount-1IfLeft(List1.List(k),n)=Text1.TextThenList1.RemoveltemkEndlfNextkEndSub在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”，则只删除了“刘邦”、“刘备”两项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把Fork=0ToList1.ListCount-1改为Ａ)Fork=List1.ListCount-1To0Step-1Ｂ)Fork=0ToList1.ListCountＣ)Fork=1ToList1.ListCount-1Ｄ)Fork=1ToList1.LstCount
单选题软件生命周期的瀑布模型典型地刻画了软件生命周期的阶段划分，它将软件生命周期划分为8个阶段，并将它们归纳为3个时期，以下选项中， ______是正常的开发顺序。
单选题在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=InputBox("Enter an integer") y=InputBox("Enter an integer") Text1.Text=y+x End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入7和30，则在文本框中显示的内容是______。 A) 307 B) 37 C) 703 D) 出错
单选题在窗体上画一个命令按钮和两个标签，其名称分别为Command1、Label1和Label2，然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 To 10 a=a+1：b=0 Forj=1 To 10 a=a+1：b=b+2 Nextj Label1．Caption=Str(a)：Label2．Caption=Str(b) End Sub 程序运行后，单击命令按钮，在标签Label1和Label2中显示的内容分别是
单选题假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是( )。
单选题在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”，如图所示。现有如下事件过程：PrivateSubText1_Change()Text2.Text=Mid(Text1,1,1)EndSub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（ ）。
单选题命令按钮Command1的单击事件过程如下：
Private Sub Command1_Click()
Dim x As String
Dim y As String
X=InputBox("输入字母","输入")
y=IIf(UCase(x)＜＞"A","表达式1","表达式2")
Print y
End Sub
运行程序，单击命令按钮，在弹出的输入对话框中输入“a”，则以下描述中正确的是
单选题在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框中显示的内容为 ______ 。
单选题以下有关数组定义的语句序列中，错误的是______。 A) Static arr1(3) Arr1(1)=100 arr1(2)="Hello" arr1(3)=123.45 B) Dim arr2()As Integer Dim size As Integer Private Sub Command2_Click() size=InputBox("输入:") ReDimarr2(size) ...... End Sub C) Option Base 1 Private Sub Command3_Click() Dim arr3(3)As Integer ...... End Sub D) Dim n As Integer Private Sub Command4_Click() Dim arr4(n)As Integer ...... End Sub
单选题下列说法中，错误的是
单选题在窗体上画一个命令按钮，然后编写如下程序： Sub inc(a As Integer) Private Sub Command1_Click() Static x As Integer inc 2：inc 3：inc 4 x=x+a Print x： End Sub End Sub 程序运行后，第一次单击命令按钮时的输出结果为
单选题在下图中，要在窗体的标签Label1上显示“二级VB等级考试”字样，标签属性应设置为______。
单选题假设X的值是5，则执行以下语句时，可得到的输出结果是ABCDEF的Select Case语句是 ( )
单选题在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s；a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容，是 ______。
单选题以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是
单选题设a="Visual Basic"，则以下使b="Basic"的语句是
单选题下列表达式中值为-6的是
A. Fix(-5.678)
B. Int(-5.678)
C. Fix(-5.678+0.5)
D. Int(-5.678-0.5)
单选题以下关于图片框、图像框的叙述中，正确的是( )。