Mình vướng chổ code lấy thông tin file mọi người xem code góp ý hộ nhé

[minhhath]

Code: Select all

Public Class Formmain

    Private Sub btntimfileexcel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntimfileexcel.Click
        Dim urlfilehoso As New FolderBrowserDialog
        If urlfilehoso.ShowDialog = Windows.Forms.DialogResult.OK Then
            txtfilehosoexcel.Text = urlfilehoso.SelectedPath
        End If
        Try
            For Each filehoso As String In IO.Path.GetDirectoryName("*.xls")
                txtfilehosoexcel.Text = Path.GetFileName(filehoso)
            Next
        Catch
        End Try

    End Sub
End Class

Khi mình bấm vào button sẻ mở cửa sổ dialog và tìm đến file cần nhưng mình chỉ lấy được đường dẫn chứa thư mực mình không thể hiện đường dẫn đến file mình chọn

[akira]

tìm đến file thì dùng OpenFileDialog chứ đâu phải FolderBrowserDialog