المشاركات : 7
المواضيع 0
الإنتساب : Aug 2014
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
السلام عليكم
عندي مشكلة في جلب قيمة التشيك بوكس
(checkbox)
وهذا الكود المستخدم
[HTML]Private Sub Text35_Change()
Module1.conn
With rs
.Open "select * from Sizes where no_invo like '" + Text35.Text + "%' "
Check36.Value = Checked = !Twined
.MoveNext
End With
Exit Sub
End Sub
[/HTML]
المشاركات : 22
المواضيع 2
الإنتساب : Sep 2012
السمعة :
0
الشكر: 0
تم شكره 5 مرات في 3 مشاركات
استعمل خاصيه Tag
ان لم تستطع ارفق المثال وان شاء الله اقدر اساعدك
سبحان الله - الحمد لله - لا اله الا الله - الله اكبر - لا حول ولاقوه الا بالله
جاهز للمساعده و لعمل اي برنامج يخص الجمعيات والمؤسسات الخيريه بدون اي مقابل غير الدعاء
01006294493 - - 01141569174 (من مصر )
المشاركات : 1,379
المواضيع 77
الإنتساب : Sep 2012
السمعة :
180
الشكر: 7891
تم شكره 14093 مرات في 904 مشاركات
السلام عليكم
نعم اخي يوجد خطا في الكود
بدل السطر التالي
Check36.Value = Checked = !Twined
ب
( Check36.Value =val( !Twined
يعطيك العافية
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))
المشاركات : 426
المواضيع 17
الإنتساب : Dec 2015
السمعة :
22
الشكر: 7952
تم شكره 2382 مرات في 293 مشاركات
رائع ممتاز
الله يعطيك العافيه ابو ليث
كنت محتاجها في جلب التشيك بوكس لعملية الصلاحيات
اعز معلمين :
1) Ahmed _Mansoor
2) sniper.ps
3) myalsailamy
4) ahmedabdelaliem
5) sendbad100
6)Amir_alzubidy