本帖最后由 bcrun 于 2013-07-15 21:33:32 编辑

解决方案 »

  1.   

    二进制文件不要用字符串,用 Byte 数组传。
      

  2.   

    Function getArchivoComoString(strFileName As String) As String
    改为
    Function getArchivoComoString(strFileName As String) As Byte()Dim strFile As String 改为 Dim strFile() As Byte
    ...
    strFile = String(size, " ") 改为 Redim strFile(size)
      

  3.   

    六楼的大侠 
    我也想把换成 字节数组  可是我这个方法的返回值是要复制给一个数组的我要怎么把 存到 byte 数组中的值全部拿出来啊 我还笨 拿不出来
      

  4.   

    有个 API 对于操作字节数组比较方便,是 CopyMemory,如果你想在字节数组与字符串间转换,可以使用 StrConv 函数,如:
    字节数组 = StrConv(文本, vbFromUnicode)
    文本 = StrConv(字节数组, vbUnicode)