如何调用其他事件？

Question

窗体上有一标签控件，想通过标签的mousedown 事件来调用窗体的mousedown 事件，这个代码如何写呢？
谢谢各位！！！ 

Answer 1

Dim Px As Single
Dim Py As SinglePrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox X & "/" & Y
End SubPrivate Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Px = X
Py = Y
Form_MouseDown 1, 0, Px, Py
End Sub