If getConfigValue("启用水印",True) = True
s = Nothing
Dim wra As new prt.RenderArea
rx = New prt.RenderText '设置文本对象的内容
For i As Integer = 1 To e.Form.Controls("水印数").Text
s = s & getConfigValue("水印文字","请先选择学校名称!") & vbcrlf & vbcrlf & vbcrlf
Next
s = s & "&&"
s = s .Replace(vbcrlf & vbcrlf & vbcrlf & "&&","")
rx.Text = s '设置文本内容
rx.Style.TextAngle = 20 '旋转45度
rx.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中对齐
rx.Style.TextAlignVert = prt.AlignVertEnum.Center '垂直居中对齐
rx.Style.FontSize = 25'字体大小为8磅
rx.Style.TextColor = Color.Gray '文本颜色为灰色
wra.y = 10
wra.x = 0
wra.Children.Add(rx)
ra.Children.add(wra) '作为水印使用
End If
我想设rx的字体为隶书,怎么设?