Font Dialog Komutu

          ToolBox penceresinde yer alan komutlardan biri de FontDialog komutudur. Bizler bu komutu yaptığımız programlarda yazılan yada var olan nesneler üzerindeki yazıların fontunu değiştirmek için kullanacağız. Mesela Label, TextBox üzerindeki yazıların fontlarını değiştirmek için kullanabiliriz.

         Bunu küçük bir örnekle pekiştirmek çok iyi olacak. Şimdi aşağıdaki forma benzer bir form hazırlayalım.  Daha sonra da form üzerine FontDialog nesnesini atalım.

   -    Eklediğimiz TextBoxın Properties penceresinden multiline özelliğini true yapalım. 
   -    Şimdi de aşağıdaki kodu kod penceresine yazalım.

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If FontDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            TextBox1.Font = FontDialog1.Font

        End If

    End Sub

End Class

   -    Şimdi de farklı bir buton ekleyelim ve içine aşağıdaki kodu yazalım. Buradaki amacımız: TextBox üzerinde yazdığımız yazıları kopyalayıp farklı bir metin belgesine kopyalayabilme.

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

        If TextBox1.Text <> "" Then

            TextBox1.Focus()

            TextBox1.SelectAll()

            TextBox1.Copy()

        End If

    End Sub