Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "3"
A(2) = "6"
A(3) = "9"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
A、10 B、19
C、16 D、17
出自:国家开放大学Visual Basic6.0程序设计