تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لوب كنترول
#1
ســلام عليكم روحمة الله وبركاته 




محتاج أبني جملة لوب على أدوات الشتك بوكس عشان أعرف اللي حلته ترو أخزنه في متغير
الرد
تم الشكر بواسطة: سعود , asemshahen5
#2
وعليك السلام ورحمة الله وبركاته

اخي خليني احاول اعيد صياغة سؤالك على اعتبار اني فهمت قصدك

انت تحتاج تتحقق من قيم معينة في برنامجك بناء على شرط او شروط
وهي تحدد اذا كانت نتيجة التحقق من قيمة ما هي صائبة او خاطئة (True,False)

اذا كان هذا هو سؤالك فالحمدلله لكن لازال باقي غموض لكل من يقرا سؤالك

بمعنى ماهي العلاقة التي تربط او لاتربط عناصر التشك بوكس التي تريد الدوران عليها والتحقق منها
لان معرفة العلاقة مهم هنا

لكن ساحاول اعطائك الحل

سافترض انك تود معرفة اي عناصر التشك بوكس مؤشر وايها لا

لذلك ساستخدم عنصر العداد تايمر وفي داخله ساتحقق من قيم التشك بوكس

اذن :

كود :
dim result1 as boolean
dim result2 as boolean
dim result3 as boolean

Private Sub Timer1_Tick(sender as object , e as eventargs) Handels Timer1.Tick

if checkbox1.checked=true then
result1= true
else
result1= false
end if

if checkbox2.checked=true then
result2= true
else
result2= false
end if

if checkbox2.checked=true then
result3= true
else
result3= false
end if
End Sub
الرد
#3
مثل ماقال اخوي اللي قبلي السؤال يحتاج تفاصيل
لكن شوف

وهذا محتوى الكود
PHP كود :
Public Class Form1
    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        For Each h 
As Control In Me.Controls
            If TypeOf h Is CheckBox Then
                ListBox1
.Items.Add(CType(hCheckBox).Text " | " CType(hCheckBox).Checked)
 
           End If
 
       Next
    End Sub
End 
Class 


الملفات المرفقة
.zip   Someone.zip (الحجم : 27.78 ك ب / التحميلات : 1)
الرد
#4
اعتقد الاسهل ان تضع جميع التشيك بوكس في جروب بوكس
وبعدها نعمل اللوب على الجروب بوكس وضع الشرط
اذا كان التشك بوكس True يقوم بتخزين قيمته في متغير

لكن السؤال هل تريد حفظ هذه البيانات بقاعدة البيانات
تخزينهم بمتغير يعني انك لا تريد تخزينهم بقاعدة البيانات
اما اذا كنت تريد تخزينها بقاعدة البيانات فالحل اسهل

مثال على اللوب على الجروب بوكس

كود :
For Each childcontrols As Control In Me.Controls

               If childcontrols.GetType.Name = "GroupBox" Then

  End If


                   Next
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5 , DOX.1



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


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