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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : لوب كنترول (/showthread.php?tid=34292)

لوب كنترول - DOX.1 - 12-04-20

ســلام عليكم روحمة الله وبركاته 




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

RE: لوب كنترول - معاند الحظ - 12-04-20

وعليك السلام ورحمة الله وبركاته

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

انت تحتاج تتحقق من قيم معينة في برنامجك بناء على شرط او شروط
وهي تحدد اذا كانت نتيجة التحقق من قيمة ما هي صائبة او خاطئة (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


RE: لوب كنترول - سعود - 12-04-20

مثل ماقال اخوي اللي قبلي السؤال يحتاج تفاصيل
لكن شوف

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


RE: لوب كنترول - aljzazy - 12-04-20

اعتقد الاسهل ان تضع جميع التشيك بوكس في جروب بوكس
وبعدها نعمل اللوب على الجروب بوكس وضع الشرط
اذا كان التشك بوكس True يقوم بتخزين قيمته في متغير

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

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

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

               If childcontrols.GetType.Name = "GroupBox" Then

  End If


                   Next