openDialog Cancel Button

[dablyz]

Hi,

This should hopefully be a quick question. i have an openDialog box in my project, which works when opening a file - however, when no file is selected and the user clicks cancel on the dialog box, the program crashes, because it obviously cannot load a file into memory

The code is as follows

        Dim strm As System.IO.Stream
        Dim name As System.IO.Stream
        strm = dialogFile.OpenFile()
        txtFileName.Text = dialogFile.FileName.ToString()
        lblSize.Text = FileLen(dialogFile.FileName.ToString())
        If Not (strm Is Nothing) Then
        End If
 

In short, does anyone know what to put in the code for when the user doesnt select a file, and just clicks cancel?

Thanks

Sam

[Killer42]

Can you give us the details of the "crash"?

However, if this is similar enough to the old common dialog control I use in VB6, then there should be a property you can set to determine whether clicking cancel raises an error or simply doesn't return anything.

Perhaps you should simply use a Try construction to handle the error?

[dablyz]

Can you give us the details of the "crash"?

However, if this is similar enough to the old common dialog control I use in VB6, then there should be a property you can set to determine whether clicking cancel raises an error or simply doesn't return anything.

Perhaps you should simply use a Try construction to handle the error?

Hi,

Yeah, it crashes by hightlighting this portion of code within a button click

With dialogFile
picBox.Image = Image.FromFile(.FileName) <<<
End With

Dim file As String
Dim filesize As Long

file = txtFileName.Text
filesize = FileLen(file)

It then pops up with a box saying 'illegal characters in path'

i can see why - the dialog box doesnt find a path to submit to the picture box - but i dont know how to fix it. Forgive me, but i dont know what a Try construction is!!

Hope you can help

Sam

[dablyz]

Just an update, i did find out what Try constructions were, but i couldnt figure out what to use in the catch statement. Can anyone advise?

Thanks

[Killer42]

Just an update, i did find out what Try constructions were, but i couldnt figure out what to use in the catch statement. Can anyone advise?

Let's hope so. I use a much older version, which doesn't have the whole Try...Catch thing, so error handling is completely different.

In any case, you should be able to get around the problem quite easily, by checking the value returned by the dialog, before using it. For example...

Dim MyFileName As String
MyFileName = dialogFile.FileName
If MyFileName = "" Then
  ' Whatever. No file was chosen.
Else
  picBox.Image = Image.FromFile(MyFileName)
End If