I have used this and it seems to work but it gives the full filepath and the only way I could chop it up was a very awkward use of mid!
Code:
**OpenFileDialog1.Filter = "Wad Files|*.WAD"
********OpenFileDialog1.Title = "Select The WAD You Wish To Add"
********Dim WAD As String
********If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
************WAD = (OpenFileDialog1.FileName)