单项选择题

阅读程序：
Function F(a As Integer)
b=0
Static c
b=b+1
c=c+1
F=a+b+c
End Function
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
Print F(

A．
Next i
End Sub
运行上面的程序，单击命令按钮，输出结果为 ______。A) 4 4 4
B．4 5 6
C．4 6 8
D．4 7 9
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String * 20 End Type Private Sub Command1_Click() Dim MaxSize，NextChar，MyChar Open D: temp female.txt For Input As # 1 Max Size=LOF(1) For Next Char=1 To MaxSize Seek # 1，NextChar MyChar=Input(1，# 1) Next NextChar Print EOF(1) Close # 1 End Sub 程序运行后，单击命令按钮，其输出结果为 ______。
A．True
B．False
C．0
D．Null
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编 写如下程序： Private Sub Command1_Click() Dim x，y，z As Integer x=5 y=7 z=0 Text1.Text= Call P1(x，y，z) Text1.Text；Str(z) End Sub Sub P1(ByVal a As Integer，ByVal b As Integer，c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是 ______。
A．0
B．12
C．Str(z)
D．没有显示
相关试题