[allobaed]

(15-02-18, 07:59 PM)sendbad100 كتب : السلام عليكم
هذا مثال   مستعجل

الله يبيض وجهك يا رجل من فترة وان ادور عليه
و تتكرم بس علي و تشرحلي الكود الاول هذا وش يسوي

Private Declare Function SendMessage _
      Lib "user32" Alias "SendMessageA" _
      (ByVal hwnd As Long, ByVal wMsg As Long, _
      ByVal wParam As Long, lParam As Any) As Long
      
Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam _
As Long, ByVal lParam As Long) As Long
Private Const CB_SHOWDROPDOWN = &H14F