单项选择题
阅读程序:
Function Fun(a As Integer)
Static C
b=0:b=b+2:c=c+2
Fun=a*b*c
End Function
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 2
Print Fun(A):
Next
End Sub
运行上面的程序,单击命令按钮,输出结果为( )。
A) 8 16
B) 9 18
C) 10 20
D) 7 14
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
设组合框Combol中有3个项目,则以下能删除最后一项的语句是( )。
A) Combol.RemoveItem Text
B) Combol RemoveItem 2
C) Combol.RemoveItem 3
D) Combol.RemoveItem Combol.Listcount
点击查看答案&解析
单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(10,10)As Integer,i,j As Integer For i=1 To 3 For j=2 To 4 arr(i,j)=i+j Next Next Text1.Text=arr(2,3)+arr(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
A) 12
B) 13
C) 14
D) 15
点击查看答案&解析
相关试题
以下程序段的功能是:依次自动将列表框List...