Change button font at runtime

If you wish to change the font of the button at runtime, this is how to do it.

      Dim myFont As System.Drawing.Font
       If MakeBold Then
        myFont = New System.Drawing.Font("Microsoft Sans Serif", 8.25, FontStyle.Bold)
      Else
        myFont = New System.Drawing.Font("Microsoft Sans Serif", 8.25, FontStyle.Regular)
      End If
     Button.Font = myFont