none
vb.net 16进制文件至二进制文件转换 RRS feed

  • 问题

  •  下面的这段代码是将文件通过二进制读取文件,然后转换成16进制文件。我想将他转换回去,如果简单的话,请附上代码,谢谢!



    fn = FreeFile() FileOpen(fn, FileN, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared) ReDim b(LOF(fn) - 1) FileGet(fn, b) FileClose(fn) Dim i As Integer Dim Password As String = "“ For i = LBound(b) To UBound(b) If Len(Hex(b(i))) < 2 Then strOut = strOut & 0 & Hex(b(i)) Else strOut = strOut & Hex(b(i)) End If Next RichTextBox1.Text = strOut RichTextBox1.SaveFile("c:\2.txt")

    纷纷扰扰与我无关
    2009年10月14日 2:39

答案