تقييم الموضوع :
  • 1 أصوات - بمعدل 2
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] فتح قائمة combo
#1
Heart 
السلام عليكم
أخواني أحتاج الى كود انسدال قائمة combobox تلقائيا
مع فائق الاحترام والتقدير
الرد }}}
تم الشكر بواسطة: 30june , awidan76
#2
ComboBox1.DroppedDown = True
الرد }}}
تم الشكر بواسطة: 30june , awidan76
#3
السلام عليكم
أخى الكريم
فى حدث General ضع الكود التالى

[/code]
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
كود :
وفى حدث Gotfocus للكومبو ضع الكود التالى
Private Sub Combo1_GotFocus()
Dim RC As Long
RC = SendMessage(Combo1.Hwnd, &H14F, True, 0)
End Sub
[code]

بالتوفيق إن شاء الله
الرد }}}


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إضافة برنامجك في قائمة السماح للجدار الناري للوندوز Ahmed_Mansoor 7 3,690 22-09-20, 05:25 PM
آخر رد: tempman

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم