DataGridView控件用法合集(一)

1. DataGridView当前的单元格属性取得、变更

2. DataGridView编辑属性

3. DataGridView最下面一列新追加行非表示

4. DataGridView判断当前选中行是否为新追加的行

5. DataGridView删除行可否设定

6. DataGridView行列不表示和删除

1.当前的单元格属性取得、变更

[VB.NET]

'現在のセルの値を表示

Console.WriteLine(DataGridView1.CurrentCell.Value)

'現在のセルの列インデックスを表示

Console.WriteLine(DataGridView1.CurrentCell.ColumnIndex)

'現在のセルの行インデックスを表示

Console.WriteLine(DataGridView1.CurrentCell.RowIndex)

'(0, 0)を現在のセルにする

DataGridView1.CurrentCell = DataGridView1(0, 0)

2.DataGridView编辑属性

全部单元格编辑属性

[VB.NET]

'DataGridView1のセルを読み取り専用にする

DataGridView1.ReadOnly = True

指定行列单元格编辑属性

[VB.NET]

'DataGridView1の2番目の列を読み取り専用にする

DataGridView1.Columns(1).ReadOnly = True

'DataGridView1の3番目の行を読み取り専用にする

DataGridView1.Rows(2).ReadOnly = True

'DataGridView1の(0, 0)のセルを読み取り専用にする

DataGridView1(0, 0).ReadOnly = True

根据条件判断单元格的编辑属性

下例中column2的值是True的时候，Column1设为可编辑

 [VB.NET]

'CellBeginEditイベントハンドラ

Private Sub DataGridView1_CellBeginEdit(ByVal sender As Object, _

        ByVal e As DataGridViewCellCancelEventArgs) _

        Handles DataGridView1.CellBeginEdit

    Dim dgv As DataGridView = CType(sender, DataGridView)

    '編集できるか判断する

    If dgv.Columns(e.ColumnIndex).Name = "Column1" AndAlso _

        Not CBool(dgv("Column2", e.RowIndex).Value) Then

        '編集できないようにする

        e.Cancel = True

    End If

End Sub

3.DataGridView最下面一列新追加行非显示

[VB.NET]

'DataGridView1にユーザーが新しい行を追加できないようにする

DataGridView1.AllowUserToAddRows = False

4.判断当前选中行是否为新追加的行

[VB.NET]

If DataGridView1.CurrentRow.IsNewRow Then

    Console.WriteLine("現在のセルがある行は、新しい行です。")

Else

    Console.WriteLine("現在のセルがある行は、新しい行ではありません。")

End If

5. DataGridView删除行可否设定

[VB.NET]

'DataGridView1の行をユーザーが削除できないようにする

DataGridView1.AllowUserToDeleteRows = False

根据条件判断当前行是否要删除

[VB.NET]

'DataGridView1のUserDeletingRowイベントハンドラ

Private Sub DataGridView1_UserDeletingRow(ByVal sender As Object, _

        ByVal e As DataGridViewRowCancelEventArgs) _

        Handles DataGridView1.UserDeletingRow

    '削除するかユーザーに確認する

    If MessageBox.Show("この列を削除しますか？", "削除の確認", _

        MessageBoxButtons.OKCancel, MessageBoxIcon.Question) <> _

            Windows.Forms.DialogResult.OK Then

        e.Cancel = True

    End If

End Sub

6. DataGridView行列不显示和删除

行列不表示

[VB.NET]

'DataGridView1のはじめの列を非显示にする

DataGridView1.Columns(0).Visible = False

'DataGridView1のはじめの行を非显示にする

DataGridView1.Rows(0).Visible = False

行列表头部分不表示

[VB.NET]

'列ヘッダーを非显示にする

DataGridView1.ColumnHeadersVisible = False

'行ヘッダーを非显示にする

DataGridView1.RowHeadersVisible = False

指定行列删除

[VB.NET]

'"Column1"を削除する

DataGridView1.Columns.Remove("Column1")

'はじめの列を削除する

DataGridView1.Columns.RemoveAt(0)

'はじめの行を削除する

DataGridView1.Rows.RemoveAt(0)

选择的行列删除（多行列）

[VB.NET]

'DataGridView1で選択されているすべての行を削除する

Dim r As DataGridViewRow

For Each r In DataGridView1.SelectedRows

    If Not r.IsNewRow Then

        DataGridView1.Rows.Remove(r)

    End If

Next r