Question

VB输出问题

Private Sub From_Click()
Dim i%, j%
For i = 1 To 3
Print "i="; i
For j = 1 To 3
Print Tab; "j="; j
Next j
Next i
End Sub

为什么没有输出结果

Answer 1

Private Sub From_Click() 

 

应当是  Form

 

以下为改后的代码，运行，然后单点窗体，便出结果

Private Sub Form_Click()
    Dim i%, j%
    For i = 1 To 3
        Form1.Print "i="; i
        For j = 1 To 3
            Form1.Print Tab; "j="; j
        Next j
    Next i
End Sub

 

 

Answer 2

窗体的事件名错了：

Private Sub Form_Click()
    Dim i%, j%
    For i = 1 To 3
        Print "i="; i
        For j = 1 To 3
            Print Tab; "j="; j
        Next j
    Next i
End Sub