منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
فتح القائمة المنسدلة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : فتح القائمة المنسدلة (/showthread.php?tid=27405)

فتح القائمة المنسدلة - dr.mostashar - 11-11-18

السلام عليكم

كيف استطيع فتح القائمة المنسدلة في combobox بدون استخدام الماوس

وشكرا لكم

RE: فتح القائمة المنسدلة - AL_BRNS - 12-11-18

وعليكم السلام

يمكن عن طريق الكيبورد

جرب الزر "ENTER"

PHP كود :
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

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
 If KeyAscii = "13" Then
r = SendMessageLong(Combo1.hwnd, CB_SHOWDROPDOWN, True, 0)
 End If
End Sub 

بالتوفيق .

RE: فتح القائمة المنسدلة - dr.mostashar - 13-11-18

(12-11-18, 11:30 PM)AL_BRNS كتب : وعليكم السلام

يمكن عن طريق الكيبورد

جرب الزر "ENTER"

أشكرك