[trakktour]

تفضل اخي 

كود :

Private Declare Auto Function SendMessage Lib "user32.dll" (hWnd As IntPtr, Msg As UInteger, wParam As IntPtr, lParam As IntPtr) As IntPtr
   Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
       SendMessage(Me.Handle, 793UI, CType(2100912, IntPtr), CType(524288L, IntPtr))
   End Sub

ان شاء الله نكون فهمتك صح