Str -> ByteArray then back..

[Jim Davis]

Hi,

Randomize Timer
    Dim iCount As Integer, sData As String, sResult As String, bArray() As Byte
    For iCount = 1 To 250
        sData = sData & Chr$(Rnd * 254)
    Next iCount
 
    bArray = StrConv(sData, vbFromUnicode)
    
    sResult = StrConv(bArray, vbUnicode)
    
    MsgBox (sData = sResult) '=False

Knows somebody whats wrong with this one? why isn't the same? ..or how can i split a string into this byte array then back, to get the original string?

any help appreciated! :|