单选题设有如下程序： Option Base 1 Dim a(3，4)As Integer，b(4，3)As Integer Private Sub Command1_Click() 循环1 For i=1 To 3 For j=1 To 4 b(j，i)=a(i，j) Next j Next i 循环2 X=b(1，1) For i=1 To 4 For j=1 To 3 Print b(i，j)； If x
单选题在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写如下代码： Pfivme Sub Command1_Click( ) score=Iht(Rnd*10)+70 Select Case score Case ls＜60 a＄=“F” Case 60 T069 a＄=“D” Case 70 To 79 a＄=“C” Case 80 To 89 a＄=“B” Case Else a＄=“A” End Select Print aS End Sub 程序运行后，单击命令按钮，输出结果是
单选题下面关于菜单的叙述中正确的是
单选题下列描述中，错误的是
单选题单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click( ) Dim x As Integer, y As Integer x=12:y=32 Call PCS(x, y) Print x; y End Sub Public Sub PCS( ByVal n As Integer, ByVal m As Integer) n = n Mod 10 m=m Mod 10 End Sub
单选题设窗体上有一个图片框Picture1，要在程序运行期间装入当前文件夹下的图形文件File1.jpg，能实现此功能的语句是
单选题下列关于数据结构的基本概念的叙述中，错误的是 ______。
单选题在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1)，然后编写如下事件过程：
Private Sub Commandl_Click() x=Val(Text1.Text)
SelectCaseX Case 1，3
y=X*X
CaseIS＞=10，IS＜=-10 y=X
Case-10 To 10 y=-X
End Select End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是{{U}} {{/U}}。
A.执行y=x*x
B.执行y=-x
C.先执行y=x*x，再执行y=-x
D.程序出错
单选题下列选项中不属于面向对象程序设计特征的是
单选题编写如下程序：Private Sub Form_Click() Dim a a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) n = InputBox("请输入一个小于10的正整数") i = UBound(a) For k = n To (i - n) / 2 + n x = a(k) a(k) = a(i) a(i) = x i = i - 1 Next k For k = 0 To UBound(a) Print a(k); Next kEnd Sub程序运行后，单击窗体，并输入4，则输出结果是
单选题以下( )程序段可以实施X、Y变量值的交换。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim sum1 As Integer Dim a(1 To 20)，x For i = 1 To 10 a(i)=i Next i For Each x In a If x Mod 2 = 0 Then sum1=sum1+x Else sum = sum+x End If Next x Print sum；sum1 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
x=-3
If Sgn(x)Then
y=Sgn(x^2)
Else
y=Sgn(x)
End If
Print y
End Sub
程序运行后，单击命令按钮，其输出结果为 ______。
单选题单击窗体上的关闭按钮时，触发的事件是（ ）。
单选题要删除列表框中最后一个列表项，正确的语句是______。
A.List1.Removeltem ListCount
B.List1.Removeltem List1.ListCount
C.List1.Removeltem ListCount-1
D.List1.Removeltem List1.ListCount-1
单选题如下关于变体类型变量的叙述中，错误的是( )。
单选题设窗体文件中有下面的事件过程： Private Sub Command1_Click() Dim s：a％=100：Print a End Sub 其中变量a和s的数据类型分别是
单选题当对象失去焦点时，将会发生______事件。 A) GetFocus B) LostFocus C) Focus D) SetFocus
单选题要在命令按钮控件上显示图像应( )。 A)设置Picture属性 B)实现不了 C)先将Style设置为1，然后再设置Picture属性 D)以上都不对
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim s1 As String, s2 As String Open "D:/data.txt" For Input As #1 Seek #1, 5 s1 = Input$(2, #1) s2 = Input$(3, #1) Print Seek(1) Close #1End Sub假设有磁盘文件D:/data.txt，且文件足够长，当程序运行时，单击Command1，在窗体上输出的结果是