CheckBox dalam DataGridView VB.Net

Pada saat membuat aplikasi (VB.Net) untuk materi skripsi, terbesit bagaimana cara baru untuk memberikan hak akses user secara dinamis pada sistem. setelah dicoba dengan tanya-tanya. akhirnya bisa mendapatkan cara itu... wah sesuatu banget dah....

inti dari posting ini hanya pada barisan kode berikut :

Private Sub BtnSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSIMPAN.Click

        Dim Y As String = Mid(CmbUSER.Text, 1, 7)
        Dim iROW As Integer
        Dim AKSES As String

        For iROW = 0 To DGVSample.Rows.Count - 1
            'AksesBox = Nama CheckBox yang ada di DatagridView
            If DGVSample.Rows(iROW).Cells("AksesBox").Value Then
                AKSES = "1"
            Else
                AKSES = "0"
            End If

            'Class Proses DML (Simpan Data)
            xSIMPAN.SIMPAN_AKSES(Y, DGVSample.Rows(iROW).Cells(1).Value, AKSES)
        Next iROW

    End Sub

Download File

nilai "1" adalah form yang nantinya boleh diakses user, dan
nilai "0" adalah form yang tidak boleh diakses user

atau bila mau dibalik logic nya ya silahkan saja...