VB.Net - Font Dialog Box
Dialog boxes consist of a title bar , an optional main instruction , various controls in the content area , and commit buttons . The Font dialog box lets the user choose attributes for a logical font, such as font family and associated font style, point size, effects , and a script.

The following VB.Net program invites a Font Dialog Box and retrieve the selected Font Name and Font Size.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dlg As New FontDialog
dlg.ShowDialog()
If dlg.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim fontName As String
Dim fontSize As Integer
fontName = dlg.Font.Name
fontSize = dlg.Font.Size
MsgBox(fontName & " " & fontSize)
End If
End Sub
End Class