有字符型和整数型，怎么改代码啊？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 有字符型和整数型，怎么改代码啊？

共有1621人关注过本帖树形打印复制链接主题：有字符型和整数型，怎么改代码啊？

xhydxs

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：249 积分：2238 威望：0 精华：0 注册：2016/10/29 14:17:00

有字符型和整数型，怎么改代码啊？ 发帖心情

Post By：2017/3/24 16:30:00 [只看该作者]

Case "遗属身份证号码"
        Dim nms() As String = {"每月享受补助金额","调标后每月补助金额","遗属姓名"}
        If e.Newvalue Is Nothing Then
            For Each nm As String In nms
                e.DataRow(nm) = Nothing
            Next
        Else
            Dim pr As DataRow
            pr = DataTables("遗属基础信息").Find("遗属身份证号码 ='" & e.Newvalue &"'")
            If pr IsNot Nothing Then
                For Each nm As String In nms
                    e.DataRow(nm) = pr(nm)
                Next
            End If
        End If

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/24 16:31:00 [只看该作者]

代码不用改，报神没错？

下一主题 >> << 上一主题

主题：有字符型和整数型，怎么改代码啊？