DataGrid中如何改变某一列的颜色

[zzmdegm]

注：是列的颜色改变。

给出具体代码

[dalianu]

这样类似的问题不下有10个了....

Private Sub AddColumn(ByVal pTyle As DataGridTextBoxColumn)
With pTyle
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.MappingName = "CATEGORYNAME" '影射CATEGORYNAME字段
'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.NullText = String.Empty
.Width = 250 '列宽
.Alignment = HorizontalAlignment.Left
.NullText = String.Empty
.ReadOnly = True

End With

End Sub

Public Sub CreatColumnsEvent()

Dim ts As New DataGridTableStyle
Dim DataGridTextBoxColumn1 As New DataGridTextBoxColumn

With ts
With .GridColumnStyles
.Add(DataGridTextBoxColumn1)
AddColumn(DataGridTextBoxColumn1)

'背景颜色
DataGridTextBoxColumn1.TextBox.BackColor = Color.Cyan

End With
End With
ts.RowHeadersVisible = True
ts.ColumnHeadersVisible = True

Me.drgTest.TableStyles.Add(ts)

AddHandler DataGridTextBoxColumn1.TextBox.Enter, New EventHandler(AddressOf objDealWithTextEnter)


End Sub


Public Sub objDealWithTextEnter(ByVal sender As System.Object, ByVal e As System.EventArgs)
''''''''''''''''''''''''''''''''''
'点DATAGRID需要什么操作可写在这里
''''''''''''''''''''''''''''''''''

End Sub

把CreatColumnsEvent放到DataGrid的.Enter事件中
如: Private Sub drgTest_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles drgTest.Enter
CreatColumnsEvent()
End Sub
其实只要你DataGridTextBoxColumn的MappingName影射到所需要点击改变颜色的那列,问题就容易解决多了.不过表有名字也要影射

[filebat]

http://www.syncfusion.com/faq/windowsforms/Default.aspx
good.....!!!

多谢，　AntingZ(夕惕若)

[zzmdegm]

to：AntingZ(夕惕若)

你给的这个地址不能上载，也不能打开网页啊！

[AntingZ]

我这边是可以打开的,可能是国外的网站,有些慢,我也有时打不开.
我把你的Email短消息发给我,我把例子转发给你.

[zzmdegm]

我的E-mail: [e-mail]

[AntingZ]

http://www.syncfusion.com/faq/winforms/Files/DataGridCellFormatting_vb.zip

[luckxiayu]

可以也给一份给我吗？我也要！谢谢！！！
[e-mail]

[APP开发王]

晕啊，简单的问题