VB Program - GroupBox

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If RadioButton1.Checked = True Then
            TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Bold)
        ElseIf RadioButton2.Checked = True Then
            TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Italic)
        ElseIf RadioButton3.Checked = True Then
            TextBox1.Font = New System.Drawing.Font(TextBox1.Font, FontStyle.Underline)
        End If
    End Sub

    Private Sub GroupBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox1.Enter

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        End
    End Sub
End Class