用RichtextBox
'--------------------
百度VB2010(VB.NET)吧建设发展中,需要你的支持和帮助!!!
快加入我们吧!发表你的疑问,经验,程序,分享..
让我们共同进步!
Dim cx As New FontStyle
If Opt.粗体 Then
cx = cx + FontStyle.Bold
End If
If Opt.斜体 Then
cx = cx + FontStyle.Italic
End If
mfont = New Font(CType(Opt.字体, String), Opt.大小, cx)
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024