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

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

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

朱女士

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

加好友

发短信

等级：一尾狐帖子：445 积分：3633 威望：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

加好友

发短信

等级：超级版主帖子：106688 积分：542629 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/9/9 16:04:00 [只看该作者]

没看懂，贴出完整代码

朱女士

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

加好友

发短信

等级：一尾狐帖子：445 积分：3633 威望：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 的字符串变量中，而“魏德曼_层压木费用”是一个字段名，我要引用它。不知道怎么转化引用。