得分 评卷人 三、阅读程序题（共25分） 阅读下列程序并写出程序运行结果 1.(6分) Private Sub Form_Click() Static a As Integer Dim b As Integer a=a+3 b=b+4 Textl a Text2 b End Sub 写出程序运行时连续单击三次窗体后，文本框Textl和Text2显示结果。 2.(6分) Private Sub Form_Click() n=0 For i=1 To 2 For j=2 To 4 If j Mod2◇0Then n=n+1 End If n=n+2 Next j Next i Print n End Sub 写出程序运行时单击窗体后，窗体Forml上的输出结果。 1379得 分 评卷人 三、阅读程序题 (共 25分) 阅读下列程序并写出程序运行结果 1. (6分) Private Sub Form-Click( ) Static a As Integer Dim b As Integer a= a+ 3 b = b + 4 Textl= a Text2= b End Sub 写出程序运行时连续单击三次窗体后，文本框 Textl和Text2显示结果。 2. (6分) Private Sub Form-Click() n = 0 For 1= 1To 2 For j“ 2To4 If j Mod 2令 0 Then n = n + 1 End If n 二 n + 2 Next j Next Print n End Sub 写出程序运行时单击窗体后 ，窗体 Forml上的输出结果 。 1379