Show Font dialog and get select font and font color

Imports System
Imports System.Data
Imports System.Windows.Forms
Imports System.Drawing

Public Class MainClass
    
    Shared Sub Main()
        Dim dlgFont As System.Windows.Forms.FontDialog
        dlgFont = New System.Windows.Forms.FontDialog
        
        'dlgFont.Font = set your font here
        
        If dlgFont.ShowDialog() = DialogResult.OK Then
            Console.WriteLine( dlgFont.Font )
            Console.WriteLine( dlgFont.Color )
        End If

    End Sub
End Class

Related examples in the same category

1.	Font dialog: turn color option on
2.	Use Font dialog to change TextBox font
3.	Font dialog in VB.net

Show Font dialog and get select font and font color : Dialog Font « GUI « VB.Net

Related examples in the same category