Open File Dialog Help

[nd54]

Hey all trying to get this Open File Dialog to work...

When I hit cancel on the second time it adds the file to the list anyways

 

 

 

   Private Sub MenuItem3_Click(ByVal sender As System.Object,  ByVal e As System.EventArgs) Handles MenuItem3.Click
Dim ofd As New OpenFileDialog()
Dim lv As ListViewItem
     ofd.Title = "Select  FILE TO OPEN..."
       ofd.Filter = "All Files(*.*)|*.*"
       ofd.ShowDialog()
       If ofd.FileName = "" Then Exit Sub
lv = ListView1.Items.Add(ofd.filename
lv.subitem.add("test")
lv.subitem.add("testing")
end sub

 

 

Thank You

[divil]

If ofd.ShowDialog() = DialogResult.Cancel Then Exit Sub

 

You should be using that instead of checking the length of the filename.

[nd54]

Thank You Divil... I guess im still use to vb6

[divil]

Even in VB6 the best way was to use the CancelError property and trap the error :)