Чтение с последовательного порта в Visual Basic

Question

Я хочу использовать VB.NET для чтения с последовательного порта.Я использую VB для записи в COM3, а в следующей строке я читаю из COM3.Однако когда я читаю с ком порта и пишу на консоль, я ничего не вижу.

Module Module1

Sub Main()

    Dim returnStr As String = ""
    Dim com As IO.Ports.SerialPort = Nothing
    Try
        com = My.Computer.Ports.OpenSerialPort("COM3")
        com.ReadTimeout = 10000

        com.WriteLine("test1")
        Dim Incoming As String = com.ReadLine()

        Console.WriteLine(Incoming)
    Catch ex As TimeoutException
        returnStr = "Error: Serial Port read timed out."
    Finally
        If com IsNot Nothing Then com.Close()
    End Try

    Console.ReadLine()


End Sub

End Module