DataGridView编程（二）

【转】http://blog.sina.com.cn/s/blog_4b4570920100c2a6.html~type=v5_one&label=rela_nextarticle

⑩ DataGridView 列顺序的调整GO TO TOP设定 DataGridView 的 AllowUserToOrderColumns 为 True 的时候，用户可以自由调整列的顺序。当用户改变列的顺序的时候，其本身的 Index 不会改变，但是 DisplayIndex 改变了。你也可以通过程序改变 DisplayIndex 来改变列的顺序。 列顺序发生改变时会引发 ColumnDisplayIndexChanged 事件：[VB.NET]' 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)End Sub[C#]// DataGridView1的ColumnDisplayIndexChanged事件处理方法private void DataGridView1_ColumnDisplayIndexChanged(object sender,DataGridViewColumnEventArgs e){ Console.WriteLine("{0} 的位置改变到 {1} ",e.Column.Name,e.Column.DisplayIndex);}⑪ DataGridView 行头列头的单元格GO TO TOP[VB.NET]' DataGridView1的第一列列头内容DataGridView1.Columns(0).HeaderCell.Value = "第一列"' DataGridView1的第一行行头内容DataGridView1.Rows(0).HeaderCell.Value = "第一行"' DataGridView1的左上头部单元内容DataGridView1.TopLeftHeaderCell.Value = "左上"[C#]// 改变DataGridView1的第一列列头内容DataGridView1.Columns[0].HeaderCell.Value = "第一列";// 改变DataGridView1的第一行行头内容DataGridView1.Rows[0].HeaderCell.Value = "第一行";// 改变DataGridView1的左上头部单元内容DataGridView1.TopLeftHeaderCell.Value = "左上";另外你也可以通过 HeaderText 来改变他们的内容。[VB.NET]' 改变DataGridView1的第一列列头内容DataGridView1.Columns(0).HeaderText = "第一列"[C#]// 改变DataGridView1的第一列列头内容DataGridView1.Columns[0].HeaderText = "第一列";⑫ DataGridView 剪切板的操作GO TO TOPDataGridView.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]' 当前单元格是否选择的判断If DataGridView1.CurrentCell Is Nothing Then ReturnEnd IfDim insertRowIndex As Integer = DataGridView1.CurrentCell.RowIndex' 获取剪切板的内容，并按行分割Dim pasteText As String = Clipboard.GetText()If String.IsNullOrEmpty(pasteText) Then ReturnEnd IfpasteText = 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 = TrueFor Each line As String In lines ' 是否是列头 If isHeader Then isHeader = False Else ' 按 Tab 分割数据 Dim vals As String() = line.Split(ControlChars.Tab) ' 判断列数是否统一 If vals.Length - 1 <> DataGridView1.ColumnCount Then Throw New ApplicationException("粘贴的列数不正确。") End If Dim row As DataGridViewRow = DataGridView1.Rows(insertRowIndex) ' 行头设定 row.HeaderCell.Value = vals(0) ' 单元格内容设定 Dim i As Integer For i = 0 To row.Cells.Count - 1 row.Cells(i).Value = vals((i + 1)) Next i ' DataGridView的行索引+1 insertRowIndex += 1 End IfNext 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(' ',' ');pasteText.TrimEnd(new char[] { ' ' });string[] lines = pasteText.Split(' ');bool isHeader = true;foreach (string line in lines){ // 是否是列头 if (isHeader) { isHeader = false; continue; } // 按 Tab 分割数据 string[] vals = line.Split(' '); // 判断列数是否统一 if (vals.Length - 1 != DataGridView1.ColumnCount) throw new ApplicationException("粘贴的列数不正确。"); DataGridViewRow row = DataGridView1.Rows[insertRowIndex]; // 行头设定 row.HeaderCell.Value = vals[0]; // 单元格内容设定 for (int i = 0; i < row.Cells.Count; i++) { row.Cells[i].Value = vals[i + 1]; } // DataGridView的行索引+1 insertRowIndex++;}⑬ DataGridView 单元格的ToolTip的设置GO TO TOPDataGridView.ShowCellToolTips = True 的情况下， 单元格的 ToolTip 可以表示出来。对于单元格窄小，无法完全显示的单元格， ToolTip 可以显示必要的信息。1） 设定单元格的ToolTip内容[VB.NET]' 设定单元格的ToolTip内容DataGridView1(0,0).ToolTipText = "该单元格的内容不能修改"' 设定列头的单元格的ToolTip内容DataGridView1.Columns(0).ToolTipText = "该列只能输入数字"' 设定行头的单元格的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]' CellToolTipTextNeeded事件处理方法Private Sub DataGridView1_CellToolTipTextNeeded(ByVal sender As Object,_ ByVal e As DataGridViewCellToolTipTextNeededEventArgs) _ Handles DataGridView1.CellToolTipTextNeeded e.ToolTipText = e.ColumnIndex.ToString() + "," + e.RowIndex.ToString()End Sub[C#]// CellToolTipTextNeeded事件处理方法private void DataGridView1_CellToolTipTextNeeded(object sender,DataGridViewCellToolTipTextNeededEventArgs e){ e.ToolTipText = e.ColumnIndex.ToString() + "," + e.RowIndex.ToString();}⑭ DataGridView 的右键菜单（ContextMenuStrip）GO TO TOPDataGridView,DataGridViewColumn,DataGridViewRow,DataGridViewCell 有 ContextMenuStrip 属性。可以通过设定 ContextMenuStrip 对象来控制 DataGridView 的右键菜单的显示。 DataGridViewColumn 的 ContextMenuStrip 属性设定了除了列头以外的单元格的右键菜单。 DataGridViewRow 的 ContextMenuStrip 属性设定了除了行头以外的单元格的右键菜单。DataGridViewCell 的 ContextMenuStrip 属性设定了指定单元格的右键菜单。[VB.NET]' DataGridView 的 ContextMenuStrip 设定DataGridView1.ContextMenuStrip = Me.ContextMenuStrip1' 列的 ContextMenuStrip 设定DataGridView1.Columns(0).ContextMenuStrip = Me.ContextMenuStrip2' 列头的 ContextMenuStrip 设定DataGridView1.Columns(0).HeaderCell.ContextMenuStrip = Me.ContextMenuStrip2' 行的 ContextMenuStrip 设定DataGridView1.Rows(0).ContextMenuStrip = Me.ContextMenuStrip3' 单元格的 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]'　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 '　列头的ContextMenuStrip设定 e.ContextMenuStrip = Me.ContextMenuStrip1 ElseIf e.ColumnIndex < 0 Then '　行头的ContextMenuStrip设定 e.ContextMenuStrip = Me.ContextMenuStrip2 ElseIf TypeOf (dgv(e.ColumnIndex,e.RowIndex).Value) Is Integer Then '　如果单元格值是整数时 e.ContextMenuStrip = Me.ContextMenuStrip3 End IfEnd Sub[C#]//　CellContextMenuStripNeeded事件处理方法private void DataGridView1_CellContextMenuStripNeeded(object sender,DataGridViewCellContextMenuStripNeededEventArgs e){ DataGridView dgv = (DataGridView)sender; if (e.RowIndex < 0) { //　列头的ContextMenuStrip设定 e.ContextMenuStrip = this.ContextMenuStrip1; } else if (e.ColumnIndex < 0) { //　行头的ContextMenuStrip设定 e.ContextMenuStrip = this.ContextMenuStrip2; } else if (dgv[e.ColumnIndex,e.RowIndex].Value is int) { //　如果单元格值是整数时 e.ContextMenuStrip = this.ContextMenuStrip3; }}同样，可以通过　RowContextMenuStripNeeded　事件来设定行的右键菜单。[VB.NET]'　RowContextMenuStripNeeded事件处理方法Private Sub DataGridView1_RowContextMenuStripNeeded( _ ByVal sender As Object,_ ByVal e As DataGridViewRowContextMenuStripNeededEventArgs) _ Handles DataGridView1.RowContextMenuStripNeeded Dim dgv As DataGridView = CType(sender,DataGridView) '　当"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 IfEnd Sub[C#]//　RowContextMenuStripNeeded事件处理方法private void DataGridView1_RowContextMenuStripNeeded(object sender,DataGridViewRowContextMenuStripNeededEventArgs e){ DataGridView dgv = (DataGridView)sender; //　当"Column1"列是Bool型且为True时、设定其的ContextMenuStrip object boolVal = dgv["Column1",e.RowIndex].Value; Console.WriteLine(boolVal); if (boolVal is bool && (bool)boolVal) { e.ContextMenuStrip = this.ContextMenuStrip1; }}CellContextMenuStripNeeded　事件处理方法的参数中、「e.ColumnIndex=-1」表示行头、「e.RowIndex=-1」表示列头。RowContextMenuStripNeeded则不存在「e.RowIndex=-1」的情况。⑮ DataGridView 的单元格的边框、 网格线样式的设定GO TO TOP1) 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]' 单元格的上边和左边线设为二重线' 单元格的下边和右边线设为单重线DataGridView1.AdvancedCellBorderStyle.Top = _ DataGridViewAdvancedCellBorderStyle.InsetDoubleDataGridView1.AdvancedCellBorderStyle.Right = _ DataGridViewAdvancedCellBorderStyle.InsetDataGridView1.AdvancedCellBorderStyle.Bottom = _ DataGridViewAdvancedCellBorderStyle.InsetDataGridView1.AdvancedCellBorderStyle.Left = _ DataGridViewAdvancedCellBorderStyle.InsetDouble同样，设定行头单元格的属性是： AdvancedRowHeadersBorderStyle，设定列头单元格属性是：AdvancedColumnHeadersBorderStyle。⑯ DataGridView 单元格表示值的自定义GO TO TOP通过CellFormatting事件，可以自定义单元格的表示值。（比如：值为Error的时候，单元格被设定为红色）下面的示例：将“Colmn1”列的值改为大写。[VB.NET]'CellFormatting 事件处理方法Private Sub DataGridView1_CellFormatting(ByVal sender As Object,_ ByVal e As DataGridViewCellFormattingEventArgs) _ Handles DataGridView1.CellFormatting Dim dgv As DataGridView = CType(sender,DataGridView) ' 如果单元格是“Column1”列的单元格 If dgv.Columns(e.ColumnIndex).Name = "Column1" AndAlso _ TypeOf e.Value Is String Then ' 将单元格值改为大写 Dim str As String = e.Value.ToString() e.Value = str.ToUpper() ' 应用该Format，Format完毕。 e.FormattingApplied = True End IfEnd Sub[C#]//CellFormatting 事件处理方法private void DataGridView1_CellFormatting(object sender,DataGridViewCellFormattingEventArgs e){ DataGridView dgv = (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 用户输入时，单元格输入值的设定GO TO TOP通过 DataGridView.CellParsing 事件可以设定用户输入的值。下面的示例：当输入英文文本内容的时候，立即被改变为大写。[VB.NET]'CellParsing 事件处理方法Private Sub DataGridView1_CellParsing(ByVal sender As Object,_ ByVal e As DataGridViewCellParsingEventArgs) _ Handles DataGridView1.CellParsing Dim dgv As DataGridView = CType(sender,DataGridView) ' 单元格列为“Column1”时 If dgv.Columns(e.ColumnIndex).Name = "Column1" AndAlso _ e.DesiredType Is GetType(String) Then ' 将单元格值设为大写 e.Value = e.Value.ToString().ToUpper() ' 解析完毕 e.ParsingApplied = True End IfEnd Sub[C#]//CellParsing 事件处理方法private void DataGridView1_CellParsing(object sender,DataGridViewCellParsingEventArgs e){ DataGridView dgv = (DataGridView)sender; //单元格列为“Column1”时 if (dgv.Columns[e.ColumnIndex].Name == "Column1" && e.DesiredType == typeof(string)) { //将单元格值设为大写 e.Value = e.Value.ToString().ToUpper(); //解析完毕 e.ParsingApplied = true; }}⑱ DataGridView 新加行的默认值的设定GO TO TOP需要指定新加行的默认值的时候，可以在DataGridView.DefaultValuesNeeded事件里处理。在该事件中处理除了可以设定默认值以外，还可以指定某些特定的单元格的ReadOnly属性等。[VB.NET]' DefaultValuesNeeded 事件处理方法Private Sub DataGridView1_DefaultValuesNeeded(ByVal sender As Object,_ ByVal e As DataGridViewRowEventArgs) _ Handles DataGridView1.DefaultValuesNeeded ' 设定单元格默认值 e.Row.Cells("Column1").Value = 0 e.Row.Cells("Column2").Value = "-"End Sub[C#]// DefaultValuesNeeded 事件处理方法private void DataGridView1_DefaultValuesNeeded(object sender,DataGridViewRowEventArgs e){ // 设定单元格的默认值 e.Row.Cells["Column1"].Value = 0; e.Row.Cells["Column2"].Value = "-";}