Ron -
I woudl declare the two fonts (bold and not) as private variables (ie
as "fields" in OOP terminology), and set their values in the form's
onload event handler. That will allow you to reuse the same font
objects and swap them as needed, instead of constructing a new one
each time you desire thie effect. See how much cleaner this is?
Private myFont As Font
Private myFontBold As Font
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
myFont = New Font(Label1.Font, FontStyle.Regular)
myFontBold = New Font(Label1.Font, FontStyle.Bold)
End Sub
Private Sub BoldDemo(ByVal DoIt As Boolean)
If DoIt Then
Label1.Font = myFontBold
Else
Label1.Font = myFont
End If
End Sub
Good Luck,
-Mark