时间和字符混合处理

最后一行需要拼数据，时间列要显示“合计”
if Year ({TS_TransPetroInfo.f_ReceiveTime})=1900 then "合计" else ToText (Date({TS_TransPetroInfo.f_ReceiveTime}))

以1900为标志，如果是，则显示“合计”，不是，就显示转换后的字符