寻思用vb.net写Arduino上位机 接收Arduino发送的1 2 3 4…一串数字，接收不到，请帮忙看看

打算用vb.net写Arduino上位机 接收Arduino发送的1 2 3 4……一串数字，接收不到，请帮忙看看
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
    Delegate Sub SetTextCallback(ByVal InputString As String)
    Private Sub ShowString(ByVal comData As String)
        Label1.Text &= comData
    End Sub
    Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived 
        Dim inData As String = SerialPort1.ReadLine
        Dim d As New SetTextCallback(AddressOf ShowString)
        Invoke(d, inData)
    End Sub
End Class
------解决方案--------------------
SerialPort1 的参数设置对了吗?  

用串口通信的?

你这个代码好像用vs的自动填写都能写出来哦.