BaudRate は 0 より大きくする必要があります

BaudRate メソッドに指定するMy.Computer.Ports.OpenSerialPort引数は、0 より大きい値にする必要があります。

このエラーを解決するには

• BaudRate引数の値を正の数値に変更します。

こちらも参照ください

• My.Computer.Ports.OpenSerialPort