ورود

View Full Version : باز شدن اتوماتیک کمبوباکس



morteza_lll
جمعه 16 شهریور 1386, 21:03 عصر
سلام دوستان
من می خوام بدون چه کدی بنویسم که یک کمبوباکس اتوماتیک باز شود و لیست آن مشاهده شود
مثلا در ofter update یک text box اینو بگیم
ممنون:چشمک:

moustafa
جمعه 16 شهریور 1386, 22:07 عصر
combobox1.drowup down

morteza_lll
جمعه 16 شهریور 1386, 22:22 عصر
سلام آقا مصطفی
امتحان کردم پیغام خطا می ده
قبول نمی کنه

مهدی قربانی
جمعه 16 شهریور 1386, 23:30 عصر
سلام
آقا مرتضی شکل دستوری که آقا مصطفی زحمت کشیدن درسته فقط در تایپ حروف احتمالاً اشتباه شده این رو امتحان کن :


Private Sub Combo2_GotFocus()
Combo2.Dropdown
End Sub

morteza_lll
شنبه 17 شهریور 1386, 07:13 صبح
سلام
با تشکر از آقا مهدی و آقا مصطفی
ممنون جوابو گرفتم زحمت کشیدید

moustafa
شنبه 17 شهریور 1386, 08:25 صبح
ممنون از آقا مهدی بابت تصحیح کد
همچین مواقعی جهت املای صحیح با تایپ اولین کاراکتر از ctrl+space استفاده نماید

wolfstander
شنبه 03 اردیبهشت 1390, 12:05 عصر
سلام به همه دوستان
در فرم برنامه من دو کمبو باکس وجود داره
یکی نام
یکی شغل
من میخوام وقتی که کاربر اسمی رو انتخاب کرد، کمبوی دوم خودکار باز بشه
در اونت AfterUpdate کمبوی اول از دستور dropdown برا کمبوی دوم استفاده کردم
ولی جواب نداد
آیا راه حلی وجود داره که بشه این مشکل رو حل کرد؟
با تشکر از همه دوستان

stabesh
شنبه 03 اردیبهشت 1390, 13:35 عصر
با سلام


Private Sub name_AfterUpdate()
Me.work.SetFocus
Me.work.Dropdown
End Sub