将文件转换为VB代码转换为c#

时间:2012-11-15 07:07:27

标签: c# vb6-migration

我需要将一段代码从VB转换为C#。我应该用什么代替FileSystemObject和TextStream?

以下代码的作用是它读取目录中已存在的文件,并将文件内容添加到字段中。

Private Sub Read_abc_File()
    Dim FileSystem As FileSystemObject
    Dim abcFile As TextStream
    Dim abcLine As String, abcSection As String
    Dim abcFilename As String
    Const Read As Integer = 1

    abcFilename = "abc.txt"


    Set FileSystem = New FileSystemObject

    If Not FileSystem.FileExists(abcFilename) Then
        FileSystem = Null
        Exit Sub
    End If

    Set abcFile = FileSystem.OpenTextFile(abcFilename, Read, False)

    Do While abcFile.AtEndOfStream <> True
        abcLine = abcFile.ReadLine

        If abcLine > " " Then
            If Left$(abcLine, 1) = "[" Then
                abcSection = abcLine
            Else
                Select Case abcSection
                    Case "[Datafiles]"
                        DataFilename.AddItem abcLine
                    Case "[Locations]"
                        Location.AddItem abcLine
                    Case "[Formats]"
                        Format.AddItem abcLine
                    Case "[Categories]"
                        Category.AddItem abcLine
                End Select
            End If
        End If            
    Loop

    abcFile.Close
    Set abcFile = Nothing
    Set FileSystem = Nothing
End Sub

感谢任何建议/答案。

谢谢!

1 个答案:

答案 0 :(得分:0)

下面是一段代码片段,让你开始,我认为你应该能够完成这项工作。

using System;
using System.IO;

static void Main(string[] args)
{
    string fileName = "abc.txt";

    if (!File.Exists(fileName))
        return;

    using (FileStream file = File.OpenRead(fileName))
    using (StreamReader reader = new StreamReader(file))
    {
        while (!reader.EndOfStream)
        {
            string line = reader.ReadLine();
        }
    }
}