主题：[求助]请教，如何设置让身份证号码末四位显示****

用drawcell事件：

if e.Col.Name = "身份证号码"

    dim txt As String = e.row("身份证号码")

    if txt.Length > 4 then

      e.text = txt.subString(txt.Length-4) & "****"

    End if

End if

我需要的的是显示后四位数字为****。

只要代码改为