Foxtable(狐表)用户栏目专家坐堂 → 我要用一张图片设置背景呢?


  共有2200人关注过本帖树形打印复制链接

主题:我要用一张图片设置背景呢?

帅哥哟,离线,有人找我吗?
zgjmost
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:498 积分:4611 威望:0 精华:0 注册:2013/4/25 8:02:00
我要用一张图片设置背景呢?  发帖心情 Post By:2015/6/15 19:41:00 [只看该作者]

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()
'预览

 

设在这个的准考证表格的里面

 

 

 

 


图片点击可在新窗口打开查看此主题相关图片如下:44455.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/6/15 19:47:00 [只看该作者]

Dim rm As New prt.RenderImage() '定义一个图片对象
rm.Image = GetImage("c:\data\123.jpg") '请改为实际的图标名称和路径
Doc.WaterMark = rm '作为水印使用
[此贴子已经被作者于2015/6/15 19:54:12编辑过]

 回到顶部