 加好友  发短信
等级：三尾狐
帖子：630
积分：5631
威望：0
精华：0
注册：2012/8/2 19:04:00
|
不同页码设置不同的水印  Post By：2024/5/28 15:16:00 [只看该作者]
Dim doc As New PrintDoc '定义一个报表
Dim rt As prt.RenderText '定义一个文本对象
'设置水印
rt = New prt.RenderText '设置文本对象的内容
rt.Text = "Foxtable" '设置文本内容
rt.Width = "Parent.Width" '宽度等于页面宽度
rt.Height = "Parent.Height" '高度等于页面高度
rt.Style.TextAngle = 45 '旋转45度
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中对齐
rt.Style.TextAlignVert = prt.AlignVertEnum.Center '垂直居中对齐
rt.Style.FontSize = 72 '字体大小为8磅
rt.Style.TextColor = Color.Gray '文本颜色为灰色
Doc.WaterMark = rt '作为水印使用
doc.Preview() '预览
老师,这个水印可以设置不容的页码用不同的水印不?
|
|
