fizbim

How do I return a "Byte" type array from a function ? These bytes are byte size binary data 00-FF and may or may not be ASCII.

Here is my code.


***************************************************

Public Sub MySub()
Dim ByteArray() as Byte
Dim temp1 as byte
Dim temp2 as byte
Dim temp3 as byte

myByteArray = myFunctionCall(somevariable)

temp1 = ByteArray(0) ' should be 01
temp2 = ByteArray(1) ' should be 02
temp3 = ByteArray(2) ' should be 03

End Sub


Public Function myFunctionCall(ByVal DontCare) as Byte()
Dim TempArray() as Byte

TempArray(0) = 1
TempArray(1) = 2
TempArray(3) = 3

myFunctionCall = TempArray
End Function

****************************************************

fizbim

Opps.

I found the answer.
Here is the correct calling procedure.

myByteArray() = myFunctionCall(somevariable)

-------- NOT ---------

myByteArray = myFunctionCall(somevariable)

fizbim

I spoke too soon. This still doesn't work.

Gamer X

Well, I'm not entirely sure what you're asking, but couldn't you skip the variable swapping processes(in MySub, and myFunctionCall) altogether? Ex:
Hope that helps you somehow.

Arigato,
Gamer X