字符串转字段名 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 字符串转字段名

共有3874人关注过本帖树形打印复制链接主题：字符串转字段名

朱女士

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

加好友

发短信

等级：二尾狐帖子：514 积分：4083 威望：0 精华：0 注册：2020/2/8 11:14:00

字符串转字段名 发帖心情

Post By：2020/9/9 15:52:00 [显示全部帖子]

老师您好！

我想将字符串转成字段名，不知道怎么实现？谢谢！

For Each kh As String In khs
            '累计

            ylkje1= Tables("ylckb").Compute("Sum(出库_含税额)","[客户]='" & kh & "'And substring([ddlb],1,1)='c '")
            ylkje2= Tables("ylckb").Compute("Sum(出库_含税额)","[客户]='" & kh & "'And substring([ddlb],1,1)='z '")
            zd1=kh+"_累计层压木费用"
            zd2=kh +"_累计纸板费用"

            wr(zd1)=ylkje1
            wr(zd2)=ylkje2
我用绿色标识的句子。

朱女士

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

加好友

发短信

等级：二尾狐帖子：514 积分：4083 威望：0 精华：0 注册：2020/2/8 11:14:00

Post By：2020/9/9 16:13:00 [显示全部帖子]

Dim khs As String()={"abb","魏德曼","博驰","博瑞","望变"}
For Each kh As String In khs


            ylkje1= Tables("ylckb").Compute("Sum(出库_含税额)","[客户]='" & kh & "'And substring([ddlb],1,1)='c '")
            ylkje2= Tables("ylckb").Compute("Sum(出库_含税额)","[客户]='" & kh & "'And substring([ddlb],1,1)='z '")
            zd1=kh+"_累计层压木费用"
            zd2=kh +"_累计纸板费用"

            wr(zd1)=ylkje1
            wr(zd2)=ylkje2
next

其中的kh是遍历的客户名称，比如“魏德曼”，我将“魏德曼_层压木费用”放到zd1 的字符串变量中，而“魏德曼_层压木费用”是一个字段名，我要引用它。不知道怎么转化引用。

朱女士

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

加好友

发短信

等级：二尾狐帖子：514 积分：4083 威望：0 精华：0 注册：2020/2/8 11:14:00

Post By：2020/9/9 17:19:00 [显示全部帖子]

For Each wr As DataRow In DataTables("客户成本分摊表").DataRows

朱女士

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

加好友

发短信

等级：二尾狐帖子：514 积分：4083 威望：0 精华：0 注册：2020/2/8 11:14:00

Post By：2020/9/10 9:15:00 [显示全部帖子]

老师您好！

我昨天的问题已经解决。谢谢！

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

主题：字符串转字段名