题目内容
（请给出正确答案）
[单选题]
有程序段如下Private Sub Form_Click（)Dim I As IntegerI = I + 1Print IEnd Sub 当第三次单击窗体时打印出的I值为（）
A.0
B.1
C.2
D.3
提问人：网友lixin080108
发布时间：2022-01-07
如搜索结果不匹配，请 
A、25
B、36
C、49
D、81
题目内容
（请给出正确答案）
您可能会需要：
安装简答题APP，拍照搜题省时又省心！
更多“有程序段如下Private Sub Form_Click()…”相关的问题
第1题
下面程序： Private Sub Form_Click() Dim a(100) As Integer For i = 1 To 10 j = i * i a(j) = j Next i Print a(25) End Sub 运行后，单击窗体，则输出的结果是（ ）。
第2题
阅读下面的程序， class BaseClass { private static int CallCounter; static BaseClass() { CallCounter=2; Console.WriteLine("m={0}"， CallCounter); } public BaseClass() { CallCounter++; Console.WriteLine("n={0}"， CallCounter); } static void Main(string[] args) { BaseClass b1 = new BaseClass(); BaseClass b2 = new BaseClass(); BaseClass b3 = new BaseClass(); } } 程序运行的结果是什么？
第3题
PrivateSubForm_Click()DimA(1To3)AsStringDimcAsIntegerDimjAsIntegerA(1)="4"A(2)
PrivateSubForm_Click()
点击查看答案
DimA(1To3)AsString
DimcAsInteger
DimjAsInteger
A(1)="4"
A(2)="8"
A(3)="12"
c=1
Forj=1To3
c=c+Val(A(j))
Nextj
Printc
EndSub
写出程序运行时单击窗体后，窗体Form1上的结果。
第4题
阅读下列程序并写出程序运行结果。Private Sub Form_Click()Dim A(1 To 3) As StringDim c As I
阅读下列程序并写出程序运行结果。
点击查看答案
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "4"
A(2) = "8"
A(3) = "12"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
写出程序运行时单击窗体后，窗体Form1上的结果。
第5题
执行下面程序,当单击窗体时,显示在窗体上第一行的内容是 200 ,第二行的内容是 8 。 Private Sub Form_Click() Dim I As Integer, Sum As Integer For I = 0.5 To 8.5 Step 2.5 Sum = Sum + I * 10 Next I Print Sum Print I End Sub
此题为判断题(对，错)。
