I tried with following code. But when i select <i>all file</i> option, no files are shown in the selected part
Code:
Dim openFileDialog1 As System.Windows.Forms.OpenFileDialog

        openFileDialog1 = New System.Windows.Forms.OpenFileDialog()
        openFileDialog1.InitialDirectory = Environment.SpecialFolder.Desktop
        openFileDialog1.Filter = "Sale Files(*.DBF;*.XLS)|*.DBF;*.XLS;|All files(*.*)|*.* "

        If openFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
            txtsalefilepath.Text = openFileDialog1.SafeFileName
        End If