Hello Shihab: I thing you are missing a line you need tell the library to read from the port and how many bytes your reding, this is the part of the code I am using to read: Dim Cadena as string ' As long as there is information, read one byte at a time and ' Save it. While (ObjComm.Read(1) <> -1) ' Save data read Cadena = Cadena + Chr(ObjComm.InputStream()) End While First I check If there is information to read and I tell the function to read only one byte, then I read the byte and I add the Character to a string. You are using the InputStreamString, and if you look in the code this function uses the InputStream function to read each byte, I havent use this Property but I thing that you need to define the quantity of bytes to be read. Hope this helps JA PS: Happy New Year!!!!!! :-O