2.(6分) Private Sub Form_Click() Dim c As Integer,j As Integer,k As Integer k=2 c=3 For j=1 To5 Ifi>3 Then c=c十5 Exit For Else k=k+1 End If Next j Print c,k End Sub 写出程序运行时单击窗体后，c,k的值分别是： 3.(6分) Private Sub Command1_Click() Dim s As Double Dim i As Integer s=5 i=1 Do While i<7 i=i+2 s=5十i Loop Textl.Text =s End Sub 文件框Text1的输出结果是： 14302.(6分) Private Sub Form_Click() Dim c As Integer, j As Integer, k As Integer k= 2 c = 3 For j= 1 To 5 If j> 3 Then c“ c十 5 Exit For Else k 二 k + 1 End If Next j Print c，k End Sub 写出程序运行时单击窗体后，c,k的值分别是: 3. (6分) Private Sub Commandl_Click() Dim s As Double Dim i As Integer s =二 口 i= 1 Do While I< 7 1= 1十 2 s今 5一 1 Loop Textl. Text一 s land Sub 文件框 Text]的输出结果是: 1430