在vb.net中读取文件

我的任务是将代码从vb6转换为vb.net。为此，我使用streamreader， 下面是我为此使用streamreader的代码

    s = FTextStream.Read(1)
  Do While s <> ","
    If s <> Chr(34) And s <> Chr(10) Then
        MSymbol = MSymbol + s
    End If
    s = FTextStream.Read(1)
  Loop
  ProgressBar1.Value = 10

s=FTextStream.Read（1）
当s“，”时做
如果s Chr（34）和s Chr（10），则
MSymbol=MSymbol+s
如果结束
s=FTextStream.Read（1）
环
ProgressBar1.值=10

---

请指导我如何在vb.net中实现这一点

您想做什么？你能告诉我们你试图复制的VB6代码吗？编译和运行这些代码时会发生什么？你到底想让代码做什么？它看起来更像是写得很糟糕的VBScript，被人扔进了VB6。我不想在那个程序中看到其余的代码。也许从零开始？