以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  foxtable事件编程  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=180975)

--  作者:gy1836532143
--  发布时间:2022/10/20 19:48:00
--  foxtable事件编程

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20221020194316.png
图片点击可在新窗口打开查看


各位老师好,我想通过代码将一个人的身份证分成三个部分,每部分6各数字,分别填入三列。我的代码思路如图所示,但是不知道为什么实现不了。
Select Case e.DataCol.name
    Case "身份证号"
        If e.DataRow.IsNull("身份证号") Then
            e.DataRow("一部分") = Nothing
        Else
            Dim bm As String = e.DataRow("身份证号").SubString(0, 6)
            e.DataRow("一部分")=bm
        End If
End Select

--  作者:有点蓝
--  发布时间:2022/10/20 20:38:00
--  
下面的代码没有问题,已有数据重置一下列
--  作者:gy1836532143
--  发布时间:2022/10/22 18:27:00
--  
老师,我已经重置列了,还是不出结果,我感觉是不是最后一句e.DataRow("一部分") = bm有问题
--  作者:有点蓝
--  发布时间:2022/10/23 20:05:00
--  
我测试没有问题,请上传实例说明
--  作者:gy1836532143
--  发布时间:2022/10/23 21:21:00
--  foxtable事件编程
抱歉老师,我重置列重置错了,谢谢老师指点