Dim
rp
As
New
RtfPrinter("c:\Data\report.rtf")
rp.Replace("{Today}", Date.Today)
rp.Preview()
上面的{TODAY}在RTF文件中应该没有“”吧？另外如果不是DATE型的，是字符或其它类型的如何替换？
如：{日期}，换成列[报告日期]的中文大写？
这样做提示错误？
Dim rp As New RtfPrinter("受理通知单.rtf")
rp.DataRow = Tables("房产登记").Current.DataRow '套打订单表的选定行.
rp.Replace("{日期}", CUDate("报告日期"))
rp.Preview()
rp.Replace("{日期}", CUDate("报告日期"))
上面的代码是什么意思？ "报告日期"是一个字符，能转换为日期吗？
应该是：
rp.Replace("{日期}", CUDate(rp.DataRow("报告日期")))
呵呵，数据、变量、行、列，这些基本的概念，你还没有搞明白呢。
呵呵。另外套打时怎么格式保存不下来呢？全部都缩到一块去了？且不支持线条？