Reuse Windows Dialog Boxes

Ook in VB.NET, of misschin wel juist in VB.NET, is het hergebruiken van standaard Windows dialogen een voor de hand liggende keuze. De gebruiker zal de dialoog herkennen en er waarschijnlijk geen vragen over stellen. Voor de ontwikkelaar geldt dat de functionaliteit van de standaard dialoog zonder al te veel moeite tot zijn beschikking staat.

Als voorbeeld heb ik hier gebruik gemaakt van OpenFileDialog. In Visual Basic.NET kun je hier op twee manieren gebruik van maken. Voor beide hieronder genoemde voorbeelden geldt dat de sources te vinden zijn in de bijgevoegde ZIP.

Methode 1: Gebruik de OpenFileDialog component

1. Open een nieuw VB project (vanuit Visual Studio.NET).
2. Sleep vanuit de toolbox de OpenFileDialog component op het scherm.
3. Je zult zien dat de component wordt toegevoegd: het staat in design mode onder in het scherm met de naam openfiledialog1.
4. Plaats een button op het scherm.
5. Voeg de volgende code toe aan het click event van de button (button1)
   
   If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
      Dim oStream As New System.IO.StreamReader (OpenFileDialog1.FileName)
      MessageBox.Show(oStream.ReadToEnd)
      oStream.Close()
   End If
   
6. Test het form.
7. Er zal een messagebox worden getoond waarin de inhoud van het geselecteerde bestand zal worden gepresenteerd..

Methode 2: Instantieer het object in het click event

1. Open een nieuw VB Project
2. Plaats een button op het form
3. Plaats de volgende code in het click event van de button
   
   Dim openFileDialog1 As New OpenFileDialog()
   
   openFileDialog1.Filter = "Cursor Files"*.cur"
   openFileDialog1.Title = "Select a Cursor File"
   
   ' If the user clicked OK in the dialog and a .CUR file was selected, open it.
   If openFileDialog1.ShowDialog() = DialogResult.OK Then
      If openFileDialog1.FileName <> "" Then
         'Assign the cursor in the Stream to the Form's Cursor property.
         Me.Cursor = New Cursor(openFileDialog1.OpenFile()) 
      End If
   End If
   
4. Test het form en zie de cursor wijziging.

Voorbeeld code