以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字符连接代码如何改  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147187)

--  作者:fytea
--  发布时间:2020/3/11 16:39:00
--  字符连接代码如何改
照片号结构为:
全宗号-保管期限-册号-张号-组内张数
如果“组内张数”为空,照片号结构为:
全宗号-保管期限-册号-张号
下面代码如何改
If e.Table.current.IsNull("全宗号") Or e.Table.current.IsNull("保管期限") Or e.Table.current.IsNull("册号") Or e.Table.current.IsNull("张号") Or e.Table.current.IsNull("组内张数") Then
    e.Table.current("照片号")=""
Else
    e.Table.current("照片号") = e.Table.current("全宗号")&"-"& e.Table.current("保管期限")&"-"& e.Table.current("册号")&"-"& e.Table.current("张号")&"-"& e.Table.current("组内张数")
End If


--  作者:有点蓝
--  发布时间:2020/3/11 16:43:00
--  
dim str as string = e.Table.current("全宗号")&"-"& e.Table.current("保管期限")&"-"& e.Table.current("册号")&"-"& e.Table.current("张号")&"-"& e.Table.current("组内张数")

e.Table.current("照片号") = str.replace("---","-").replace("--","-").trim("-")