In questa piccola guida vi spiegherò come creare i “dialogs” che sono fondamentali in vb.net.

I Color Dialog
Mettiamo che volessi fare un modo che l’ utente tramite un Color Dialog possa scegliere il colore dello sfondo del programma tramite un Dialogo per scegliere i colori utilizzo il seguente codice:
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim color As New ColorDialog
        If color.ShowDialog = Windows.Forms.DialogResult.OK Then
            Me.BackColor = color.Color
        End If
    End Sub
End Class

Come vedere prima dichiarato una variabile ed ho detto che deve essere un nuovo Color Dialog.
Poi ho usato un if che se la finestra del Dialogo risulta cliccata su ok il colore dello sfondo del form sarà del colore selezionato dall’ utente.
I Font Dialog
I font dialog sono fondamentali se stiamo creando un programma per inviare mail o qualunque altro editor di testi, se voglio fare in modo che il carattere del testo di una RichTextBox sia scelto dall’ utente inserirò:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim font As New FontDialog
        If font.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.Font = font.Font
        End If
    End Sub
End Class

Il procedimento è lo stesso di quello di sopra, cambia solo da text a font e cambia anche il tipo della variabile dichiarata (Da Color Dialog a Font Dialog).

Gli Open File Dialog

Un Open File Dialog serve per selezionare dei file, se voglio che una mia RichTextBox contenga il percorso di un file selezionato metterò:


Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim open As New OpenFileDialog
        If open.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.Text = open.FileName
        End If
    End Sub
End Class

Come vedete è sempre la stessa cosa, cambia solo qualcosina...

I Save File Dialog
stessa cosa degli openfiledialog, cambia solo che metteremo save invece di open:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim save As New SaveFileDialog
        If save.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.Text = save.FileName
        End If
    End Sub
End Class



I Folder Browser Dialog
I Folder Browser Dialog sono sono delle finestre di dialogo che permettono (come gli Open File Dialog e Save File Dialog) di selezionare delle cartelle e non dei file. Se voglio fare in modo che una Text Box abbia il percorso di una cartella scelta dall’ utente inserirò il seguente codice:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim folder As New FolderBrowserDialog
        If folder.ShowDialog = Windows.Forms.DialogResult.OK Then
            TextBox1.Text = folder.SelectedPath
        End If
    End Sub
End Class

Non vi spaventate! Se avete capito il codice di prima questo sarà facilissimo da capire ;).