Vb 怎样获取单击事件？

我的要求很简单，就是做一个程序，运行后会隐藏起来，然后自动记录鼠标左击的次数到TEXt1.text文本上。所以我想问一下高手们，Vb怎样获取单击事件的呢？

你要先搞清楚你那个vsflexgrid是个啥子控件!
mousedown事件你可以在顶上面选也可以自己输入
Private Sub vsflexgrid_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
'这里呢就是点击鼠标的事件了,你可以把我这段弄到你窗口上去试试就知道效果了,但是你的控件名得弄清楚才行就是vsflexgrid_MouseDown 这个前面的的必须是你的控件名才有效
if button=1 then msgbox "鼠标左键点击"
if button=2 then msgbox "鼠标右键点击"
End Sub
请参考

Public i As Integer Private Sub Form_Mouseup(Button As Integer, Shift As Integer, X As Single, Y As Single) i = i + 1 Text1.Text = i End Sub 你可以参考一下，因为用mousedown双击只能记录一次，所以我用了mouseup来写

private sub form_load() sha1.shape = 1 end sub private sub shape1_click() sha1.shape = 1 end sub private sub shape2_click() sha1.shape = 3 end sub