如何打开在vb.net中使用的OpenFileDialog文件？

Question

如何使用OpenFileDialog的

打开一个文件，下面是我的代码：

Dim Fs As StreamReader 
    With OpenFD 
     .FileName = "" 
     .Title = "Open Text File" 
     .InitialDirectory = "c:\" 
     .Filter = "Text files|*.txt" 
     .ShowDialog() 
    End With 
    Dim path As String = OpenFD.FileName 
    txtin.Text = OpenFD.FileName 
    Fs = New StreamReader(path) 

我可以获取该文件的路径。但无法打开文件。任何人都可以帮忙 在此先感谢

Answer 1

试试这个。它应该工作。

---

Dim sr As StreamReader 

'Supposing you haven't already set these properties... 
    With OFD 
     .FileName = "" 
     .Title = "Open a text file..." 
     .InitialDirectory = "C:\" 
     .Filter = "Text Files|*.txt" 
    End With 

    If OFD.ShowDialog() = DialogResult.OK Then 
     Try 
      sr = New StreamReader(OFD.Filename) 
      txtInFile.Text = OFD.Filename 
     Catch ex As Exception 
      MsgBox("The file specified could not be opened." & VbNewLine & "Error message:" & VbNewLine & VbNewLine & ex.Message, MsgBoxStyle.OK, "File Could Not Be Opened!") 
     End Try 
    End If

Answer 2

如果你想读取整个文本文件，你可以使用System.IO.File.ReadAllLines。你可以这样做是这样的：

Dim readText() As String = System.IO.File.ReadAllLines(path) 

该文件随后会保存到您的字符串数组，你可以通过索引来访问每一行。