If e.Col.name = "第二列" AndAlso e.text >"" Then Dim d As Double = e.Row("第二列") If d > e.Row("第一列") e.Text = e.Text & "↑" ElseIf d < e.Row("第一列") e.Text = e.Text & "↓" End IfEnd If
此外设计表的时候,要注意列的类型