배열크기 비교 질문 드립니다 ㅠㅠ!!

MSCOMM1.INPUT으로 들어오는 값으 비교해서 적으면 출력을 안하고 크면 출력을 하게 하려고 합니다 ㅠㅠ꼬맹이 실력으로 해보려고 노력중인데 ㅠㅠ 밑에 소스처럼 하면.... 들어오는 값이 작아도 출력이 되뻐리네요....(INPUT으로 들어오는 값들은 항상XXXX(XXXX) 이런식으로 들어옵니다)
myInput = MSComm1.InputIf Len(myInput) Len(12341234) Then
recvData.Text = recvData.Text & Mid(myInput, 2, 4) & , & Mid(myInput, 8, 4) & vbCrLf
ElseIf Text1.Text = Text1.Text & myInput ThenEnd IF어떻게 하면 좋을까요......