vba二进制文件导致溢出

我想写这个数据到一个二进制文件在word中使用宏。如果我运行此我得到这个错误“执行错误溢出（错误6）”上线认沽#handle，CByte（ “& H” &输出（I））vba二进制文件导致溢出

如何解决这个？谢谢。

Sub HexStringToBinaryFile() 


    lol50 

    Dim output() As String 
    output = Split(lol, "|") 

    Dim handle As Long 
    handle = FreeFile 
    Open "C:\test.bin2" For Binary As #handle 

    Dim i As Long 
    For i = LBound(output) To UBound(output) 

     Put #handle, , CByte("&H" & output(i)) 

    Next i 

    Close #handle 

End Sub 
    Sub lol50() 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|01" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|02" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|03" 


End Sub

来源

2015-12-22 isoman

问题是您没有在lol赋值行的末尾加上分隔符。所以当它们被分割时，前一行的最后两位与下一行的前两行连接。

该错误发生的位置：

lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|01" 
lol = lol & "00|00|00|00|00|00|00|00|40|00|00|00|00|00|00|00"

当这个被解析时，有01和00之间无分离器（下一行）所以0100值产生溢出。

用|结束您的lol任务行中的每一个，并且错误应该消失。

来源

2015-12-22 16:46:04

Jason有正确的答案，但我不确定建立一个字符串，并拆分它以获取数组是最好的方法。你可能会考虑直接填充一个数组。

Private lol(1 To 4656) As String 

Sub HexStringToBinaryFile() 

    Dim i As Long 
    Dim handle As Long 

    lol50 

    handle = FreeFile 
    Open "C:\test.bin2" For Binary As #handle 
     For i = LBound(lol) To UBound(lol) 
      Put #handle, , CByte("&H" & lol(i)) 
     Next i 
    Close #handle 

End Sub 
Sub lol50() 

    Dim i As Long 

    For i = 1 To 4656 
     lol(i) = "00" 
    Next i 

    For i = 9 To 4656 Step 16 
     lol(i) = "40" 
    Next i 

    lol(4000) = "01" 
    lol(4416) = "02" 
    lol(4656) = "03" 

End Sub

来源

2015-12-22 17:12:33

vba二进制文件导致溢出

回答

相关问题