以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  定义字符串  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=107255)
--  作者：kaituozhe
--  发布时间：2017/9/24 11:01:00
--  定义字符串

Dim ZCQC As String = "资产期初金额"
Dim HBZJ As String = "资产项目= \'货币资金\'and 会计年度 = \'" & e.DataRow("会计年度") & "\' And 期间 = \'" & e.DataRow("期间") & "\'"
Select Case e.DataCol.name
    Case "资产期初金额"
        e.DataTable.find("资产项目= \'流动资产合计\'")("ZCQC") = e.DataTable.Compute("sum(资产期初金额)",HBZJ)
End Select

上述代码中黄色部分我也想用字符代替，但是不能Dim ZCQC As String = 资产期初金额这样定义字符串，该怎么办？
--  作者：y2287958
--  发布时间：2017/9/24 11:06:00
--  
 e.DataTable.find("资产项目= \'流动资产合计\'")(ZCQC) = e.DataTable.Compute("sum(" & ZCQC & ")",HBZJ)

用之前要判断一下该行是否存在