首页上一页 1 下一页尾页 4 条记录 1/1页
X = (Picture2.ScaleWidth - W) / 2
第一次运行与第二次运行的值不一样。程序没有任何参数改变。
Picture2.FontSize = 22
Picture2.Font = "楷体_GB2312"
Picture2.FontBold = True
Picture2.CurrentX = (Picture2.ScaleWidth - TextWidth(Adodc9.Recordset.Fields("单位名称"))) / 2
Picture2.CurrentY = 580
Picture2.Print Adodc9.Recordset.Fields("单位名称")
Picture2.FontSize = 16
Picture2.Font = "楷体_GB2312"
Picture2.CurrentX = (Picture2.ScaleWidth - TextWidth("处方笺")) / 2
Picture2.CurrentY = 1000
Picture2.Print "处方笺"