如何用vb编写一程序,在文本框中统计在该窗口上鼠标单击的次数

Answer 1

private sub form_click()
dim i as integer
i=i+1
text1.text=val(text1)+1
end sub

Answer 2

Private Sub Form_Click()
Static num As Integer
num = num + 1
Text1 = num
End Sub

Private Sub Form_Load()
Text1 = 0
End Sub