-1

これらの行を緑色にする代わりに削除する方法を知りたい

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    'test
    Dim examplea As String = "PAID"
    If DataGridView1.Rows.Count > 0 Then
        For i = 0 To DataGridView1.Rows.Count - 1
            If examplea = DataGridView1.Rows(i).Cells("PROJECT").Value.ToString Then
                ' MessageBox.Show("record already exist")
                DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.green
                'DataGridView1.Rows.Remove(DataGridView1.CurrentRow)
            Else
                ''MsgBox("N-E")
                'Exit For
            End If
        Next
    End If
    'test
End Sub
4

1 に答える 1

0

行を削除したい場合を除いて、必要なものを完全に理解しているかどうかはわかりません...

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    'test
    Dim examplea As String = "PAID"
    If DataGridView1.Rows.Count > 0 Then
       For i = DataGridView1.Rows.Count - 1 To 0 Step -1
            If examplea = DataGridView1.Rows(i).Cells("PROJECT").Value.ToString Then
                ' MessageBox.Show("record already exist")
                'DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.green
                DataGridView1.Rows.RemoveAt(i)
            Else
                ''MsgBox("N-E")
                'Exit For
            End If
        Next
    End If
    'test
End Sub
于 2015-09-02T15:29:57.847 に答える