DataGridView 编程36计

DataGridView 编程36计收藏

本文来自:http://blog.csdn.net/fangxinggood/archive/2007/04/11/1561011.aspx


① DataGridView 取得或者修改当前单元格的内容:

⇒ 关于 NoSet

当前单元格指的是 DataGridView 焦点所在的单元格,它可以通过 DataGridView 对象的 CurrentCell 属性取得。如果当前单元格不存在的时候,返回Nothing(C#是null)

[VB.NET]
' 取得当前单元格内容
Console.WriteLine(DataGridView1.CurrentCell.Value)
' 取得当前单元格的列 Index
Console.WriteLine(DataGridView1.CurrentCell.ColumnIndex)
' 取得当前单元格的行 Index
Console.WriteLine(DataGridView1.CurrentCell.RowIndex)
[C#]
// 取得当前单元格内容
Console.WriteLine(DataGridView1.CurrentCell.Value);
// 取得当前单元格的列Index
Console.WriteLine(DataGridView1.CurrentCell.ColumnIndex);
// 取得当前单元格的行Index
Console.WriteLine(DataGridView1.CurrentCell.RowIndex);


另外,使用 DataGridView.CurrentCellAddress 属性(而不是直接访问单元格)来确定单元格所在的行:DataGridView.CurrentCellAddress.Y 和列: DataGridView.CurrentCellAddress.X 。这对于避免取消共享行的共享非常有用。

当前的单元格可以通过设定 DataGridView 对象的 CurrentCell 来改变。可以通过 CurrentCell 来设定
DataGridView 的激活单元格。将 CurrentCell 设为 Nothing(null) 可以取消激活的单元格。

[VB.NET]
' 设定(0,0)为当前单元格
DataGridView1.CurrentCell = DataGridView1( 0 , 0 )
[C#]
// 设定(0,0)为当前单元格
DataGridView1.CurrentCell = DataGridView1[ 0 , 0 ];


在整行选中模式开启时,你也可以通过 CurrentCell 来设定选定行。

///<summary>
///向下遍历
///</summary>
///<paramname="sender"></param>
///<paramname="e"></param>

private void button4_Click( object sender,EventArgse)
{
introw=this.dataGridView1.CurrentRow.Index+1;
if(row>this.dataGridView1.RowCount-1)
row
=0;
this.dataGridView1.CurrentCell=this.dataGridView1[0,row];
}


///<summary>
///向上遍历
///</summary>
///<paramname="sender"></param>
///<paramname="e"></param>

private void button5_Click( object sender,EventArgse)
{
introw=this.dataGridView1.CurrentRow.Index-1;
if(row<0)
row
=this.dataGridView1.RowCount-1;
this.dataGridView1.CurrentCell=this.dataGridView1[0,row];
}


* 注意: this.dataGridView 的索引器的参数是: columnIndex,rowIndex 或是 columnName,rowIndex
这与习惯不同。


 DataGridView 设定单元格只读:

1) 使用 ReadOnly 属性
⇒ 如果希望,DataGridView 内所有单元格都不可编辑, 那么只要:

[VB.NET]
&apos; 设置DataGridView1为只读
DataGridView1.ReadOnly = True
[C#]
// 设置DataGridView1为只读
DataGridView1.ReadOnly = true ;

此时,用户的新增行操作和删除行操作也被屏蔽了。

⇒ 如果希望,DataGridView 内某个单元格不可编辑, 那么只要:

[VB.NET]
&apos; 设置 DataGridView1 的第2列整列单元格为只读
DataGridView1.Columns( 1 ).ReadOnly = True

&apos; 设置 DataGridView1 的第3行整行单元格为只读
DataGridView1.Rows( 2 ).ReadOnly = True

&apos; 设置 DataGridView1 的[0,0]单元格为只读
DataGridView1( 0 , 0 ).ReadOnly = True
[C#]
// 设置 DataGridView1 的第2列整列单元格为只读
DataGridView1.Columns[ 1 ].ReadOnly = true ;

// 设置 DataGridView1 的第3行整行单元格为只读
DataGridView1.Rows[ 2 ].ReadOnly = true ;

// 设置 DataGridView1 的[0,0]单元格为只读
DataGridView1[ 0 , 0 ].ReadOnly = true ;


2) 使用 EditMode 属性
DataGridView.EditMode 属性被设置为 DataGridViewEditMode.EditProgrammatically 时,用户就不能手动编辑单元格的内容了。但是可以通过程序,调用 DataGridView.BeginEdit 方法,使单元格进入编辑模式进行编辑。

[VB.NET]
DataGridView1.EditMode=DataGridViewEditMode.EditProgrammatically
[C#]
DataGridView1.EditMode = DataGridViewEditMode.EditProgrammatically;


3) 根据条件设定单元格的不可编辑状态
当一个一个的通过单元格坐标设定单元格 ReadOnly 属性的方法太麻烦的时候,你可以通过 CellBeginEdit 事件来取消单元格的编辑。

[VB.NET]
&apos; CellBeginEdit 事件处理方法
Private Sub DataGridView1_CellBeginEdit( ByVal sender As Object ,_
ByVal e As DataGridViewCellCancelEventArgs)_
Handles DataGridView1.CellBeginEdit
Dim dgv As DataGridView = CType (sender,DataGridView)
&apos; 是否可以进行编辑的条件检查
If dgv.Columns(e.ColumnIndex).Name = " Column1 " AndAlso _
Not CBool (dgv( " Column2 " ,e.RowIndex).Value) Then
&apos; 取消编辑
e.Cancel = True
End If
EndSub
[C#]
// CellBeginEdit 事件处理方法
privatevoidDataGridView1_CellBeginEdit(objectsender,
DataGridViewCellCancelEventArgse)
{
DataGridViewdgv
=(DataGridView)sender;
//是否可以进行编辑的条件检查
if(dgv.Columns[e.ColumnIndex].Name=="Column1"&&
!(bool)dgv["Column2",e.RowIndex].Value)
{
// 取消编辑
e.Cancel=true;
}
}

③ DataGridView 不显示最下面的新行:

通常 DataGridView 的最下面一行是用户新追加的行(行头显示 * )。如果不想让用户新追加行即不想显示该新行,可以将 DataGridView 对象的 AllowUserToAddRows 属性设置为 False。

[VB.NET]
&apos; 设置用户不能手动给 DataGridView1 添加新行
DataGridView1.AllowUserToAddRows = False
[C#]
// 设置用户不能手动给 DataGridView1 添加新行
DataGridView1.AllowUserToAddRows = false ;

但是,可以通过程序: DataGridViewRowCollection.Add 为 DataGridView 追加新行。

补足: 如果 DataGridView 的 DataSource 绑定的是 DataView,还可以通过设置 DataView.AllowAdd
属性为 False 来达到同样的效果。


④ DataGridView 判断新增行:

DataGridView的AllowUserToAddRows属性为True时也就是允许用户追加新行的场合下,DataGridView的最后一行就是新追加的行(*行)。使用 DataGridViewRow.IsNewRow 属性可以判断哪一行是新追加的行。另外,通过DataGridView.NewRowIndex 可以获取新行的行序列号。在没有新行的时候,NewRowIndex = -1。

[VB.NET]
If DataGridView1.CurrentRow.IsNewRow Then
Console.WriteLine(
" 当前行为新追加行。 " )
Else
Console.WriteLine(
"当前行不是新追加行 " )
End If

⑤ DataGridView 行的用户删除操作的自定义:

1) 无条件的限制行删除操作。
默认时,DataGridView 是允许用户进行行的删除操作的。如果设置 DataGridView对象的AllowUserToDeleteRows属性为 False 时, 用户的行删除操作就被禁止了。

[VB.NET]
&apos; 禁止DataGridView1的行删除操作。
DataGridView1.AllowUserToDeleteRows = False
[C#]
// 禁止DataGridView1的行删除操作。
DataGridView1.AllowUserToDeleteRows = false ;


但是,通过 DataGridViewRowCollection.Remove 还是可以进行行的删除。
补足: 如果 DataGridView 绑定的是 DataView 的话,通过 DataView.AllowDelete 也可以控制行的删除。

2) 行删除时的条件判断处理。
用户在删除行的时候,将会引发 DataGridView.UserDeletingRow 事件。 在这个事件里,可以判断条件并取消删除操作。

[VB.NET]
&apos; DataGridView1 的 UserDeletingRow 事件
Private Sub DataGridView1_UserDeletingRow( ByVal sender As Object ,_
ByVal e As DataGridViewRowCancelEventArgs)_
Handles DataGridView1.UserDeletingRow
&apos; 删除前的用户确认。
If MessageBox.Show( " 确认要删除该行数据吗? " , " 删除确认 " ,_
MessageBoxButtons.OKCancel,MessageBoxIcon.Question)
<> _
Windows.Forms.DialogResult.OK
Then
&apos; 如果不是 OK,则取消。
e.Cancel = True
End If
EndSub
[C#]
// DataGridView1 的 UserDeletingRow 事件
private void DataGridView1_UserDeletingRow(
object sender,DataGridViewRowCancelEventArgse)
{
// 删除前的用户确认。
if(MessageBox.Show("确认要删除该行数据吗?","删除确认",
MessageBoxButtons.OKCancel,
MessageBoxIcon.Question)
!=DialogResult.OK)
{
// 如果不是 OK,则取消。
e.Cancel=true;
}
}

⑥ DataGridView 行、列的隐藏和删除:

1) 行、列的隐藏

[VB.NET]
&apos; DataGridView1的第一列隐藏
DataGridView1.Columns( 0 ).Visible = False
&apos; DataGridView1的第一行隐藏
DataGridView1.Rows( 0 ).Visible = False
[C#]
// DataGridView1的第一列隐藏
DataGridView1.Columns[ 0 ].Visible = false ;
// DataGridView1的第一行隐藏
DataGridView1.Rows[ 0 ].Visible = false ;


2) 行头、列头的隐藏

[VB.NET]
&apos; 列头隐藏
DataGridView1.ColumnHeadersVisible = False
&apos; 行头隐藏
DataGridView1.RowHeadersVisible = False
[C#]
// 列头隐藏
DataGridView1.ColumnHeadersVisible = false ;
// 行头隐藏
DataGridView1.RowHeadersVisible = false ;


3) 行和列的删除

[VB.NET]
&apos; 删除名为"Column1"的列
DataGridView1.Columns.Remove("Column1")
&apos; 删除第一列
DataGridView1.Columns.RemoveAt(0)
&apos; 删除第一行
DataGridView1.Rows.RemoveAt(0)
[C#]
&apos; 删除名为"Column1"的列
DataGridView1.Columns.Remove("Column1");
&apos; 删除第一列
DataGridView1.Columns.RemoveAt(0);
&apos; 删除第一行
DataGridView1.Rows.RemoveAt(0);


4) 删除选中行

[VB.NET]
ForEachr AsDataGridViewRow InDataGridView1.SelectedRows
IfNotr.IsNewRowThen
DataGridView1.Rows.Remove(r)
EndIf
Next
[C#]
foreach (DataGridViewRowr in DataGridView1.SelectedRows)
{
if ( ! r.IsNewRow)
{
DataGridView1.Rows.Remove(r);
}
}



DataGridView 禁止列或者行的Resize:

1) 禁止所有的列或者行的Resize

[VB.NET]
&apos; 禁止用户改变DataGridView1的所有列的列宽
DataGridView1.AllowUserToResizeColumns = False

&apos; 禁止用户改变DataGridView1の所有行的行高
DataGridView1.AllowUserToResizeRows = False
[C#]
// 禁止用户改变DataGridView1的所有列的列宽
DataGridView1.AllowUserToResizeColumns=false;

//禁止用户改变DataGridView1の所有行的行高
DataGridView1.AllowUserToResizeRows=false;


但是可以通过 DataGridViewColumn.Width 或者 DataGridViewRow.Height 属性设定列宽和行高。

2) 禁止指定行或者列的Resize

[VB.NET]
&apos; 禁止用户改变 DataGridView1的第一列的列宽
DataGridView1.Columns( 0 ).Resizable = DataGridViewTriState.False

&apos; 禁止用户改变 DataGridView1的第一列的行宽
DataGridView1.Rows( 0 ).Resizable = DataGridViewTriState.False
[C#]
// 禁止用户改变 DataGridView1的第一列的列宽
DataGridView1.Columns[0].Resizable=DataGridViewTriState.False;

// 禁止用户改变DataGridView1的第一列的行宽
DataGridView1.Rows[0].Resizable=DataGridViewTriState.False;

当 Resizable 属性设为 DataGridViewTriState.NotSet 时, 实际上会默认以 DataGridView 的 AllowUserToResizeColumns 和 AllowUserToResizeRows 的属性值进行设定。比如: DataGridView.AllowUserToResizeColumns = False 且 Resizable 是 NoSet 设定时,Resizable = False 。

判断 Resizable 是否是继承设定了 DataGridView 的 AllowUserToResizeColumns 和 AllowUserToResizeRows 的属性值, 可以根据 State 属性判断。如果 State 属性含有 ResizableSet,那么说明没有继承设定。

3) 列宽和行高的最小值的设定

[VB.NET]
&apos; 第一列的最小列宽设定为100
DataGridView1.Columns( 0 ).MinimumWidth = 100

&apos; 第一行的最小行高设定为50
DataGridView1.Rows( 0 ).MinimumHeight = 50
[C#]
// 第一列的最小列宽设定为100
DataGridView1.Columns[ 0 ].MinimumWidth = 100 ;

// 第一行的最小行高设定为50
DataGridView1.Rows[ 0 ].MinimumHeight = 50 ;


4) 禁止用户改变行头的宽度以及列头的高度

[VB.NET]
&apos; 禁止用户改变列头的高度
DataGridView1.ColumnHeadersHeightSizeMode = _
DataGridViewColumnHeadersHeightSizeMode.DisableResizing

&apos; 禁止用户改变行头的宽度
DataGridView1.RowHeadersWidthSizeMode = _
DataGridViewRowHeadersWidthSizeMode.EnableResizing
[C#]
// 禁止用户改变列头的高度
DataGridView1.ColumnHeadersHeightSizeMode =
DataGridViewColumnHeadersHeightSizeMode.DisableResizing;

// 禁止用户改变行头的宽度
DataGridView1.RowHeadersWidthSizeMode =
DataGridViewRowHeadersWidthSizeMode.EnableResizing;




DataGridView 列宽和行高自动调整的设定:


1) 设定行高和列宽自动调整

[VB.NET]
&apos; 设定包括Header和所有单元格的列宽自动调整
DataGridView1.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells

&apos; 设定包括 Header和所有单元格的行高自动调整
DataGridView1.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
[C#]
// 设定包括 Header和所有单元格的列宽自动调整
DataGridView1.AutoSizeColumnsMode=DataGridViewAutoSizeColumnsMode.AllCells;

//
设定包括 Header和所有单元格的行高自动调整
DataGridView1.AutoSizeRowsMode=DataGridViewAutoSizeRowsMode.AllCells;


AutoSizeColumnsMode 属性的设定值枚举请参照 msdn 的 DataGridViewAutoSizeRowsMode 说明。

2)指定列或行自动调整

[VB.NET]
&apos; 第一列自动调整
DataGridView1.Columns( 0 ).AutoSizeMode = _
DataGridViewAutoSizeColumnMode.DisplayedCells
[C#]
// 第一列自动调整
DataGridView1.Columns[0].AutoSizeMode=
DataGridViewAutoSizeColumnMode.DisplayedCells;


AutoSizeMode 设定为 NotSet 时, 默认继承的是 DataGridView.AutoSizeColumnsMode 属性。

3) 设定列头的高度和行头的宽度自动调整

[VB.NET]
&apos; 设定列头的宽度可以自由调整
DataGridView1.ColumnHeadersHeightSizeMode = _
DataGridViewColumnHeadersHeightSizeMode.AutoSize

&apos; 设定行头的宽度可以自由调整
DataGridView1.RowHeadersWidthSizeMode = _
DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders
[C#]
// 设定列头的宽度可以自由调整
DataGridView1.ColumnHeadersHeightSizeMode =
DataGridViewColumnHeadersHeightSizeMode.AutoSize;

// 设定行头的宽度可以自由调整
DataGridView1.RowHeadersWidthSizeMode =
DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders;


4) 随时自动调整
a, 临时的,让列宽自动调整,这和指定AutoSizeColumnsMode属性一样。

[VB.NET]
&apos; 让 DataGridView1 的所有列宽自动调整一下。
DataGridView1.AutoResizeColumns(DataGridViewAutoSizeColumnsMode.AllCells)

&apos; 让 DataGridView1 的第一列的列宽自动调整一下。
DataGridView1.AutoResizeColumn( 0 ,DataGridViewAutoSizeColumnMode.AllCells)
[C#]
// 让 DataGridView1 的所有列宽自动调整一下。
DataGridView1.AutoResizeColumns(DataGridViewAutoSizeColumnsMode.AllCells);

// 让 DataGridView1 的第一列的列宽自动调整一下。
DataGridView1.AutoResizeColumn(0,DataGridViewAutoSizeColumnMode.AllCells);

上面调用的 AutoResizeColumns 和 AutoResizeColumn 当指定的是DataGridViewAutoSizeColumnMode.AllCells 的时候, 参数可以省略。即:
DataGridView1.AutoResizeColumn(0) 和 DataGridView1.AutoResizeColumns()

b,临时的,让行高自动调整

[VB.NET]
&apos; 让 DataGridView1 的所有行高自动调整一下。
DataGridView1.AutoResizeRows(DataGridViewAutoSizeRowsMode.AllCells)

&apos; 让 DataGridView1 的第一行的行高自动调整一下。
DataGridView1.AutoResizeRow( 0 ,DataGridViewAutoSizeRowMode.AllCells)
[C#]
// 让 DataGridView1 的所有行高自动调整一下。
DataGridView1.AutoResizeRows(DataGridViewAutoSizeRowsMode.AllCells);

// 让 DataGridView1 的第一行的行高自动调整一下。
DataGridView1.AutoResizeRow( 0 ,DataGridViewAutoSizeRowMode.AllCells);

上面调用的 AutoResizeRows AutoResizeRow 当指定的是DataGridViewAutoSizeRowMode.AllCells 的时候, 参数可以省略。即:DataGridView1.AutoResizeRow (0) 和 DataGridView1.AutoResizeRows()

c,临时的,让行头和列头自动调整
关于性能:
通过 AutoSizeColumnsMode 或者 AutoSizeRowsMode 属性所指定的单元格进行自动调整时,如果调整次数过于多那么将可能导致性能下降,尤其是在行和列数比较多的情况下。在这时用 DisplayedCells 代替 AllCells 能减少非所见的单元格的调整,从而提高性能。

[VB.NET]
&apos; 列头高度自动调整
DataGridView1.AutoResizeColumnHeadersHeight()

&apos; 行头宽度自动调整
DataGridView1.AutoResizeRowHeadersWidth(_
DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders)
[C#]
// 列头高度自动调整
DataGridView1.AutoResizeColumnHeadersHeight();

// 行头宽度自动调整
DataGridView1.AutoResizeRowHeadersWidth(
DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders);

DataGridView 冻结列或行

GO TO TOP
1) 列冻结
DataGridViewColumn.Frozen 属性为 True 时, 该列左侧的所有列被固定, 横向滚动时固定列不随滚动条滚动而左右移动。这对于重要列固定显示很有用。
[VB.NET]
&apos; DataGridView1的左侧2列固定
DataGridView1.Columns( 1 ).Frozen = True
[C#]
// DataGridView1的左侧2列固定
DataGridView1.Columns[ 1 ].Frozen = true ;

但是,DataGridView.AllowUserToOrderColumns = True 时,固定列不能移动到非固定列, 反之亦然。

2) 行冻结
DataGridViewRow.Frozen 属性为 True 时, 该行上面的所有行被固定, 纵向滚动时固定行不随滚动条滚动而上下移动。
[VB.NET]
&apos; DataGridView1 的上3行固定
DataGridView1.Rows( 2 ).Frozen = True

[C#]
// DataGridView1 的上3行固定
DataGridView1.Rows[ 2 ].Frozen = true ;



DataGridView 列顺序的调整

设定 DataGridView 的 AllowUserToOrderColumns 为 True 的时候, 用户可以自由调整列的顺序。
当用户改变列的顺序的时候,其本身的 Index 不会改变,但是 DisplayIndex 改变了。你也可以通过程序改变 DisplayIndex 来改变列的顺序。 列顺序发生改变时会引发 ColumnDisplayIndexChanged 事件:

[VB.NET]
&apos; DataGridView1的ColumnDisplayIndexChanged事件处理方法
Private Sub DataGridView1_ColumnDisplayIndexChanged( ByVal sender As Object ,_
ByVal e As DataGridViewColumnEventArgs)_
Handles DataGridView1.ColumnDisplayIndexChanged
Console.WriteLine(
" {0} 的位置改变到 {1} 。 " ,_
e.Column.Name,e.Column.DisplayIndex)
EndSub
[C#]
// DataGridView1的ColumnDisplayIndexChanged事件处理方法
private void DataGridView1_ColumnDisplayIndexChanged( object sender,
DataGridViewColumnEventArgse)
{
Console.WriteLine(
" {0} 的位置改变到 {1} ",
e.Column.Name,e.Column.DisplayIndex);
}



DataGridView 行头列头的单元格

[VB.NET]
&apos; DataGridView1的第一列列头内容
DataGridView1.Columns( 0 ).HeaderCell.Value = " 第一列 "

&apos; DataGridView1的第一行行头内容
DataGridView1.Rows( 0 ).HeaderCell.Value = "第一行 "

&apos; DataGridView1的左上头部单元内容
DataGridView1.TopLeftHeaderCell.Value="左上"
[C#]
// 改变DataGridView1的第一列列头内容
DataGridView1.Columns[ 0 ].HeaderCell.Value = " 第一列 " ;

// 改变DataGridView1的第一行行头内容
DataGridView1.Rows[ 0 ].HeaderCell.Value = " 第一行 " ;

// 改变DataGridView1的左上头部单元内容
DataGridView1.TopLeftHeaderCell.Value="左上";


另外你也可以通过 HeaderText 来改变他们的内容。

[VB.NET]
&apos; 改变DataGridView1的第一列列头内容
DataGridView1.Columns( 0 ).HeaderText = " 第一列 "
[C#]
// 改变DataGridView1的第一列列头内容
DataGridView1.Columns[ 0 ].HeaderText = " 第一列" ;



DataGridView 剪切板的操作

DataGridView.ClipboardCopyMode 属性被设定为 DataGridViewClipboardCopyMode.Disable 以外的情况时,「Ctrl + C」 按下的时候,被选择的单元格的内容会拷贝到系统剪切板内。格式有: Text, UnicodeText,Html, CommaSeparatedValue。可以直接粘贴到 Excel 内。

ClipboardCopyMode 还可以设定 Header部分是否拷贝: EnableAlwaysIncludeHeaderText 拷贝Header部分、EnableWithoutHeaderText 则不拷贝。默认是 EnableWithAutoHeaderText , Header 如果选择了的话,就拷贝。

1) 编程方式实现剪切板的拷贝

Clipboard.SetDataObject(DataGridView1.GetClipboardContent())

2) DataGridView 的数据粘贴

实现剪切板的拷贝比较容易,但是实现 DataGridView 的直接粘贴就比较难了。「Ctrl + V」按下进行粘贴时,DataGridView 没有提供方法,只能自己实现。

以下,是粘贴时简单的事例代码,将拷贝数据粘贴到以选择单元格开始的区域内。

[VB.NET]
&apos; 当前单元格是否选择的判断
If DataGridView1.CurrentCell Is Nothing Then
Return
End If
Dim insertRowIndex As Integer = DataGridView1.CurrentCell.RowIndex

&apos; 获取剪切板的内容,并按行分割
Dim pasteText As String = Clipboard.GetText()
If String .IsNullOrEmpty(pasteText) Then
Return
End If
pasteText
= pasteText.Replace(vbCrLf,vbLf)
pasteText
= pasteText.Replace(vbCr,vbLf)
pasteText.TrimEnd(
New Char (){vbLf})
Dim lines As String () = pasteText.Split(vbLf)

Dim isHeader As Boolean = True
For Each line As String In lines
&apos; 是否是列头
If isHeader Then
isHeader
= False
Else
&apos; 按 Tab 分割数据
Dim vals As String () = line.Split(ControlChars.Tab)
&apos; 判断列数是否统一
If vals.Length - 1 <> DataGridView1.ColumnCount Then
Throw New ApplicationException( " 粘贴的列数不正确。 " )
End If
Dim row As DataGridViewRow = DataGridView1.Rows(insertRowIndex)
&apos; 行头设定
row.HeaderCell.Value = vals( 0 )
&apos; 单元格内容设定
Dim i As Integer
For i = 0 To row.Cells.Count - 1
row.Cells(i).Value
= vals((i + 1 ))
Next i

&apos; DataGridView的行索引+1
insertRowIndex += 1
End If
Next line
[C#]
// 当前单元格是否选择的判断
if (DataGridView1.CurrentCell == null )
return ;
int insertRowIndex = DataGridView1.CurrentCell.RowIndex;

// 获取剪切板的内容,并按行分割
string pasteText = Clipboard.GetText();
if ( string .IsNullOrEmpty(pasteText))
return ;
pasteText
= pasteText.Replace( " " , " " );
pasteText
= pasteText.Replace( &apos; &apos; , &apos; &apos; );
pasteText.TrimEnd(
new char []{ &apos; &apos; });
string []lines = pasteText.Split( &apos; &apos; );

bool isHeader = true ;
foreach ( string line in lines)
{
// 是否是列头
if (isHeader)
{
isHeader
= false ;
continue ;
}

// 按 Tab 分割数据
string []vals = line.Split( &apos; &apos; );
// 判断列数是否统一
if (vals.Length - 1 != DataGridView1.ColumnCount)
throw new ApplicationException( "粘贴的列数不正确。 ");
DataGridViewRowrow
=DataGridView1.Rows[insertRowIndex];
// 行头设定
row.HeaderCell.Value=vals[0];
// 单元格内容设定
for(inti=0;i<row.Cells.Count;i++)
{
row.Cells[i].Value
=vals[i+1];
}

// DataGridView的行索引+1
insertRowIndex++;
}



DataGridView 单元格的ToolTip的设置

DataGridView.ShowCellToolTips = True 的情况下, 单元格的 ToolTip 可以表示出来。对于单元格窄小,无法完全显示的单元格, ToolTip 可以显示必要的信息。

1) 设定单元格的ToolTip内容

[VB.NET]
&apos; 设定单元格的ToolTip内容
DataGridView1( 0 , 0 ).ToolTipText = " 该单元格的内容不能修改 "

&apos; 设定列头的单元格的ToolTip内容
DataGridView1.Columns( 0 ).ToolTipText = " 该列只能输入数字 "

&apos; 设定行头的单元格的ToolTip内容
DataGridView1.Rows( 0 ).HeaderCell.ToolTipText = " 该行单元格内容不能修改 "
[C#]
// 设定单元格的ToolTip内容
DataGridView1[ 0 , 0 ].ToolTipText = " 该单元格的内容不能修改 " ;

// 设定列头的单元格的ToolTip内容
DataGridView1.Columns[ 0 ].ToolTipText = " 该列只能输入数字 " ;

// 设定行头的单元格的ToolTip内容
DataGridView1.Rows[0].HeaderCell.ToolTipText="该行单元格内容不能修改";


2) CellToolTipTextNeeded 事件
在批量的单元格的 ToolTip 设定的时候,一个一个指定那么设定的效率比较低, 这时候可以利用 CellToolTipTextNeeded 事件。当单元格的 ToolTipText 变化的时候也会引发该事件。但是,当DataGridView的DataSource被指定且VirualMode=True的时候,该事件不会被引发。

[VB.NET]
&apos; CellToolTipTextNeeded事件处理方法
Private Sub DataGridView1_CellToolTipTextNeeded( ByVal sender As Object ,_
ByVal e As DataGridViewCellToolTipTextNeededEventArgs)_
Handles DataGridView1.CellToolTipTextNeeded
e.ToolTipText
= e.ColumnIndex.ToString() + " , " + e.RowIndex.ToString()
EndSub
[C#]
// CellToolTipTextNeeded事件处理方法
privatevoidDataGridView1_CellToolTipTextNeeded(objectsender,
DataGridViewCellToolTipTextNeededEventArgse)
{
e.ToolTipText
=e.ColumnIndex.ToString()+","+e.RowIndex.ToString();
}

DataGridView 的右键菜单(ContextMenuStrip)

GO TO TOP
DataGridView,DataGridViewColumn,DataGridViewRow,DataGridViewCell 有 ContextMenuStrip 属性。可以通过设定 ContextMenuStrip 对象来控制 DataGridView 的右键菜单的显示。 DataGridViewColumn 的 ContextMenuStrip 属性设定了 除了列头以外的单元格的右键菜单。 DataGridViewRow 的 ContextMenuStrip 属性设定了除了行头以外的单元格的右键菜单。DataGridViewCell 的 ContextMenuStrip 属性设定了指定单元格的右键菜单。
[VB.NET]
&apos; DataGridView 的 ContextMenuStrip 设定
DataGridView1.ContextMenuStrip = Me .ContextMenuStrip1

&apos; 列的 ContextMenuStrip 设定
DataGridView1.Columns( 0 ).ContextMenuStrip = Me .ContextMenuStrip2
&apos; 列头的 ContextMenuStrip 设定
DataGridView1.Columns( 0 ).HeaderCell.ContextMenuStrip = Me .ContextMenuStrip2

&apos; 行的 ContextMenuStrip 设定
DataGridView1.Rows( 0 ).ContextMenuStrip = Me .ContextMenuStrip3

&apos; 单元格的 ContextMenuStrip 设定
DataGridView1( 0 , 0 ).ContextMenuStrip = Me .ContextMenuStrip4
[C#]
// DataGridView 的 ContextMenuStrip 设定
DataGridView1.ContextMenuStrip = this .ContextMenuStrip1;

// 列的 ContextMenuStrip 设定
DataGridView1.Columns[0].ContextMenuStrip=this.ContextMenuStrip2;
// 列头的 ContextMenuStrip 设定
DataGridView1.Columns[0].HeaderCell.ContextMenuStrip=this.ContextMenuStrip2;

// 行的 ContextMenuStrip 设定
DataGridView1.Rows[0].ContextMenuStrip=this.ContextMenuStrip3;

// 单元格的 ContextMenuStrip 设定
DataGridView1[0,0].ContextMenuStrip=this.ContextMenuStrip4;

对于单元格上的右键菜单的设定,优先顺序是: Cell > Row > Column > DataGridView

⇒ CellContextMenuStripNeeded、RowContextMenuStripNeeded 事件

利用 CellContextMenuStripNeeded 事件可以设定单元格的右键菜单,尤其但需要右键菜单根据单元格值的变化而变化的时候。比起使用循环遍历,使用该事件来设定右键菜单的效率更高。但是,在DataGridView使用了DataSource绑定而且是VirtualMode的时候,该事件将不被引发。

[VB.NET]
&apos;  CellContextMenuStripNeeded事件处理方法
Private Sub DataGridView1_CellContextMenuStripNeeded(_
ByVal sender As Object ,_
ByVal e As DataGridViewCellContextMenuStripNeededEventArgs)_
Handles DataGridView1.CellContextMenuStripNeeded
Dim dgv As DataGridView = CType (sender,DataGridView)
If e.RowIndex < 0 Then
&apos;  列头的ContextMenuStrip设定
e.ContextMenuStrip = Me .ContextMenuStrip1
ElseIf e.ColumnIndex < 0 Then
&apos;  行头的ContextMenuStrip设定
e.ContextMenuStrip = Me .ContextMenuStrip2
ElseIf TypeOf (dgv(e.ColumnIndex,e.RowIndex).Value) Is Integer Then
&apos;  如果单元格值是整数时
e.ContextMenuStrip = Me .ContextMenuStrip3
End If
EndSub

[C#]
//  CellContextMenuStripNeeded事件处理方法
privatevoidDataGridView1_CellContextMenuStripNeeded(objectsender,
DataGridViewCellContextMenuStripNeededEventArgse)
{
DataGridViewdgv
=(DataGridView)sender;
if(e.RowIndex<0)
{
// 列头的ContextMenuStrip设定
e.ContextMenuStrip=this.ContextMenuStrip1;
}
elseif(e.ColumnIndex<0)
{
// 行头的ContextMenuStrip设定
e.ContextMenuStrip=this.ContextMenuStrip2;
}
elseif(dgv[e.ColumnIndex,e.RowIndex].Valueisint)
{
// 如果单元格值是整数时
e.ContextMenuStrip=this.ContextMenuStrip3;
}
}
同样,可以通过 RowContextMenuStripNeeded 事件来设定行的右键菜单。
[VB.NET]
&apos;  RowContextMenuStripNeeded事件处理方法
Private Sub DataGridView1_RowContextMenuStripNeeded(_
ByVal sender As Object ,_
ByVal e As DataGridViewRowContextMenuStripNeededEventArgs)_
Handles DataGridView1.RowContextMenuStripNeeded
Dim dgv As DataGridView = CType (sender,DataGridView)
&apos;  当"Column1"列是Bool型且为True时、 设定其的 ContextMenuStrip
Dim boolVal As Object = dgv( " Column1 " ,e.RowIndex).Value
Console.WriteLine(boolVal)
If TypeOf boolVal Is Boolean AndAlso CBool (boolVal) Then
e.ContextMenuStrip
= Me .ContextMenuStrip1
End If
EndSub
[C#]
//   RowContextMenuStripNeeded事件处理方法
private void DataGridView1_RowContextMenuStripNeeded( object sender,
DataGridViewRowContextMenuStripNeededEventArgse)
{
DataGridViewdgv
= (DataGridView)sender;
//  当"Column1"列是Bool型且为True时、 设定其的 ContextMenuStrip
objectboolVal=dgv["Column1",e.RowIndex].Value;
Console.WriteLine(boolVal);
if(boolValisbool&&(bool)boolVal)
{
e.ContextMenuStrip
=this.ContextMenuStrip1;
}
}


CellContextMenuStripNeeded 事件处理方法的参数中、「e.ColumnIndex=-1」表示行头、「e.RowIndex=-1」表示列头。RowContextMenuStripNeeded则不存在「e.RowIndex=-1」的情况。


DataGridView 的单元格的边框、 网格线样式的设定

GO TO TOP
1) DataGridView 的边框线样式的设定
DataGridView 的边框线的样式是通过 DataGridView.BorderStyle 属性来设定的。 BorderStyle 属性设定值是一个
BorderStyle 枚举: FixedSingle(单线,默认)、Fixed3D、None。

2) 单元格的边框线样式的设定
单元格的边框线的样式是通过 DataGridView.CellBorderStyle 属性来设定的。 CellBorderStyle 属性设定值是
DataGridViewCellBorderStyle 枚举。( 详细参见 MSDN
另外,通过 DataGridView.ColumnHeadersBorderStyle 和 RowHeadersBorderStyle 属性可以修改 DataGridView 的头部的单元格边框线样式。 属性设定值是 DataGridViewHeaderBorderStyle 枚举。( 详细参见 MSDN

3) 单元格的边框颜色的设定
单元格的边框线的颜色可以通过 DataGridView.GridColor 属性来设定的。默认是 ControlDarkDark 。但是只有在 CellBorderStyle 被设定为 Single、SingleHorizontal、SingleVertical 的条件下才能改变其边框线的颜色。同样,ColumnHeadersBorderStyle 以及 RowHeadersBorderStyle 只有在被设定为 Single 时,才能改变颜色。

4) 单元格的上下左右的边框线式样的单独设定
CellBorderStyle只能设定单元格全部边框线的式样。要单独改变单元格某一边边框式样的话,需要用到DataGridView.AdvancedCellBorderStyle属性。如示例:
[VB.NET]
&apos; 单元格的上边和左边线设为二重线
&apos;
单元格的下边和右边线设为单重线
DataGridView1.AdvancedCellBorderStyle.Top = _
DataGridViewAdvancedCellBorderStyle.InsetDouble
DataGridView1.AdvancedCellBorderStyle.Right
= _
DataGridViewAdvancedCellBorderStyle.Inset
DataGridView1.AdvancedCellBorderStyle.Bottom
= _
DataGridViewAdvancedCellBorderStyle.Inset
DataGridView1.AdvancedCellBorderStyle.Left
= _
DataGridViewAdvancedCellBorderStyle.InsetDouble

同样,设定行头单元格的属性是: AdvancedRowHeadersBorderStyle, 设定列头单元格属性是:AdvancedColumnHeadersBorderStyle。


DataGridView 单元格表示值的自定义
通过CellFormatting事件,可以自定义单元格的表示值。(比如:值为Error的时候,单元格被设定为红色)
下面的示例:将“Colmn1”列的值改为大写。
[VB.NET]
&apos; CellFormatting事件处理方法
Private Sub DataGridView1_CellFormatting( ByVal sender As Object ,_
ByVal e As DataGridViewCellFormattingEventArgs)_
Handles DataGridView1.CellFormatting
Dim dgv As DataGridView = CType (sender,DataGridView)

&apos; 如果单元格是“Column1”列的单元格
If dgv.Columns(e.ColumnIndex).Name = " Column1 " AndAlso _
TypeOf e.Value Is String Then
&apos; 将单元格值改为大写
Dim str As String = e.Value.ToString()
e.Value
= str .ToUpper()
&apos; 应用该Format,Format完毕。
e.FormattingApplied = True
End If
EndSub

[C#]
// CellFormatting 事件处理方法
private void DataGridView1_CellFormatting( object sender,
DataGridViewCellFormattingEventArgse)
{
DataGridViewdgv
= (DataGridView)sender;

// 如果单元格是“Column1”列的单元格
if (dgv.Columns[e.ColumnIndex].Name == " Column1 " && e.Value is string )
{
// 将单元格值改为大写
string str = e.Value.ToString();
e.Value
= str.ToUpper();
// 应用该Format,Format完毕。
e.FormattingApplied = true ;
}
}

CellFormatting事件的DataGridViewCellFormattingEventArgs对象的Value属性一开始保存着未被格式化的值。当Value属性被设定表示用的文本之后,把FormattingApplied属性做为True,告知DataGridView文本已经格式化完毕。如果不这样做的话,DataGridView会根据已经设定的Format,NullValue,DataSourceNullValue,FormatProvider属性会将Value属性会被重新格式化一遍。


DataGridView 用户输入时,单元格输入值的设定
通过 DataGridView.CellParsing 事件可以设定用户输入的值。下面的示例:当输入英文文本内容的时候,立即被改变为大写。
[VB.NET]
&apos; CellParsing 事件处理方法
Private Sub DataGridView1_CellParsing( ByVal sender As Object ,_
ByVal e As DataGridViewCellParsingEventArgs)_
Handles DataGridView1.CellParsing
Dim dgv As DataGridView = CType (sender,DataGridView)

&apos; 单元格列为“Column1”时
If dgv.Columns(e.ColumnIndex).Name = " Column1 " AndAlso _
e.DesiredType
Is GetType ( String ) Then
&apos; 将单元格值设为大写
e.Value = e.Value.ToString().ToUpper()
&apos; 解析完毕
e.ParsingApplied = True
End If
EndSub

[C#]
// CellParsing 事件处理方法
privatevoidDataGridView1_CellParsing(objectsender,
DataGridViewCellParsingEventArgse)
{
DataGridViewdgv
=(DataGridView)sender;

//单元格列为“Column1”时
if(dgv.Columns[e.ColumnIndex].Name=="Column1"&&
e.DesiredType
==typeof(string))
{
//将单元格值设为大写
e.Value=e.Value.ToString().ToUpper();
//解析完毕
e.ParsingApplied=true;
}
}



DataGridView 新加行的默认值的设定


需要指定新加行的默认值的时候,可以在DataGridView.DefaultValuesNeeded事件里处理。在该事件中处理除了可以设定默认值以外,还可以指定某些特定的单元格的ReadOnly属性等。

[VB.NET]
&apos; DefaultValuesNeeded事件处理方法
Private Sub DataGridView1_DefaultValuesNeeded( ByVal sender As Object ,_
ByVal e As DataGridViewRowEventArgs)_
Handles DataGridView1.DefaultValuesNeeded
&apos; 设定单元格默认值
e.Row.Cells( " Column1 " ).Value = 0
e.Row.Cells(
" Column2 " ).Value = " - "
EndSub
[C#]
// DefaultValuesNeeded事件处理方法
private void DataGridView1_DefaultValuesNeeded( object sender,
DataGridViewRowEventArgse)
{
// 设定单元格的默认值
e.Row.Cells[ " Column1 " ].Value = 0 ;
e.Row.Cells[
" Column2 " ].Value = " - " ;}

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐


Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 -------------------------------- 数字类型的格式化 --------------------------------     固定格式参数:     General Number 普通数字,如可以用来去掉千位分隔号     format$("100,1
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办法, Format 或者FormatDateTime 竟然结果和系统设置的区域语言的日期和时间格式相关。意思是尽管你用诸如 Format(Now, "MM/dd/yyyy"),如果系统的设置格式区域语言的日期和时间格式分隔符是"-",那他还会显示为 MM-dd-yyyy     只有拼凑: <%response.write
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace My ‘全局错误处理,新的解决方案直接添加本ApplicationEvents.vb 到工程即可 ‘添加后还需要一个From用来显示错误。如果到这步还不会则需要先打好基础啦 ‘======================================================== ‘以下事件
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用的爽呀,这篇文章写与2011年,看来我以前没有认真去找这个方法呀。 https://blog.csdn.net/chzjxgd/article/details/6176325 金蝶K3 BOS的插件官方是用VB6编写的,如果  能用.Net下的语言工具开发BOS插件是一件很愉快的事情,其中缘由不言而喻,而本文则是个人首创,实现在了用V
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选中的单元格进行处理 Dim m As Range, tmpStr As String, s As String Dim x As Integer, y As Integer, subStr As String If MsgBox("确定要分列处理吗?请确定分列的数据会覆盖它后面的单元格!", _
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single) 2 Dim path As String, hash As String 3 For Each fil
  Imports MySql.Data.MySqlClient Public Class Form1 ‘ GLOBAL DECLARATIONS Dim conString As String = "Server=localhost;Database=net2;Uid=root;Pwd=123456;" Dim con As New MySqlConnection
‘導入命名空間 Imports ADODB Imports Microsoft.Office.Interop   Private Sub A1() Dim Sql As String Dim Cnn As New ADODB.Connection Dim Rs As New ADODB.Recordset Dim S As String   S = "Provider=OraOLEDB.Oracl
Imports System.IO Imports System.Threading Imports System.Diagnostics Public Class Form1 Dim A(254) As String    Function ping(ByVal IP As Integer) As String Dim IPAddress As String IPAddress = "10.0.
VB运行EXE程序,并等待其运行结束 参考:https://blog.csdn.net/useway/article/details/5494084 Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Pr
今天碰到一个问题,登陆的时候,如果不需要验证手机号为空,则不去验证手机号 因为登陆的时候所有的验证信息都存放在一个数组里 Dim CheckUserInfo() As String ={UserBirthday, SecEmail, UserMob, UserSex, RealNameFirst, RealName, CheckCardID, CheckCardType, Contactemail
在VB6.0中,数据访问接口有三种: 1、ActiveX数据对象(ADO) 2、远程数据对象(RDO) 3、数据访问对象(DAO) 1.使用ADO(ActiveX Data Objec,ActiveX数据对象)连接SQL Server 1)使用ADO控件连接 使用ADO控件的ConnectionString属性就可以连接SQL Server,该属性包含一个由分号分隔的argument=value语
注:大家如果没有VB6.0的安装文件,可自行百度一下下载,一般文件大小在200M左右的均为完整版的软件,可以使用。   特别提示:安装此软件的时候最好退出360杀毒软件(包括360安全卫士,电脑管家等,如果电脑上有这些软件的话),因为现如今的360杀毒软件直接会对VB6.0软件误报,这样的话就可能会在安装过程中被误报阻止而导致安装失败,或者是安装后缺乏很多必须的组件(其它的杀毒软件或安全卫士之类的
Private Sub Form_Load() Call conndb End Sub Private Function conndb() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strCn, sql As String Dim db_host As String Dim db_user As String
  PPSM06S70:  Add  moddate  EDITSPRINTJOB:  MAX(TO_CHAR(ETRN.MODDATE, ‘yyyy/mm/dd/HH24:MI AM‘)) ACTUAL_SHIPDATE   4.Test Scenario (1) :Query SQL Test DN:8016578337 SELECT CTRN.TKCTID TRUCK_ID,        
  沒有出現CrystalReportViewer時,須安裝CRforVS_13_0. 新增1個數據集,新增1個數據表,添加二列,列名要和資料庫名一樣. 修改目標Framework 修改app.config, <startup >改成<startup useLegacyV2RuntimeActivationPolicy ="true">  CrystalReport1.rpt增加數據庫專家 在表單
Imports System.Threading Imports System Public Class Form1 Dim th1, th2 As Thread Public Sub Method1() Dim i As Integer For i = 1 To 100 If Me.Label1.BackColor =
Friend Const PROCESS_ALL_ACCESS = &H1F0FFF = 2035711 Friend Const PROCESS_VM_READ = &H10 Friend Const PROCESS_VM_WRITE = &H20 Friend Const PAGE_READONLY = &H2 Friend Const PAGE_READWRITE = &H4 Friend
以下代码随手写的 并没有大量测试 效率也有待提升 如果需要C#的请自行转换 Function SplitBytes(Data As Byte(), Delimiter As Byte()) As List(Of Byte()) Dim i = 0 Dim List As New List(Of Byte()) Dim bytes As New
Imports System.Data.SqlClient Public Class Form1 REM Public conn1 As SqlConnection = New SqlConnection("server=.; Integrated Security=False;Initial Catalog= mydatabase1; User ID= sa;password")