单项选择题

阅读程序：
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

<上一题目录下一题>

热门试题

填空题

以下语句的输出结果【1】。 S$= China S$= Shanghai 。 Print S$

填空题

在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及 Caption属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按＜Enter＞键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”，如下图所示：如果存在，则在 Label2中给出提示“输入项已在组合框中”。请将程序补充完整。 Private Sub Combol_KeyPress(KeyAscii As Integer) If KeyAscii=13 Then For i=0 To Combol.ListCount-1 If Combol.Text= 【2】 Then Label2.Caption= 输入项已在组合框中 Exit Sub End If Next i Label2. Caption = 已成功添加输入项 Combol. 【3】 Combol. Text End If End Sub

相关试题