在VB.net中读取二进制文件并以字符串格式从中获取数据

Question

我想在VB.net中读取二进制文件并检查它是否包含任何数据。如果文件包含任何数据，则应该读取这些数据并从检索到的数据中替换特定的单词。我怎样才能完成这项任务？ //这是我的代码

        Using reader As New BinaryReader(File.Open(objClsCommon.strBinaryPath, FileMode.Open))


            ' Dim a As Double = Marshal.SizeOf(oHeader) + Marshal.SizeOf(oContent) + 1
            'Dim b As Double = Marshal.SizeOf(oHeader) + Marshal.SizeOf(oContent) + 457

            For pos = 0 To 4
                Dim value As String = reader.ReadString()
                strText(pos) = value
            Next

            oHeader.CheckSum = strText(0)
            oHeader.NoOfPrgFile = strText(1)
            oHeader.FstFileOffset = strText(2)
            oHeader.ExtString = strText(3)
            oHeader.DecrCode = strText(4)



            Array.Clear(strText, 0, 5)

            For pos = 0 To oHeader.NoOfPrgFile - 1

                For i = 0 To 3
                    Dim value As String = reader.ReadString()
                    strText(i) = value
                Next
                ArrayContent(pos).PrgName = strText(0)
                ArrayContent(pos).PrgLength = strText(1)
                ArrayContent(pos).NxtOffset = strText(2)
                ArrayContent(pos).ExtString = strText(3)


                If pos = 0 Then
                    strContent = reader.ReadString()
                ElseIf pos > 0 Then
                    strContent = reader.ReadString()
                End If

我想将文本文件中的字符串写入二进制文件，但在编写这些字符串之前，我想检查二进制文件是否包含任何数据。如果它包含任何数据，那么该文件中的数据应该被我的字符串替换，并且应该再次以二进制格式写入。