水晶報表公式換行8/2

Basic:
dim ss(2) as string
ss=split({命令.chk},"-")
dim s1,s2 as string
s1="":s2=""
if ubound(ss)>=1 then s1=ss(1)
if ubound(ss)=2 then s2=ss(2)
dim remark as string
remark={命令.remark}+chr(13)
remark=remark+"付款帳戶:"+s2+chr(13)
remark=remark+"付款帳號:"+s1+chr(13)
remark=remark+"支票號碼:"+{命令.sno}+chr(13)
remark=remark+"收款人名稱:"+{命令.suer}+chr(13)
formula =remark

參考來源:http://topic.csdn.net/t/20051109/14/4382016.html