Skip to main content

CHECK CHECKBOX IN DATAGRIDVIEW IS CHECKED OR UNCHECKED

'CHECK CHECKBOX IS CHECKED OR UNCHECKED
    Private Sub CB_CheckedChanged(sender As Object, e As EventArgs) Handles CB.CheckedChanged
        With DgvDoc
            If CB.CheckState = CheckState.Checked Then
                For iRow = 0 To .Rows.Count - 1
                    .Rows(iRow).Cells("CHECKED").Value = True
                Next
            Else
                For iRow = 0 To .Rows.Count - 1
                    .Rows(iRow).Cells("CHECKED").Value = False
                Next
            End If
        End With
    End Sub

Comments

Popular posts from this blog

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    ...

Create Comment As .xls In Farpoint Spread

  Private Sub TAGS_PARENTING()         Dim DTPopUp As New DataTable         With DTPopUp             .Columns.Add("SEQ", GetType(String))             .Columns.Add("QTY", GetType(String))             .Columns.Add("ETD", GetType(String))             .Columns.Add("ETA", GetType(String))             DTPopUp = MePostab_Control.Cari_TAG_PARENTING         End With         With FPPOSTAB             For GG As Integer = 0 To .ActiveSheet.RowCount - 1             ...