- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 拼接字符串中 怎么表示“号呢？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133447)
-- 发布时间：2019/4/14 13:31:00
-- 拼接字符串中 怎么表示“号呢？
想实现replace(【姓名】,e.DataRow(姓名)格式为： replace("【姓名】",e.DataRow("姓名"))
红色部分 ""该怎么表示呢？
Dim str As String = ""
For Each c As Col In Tables("告知内容").cols
str &= "【"& c.name & "】"
Dim r As Row =Tables("aaa").addnew
r("第一列")=c.name
r("第二列")="【" & c.name & "】" & ",e" & "." & "DataRow" & "(" & "" & c.name & "" & ")"
r("第三列")="replace(" & r("第二列")
Next
此主题相关图片如下：qq图片20190414132939.png
[此贴子已经被作者于2019/4/14 13:39:39编辑过]
-- 发布时间：2019/4/14 17:10:00
--
Dim str As String = "【姓名】您好!【嫌疑人姓名】涉嫌【涉嫌案由】一案,【移送机关】于【受理日期】移送我院【流程名称】,根据系统轮案规则,现由你进行办理,请在【到期日期】前,办理完毕!有疑问请咨询案管办【案管办电话】!请参考:【法律法规】"
For Each c As Col In Tables("告知内容").cols
str = str.replace("【" & c.name & "】", e.DataRow(c.name))
Next
msgbox(str)