以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请教，如何设置让身份证号码末四位显示****  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91229)
--  作者：nbsfy3378
--  发布时间：2016/10/4 11:50:00
--  [求助]请教，如何设置让身份证号码末四位显示****
[求助]请教，如何设置让身份证号码末四位显示****
--  作者：狐狸爸爸
--  发布时间：2016/10/5 6:48:00
--  
用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
--  作者：nbsfy3378
--  发布时间：2016/10/5 7:27:00
--  
执行后，只显示后四位数字+****。
我需要的的是显示后四位数字为****。
--  作者：nbsfy3378
--  发布时间：2016/10/5 7:29:00
--  
解决了！
只要代码改为
 e.text = txt.subString(0，txt.Length-4) & "****"
就可以了！
谢谢狐爸！