单项选择题

阅读程序： Function Fun( a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Commandl _ 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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上添加一命令按钮，名称为Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为 Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1，2，3，4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub
A．4321
B．1234
C．34
D．12
单项选择题
设在窗体上有个文本框，然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef，Shift As Integer) Const Alt=4 ConstKey_F2=&H71 altdown%=(Shift And Alt)＞0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text= BBBBB End If End Sub 上述程序运行后，如果按[Shift+F12]，则在文本框中显示得是
A．Alt+n
B．BBBBB
C．随机出几个数
D．文本框平均内容无变化
相关试题