이미지 파일 전송에 관한 에러인데 해결책좀 알려주세요 ㅠㅠ

Private PicBits() as Byte '이미지 파일에 대한 byte 배열

Private Sub cmdSend_Click()

Dim sData As String
Dim bData() As Byte
Dim DataType As String

DataType = "I"

'헤더 생성
sData = ChrB(&HE) & ChrB(&H8) & ChrB(&H44) & ChrB(&H13)

'데이터 크기 추가
sData = sData & StrConv(Format(UBound(PicBits), "00000000"), vbFromUnicode)

'실제 데이터 추가 (이미지 파일에 대한 byte 배열)
sData = sData & StrConv(DataType, vbFromUnicode) & PicBits

' Byte 타입으로 전환
bData = sData

If Winsock.State = 7 Then '소켓 상태가 "연결완료" 상태이면

Winsock.SendData bData

lbl.Caption = "이미지 파일 전송 완료"

End If

End Sub

--------------------------------

바이트 배열로 저장한 이미지 정보를 전송 하려고 해더를 만들고있는데요

해더 만들고~ 보낼 데이터 크기 추가하고 ~ 거기에 실제 데이터 (PicBits)를 붙였더니..

PicBits 가 배열 형태라서 그런가 자꾸 타입 미스매치 애러가 나요..

저럴땐 어떻게 해결해야 할까요 ㅠㅠ 도와주세요