通过设置好象不行,不过可以用代码解决:
datacolchanging事件:
If e.DataCol.name = "第一列" Then Dim s1 As String = e.NewValue If s1 Like "*_" AndAlso s1.Length = 11 Then e.NewValue = s1.Substring(0,10) End IfEnd If