[BlackEagleSA]

كود :

[quote=amgadtamer]مثال بالمطلوب[/quote]

أشكرك أخوي على هذا المثال اللي حليتلي فيه مشكلتي اللي كنت رح أسئل عليها

بس لي بس طلب صغير ممكن يعني لو تشرح الكود لأني مو فاهم كم رمز زي


أشكرك أخوي على هذا المثال اللي حليتلي فيه مشكلتي اللي كنت رح أسئل عليها

بس عندي  طلب صغير ممكن يعني لو تشرح الكود لأني مو فاهم كم رمز زي ct والme.groupbox1.controls

[CODE]Function getcheck() As Integer
        Dim count As Integer
        For Each ct As CheckBox In Me.GroupBox1.Controls
            If ct.Checked = True Then
                count += 1
            End If
        Next
        Return count
    End Function