[Ahmed_Mansoor]

أهلا أخي الكريم , إنسخ هذا الكود وأمسح كل الكود الموجود في المثال وألصق هذا الكود بدله :

PHP كود :

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 Const CB_SHOWDROPDOWN = &H14F


Private Sub Combo1_Change()
SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, True, 0
End Sub

Private Sub Combo1_LostFocus()
SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, False, 0
End Sub

Private Sub Form_Load()
On Error Resume Next
Combo1.SetFocus
End Sub