[VB.NET]font属性重要问题 在线等！

<script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
font属性重要问题 在线等！
一个label在代码中设置Font.Bold Font.Italic Font.Underline Font.StrikeThrough 等属性时 被告知readonly， 如何改变其属性。有什么方法？
__________________________________________________________________________
用新的font对象
Dim f As New Font(Label1.Font, FontStyle.Italic Or FontStyle.Strikeout Or FontStyle.Underline)

Label1.Font = f

*****************************************************************************
欢迎使用优快云论坛专用阅读器 : 优快云 Reader(附全部源代码)

http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
Label1.Font = New Font(Label1.Font, FontStyle.Bold)
其它一样
__________________________________________________________________________
谢谢
__________________________________________________________________________