当我单击窗体时在窗体输出aaa
我再次单击窗体时清除aaa
这个过程有可能出现吗？

如果要实现下面的功能呢 恐怕不行了吧
Private Sub Form_Click()
i = i + 1
If i Mod 2 <> 0 Then
Timer1.Enabled = Ture
Else
Timer1.Enabled = False
End If
End Sub

Private Sub Form_Load()
i = 0
End Sub


Private Sub Timer1_Timer()
Print "aaa"
End Sub

[[it] 本帖最后由 菜鸟VB 于 2008-6-13 01:25 编辑 [/it]]

当我单击的时候输出aaa
再次单击的时候停止aaa的输出