VB 6, Mengubah Posisi Objek Sesuai Koordinat Klik Mouse

Objek textbox akan berubah posisinya sesuai koordinat klik mouse pada form

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Text1.Top = Y
    Text1.Left = X
End Sub