It expects binary data. You're apparently providing a regular VB6 string that holds binary data as characters (= most often 1 byte becomes one character ie. 2 bytes, but varies depending on locale).

BuffSplit(1) = GZip(StrConv(BuffSplit(1), vbFromUnicode))