【解決方法】VB のシリアル COM (ビジュアル スタジオ 2022)

COM ポートを選択して使用し、オンラインで見つけた例を使用して、ドロップダウン リストから Hello World を書き込もうとしています。 リストをドロップダウンすると、すべてが正常に見えますが、USB シリアル アダプターが接続されている Com ポートに書き込もうとすると、ポート名が認識されないというエラーが表示されます (たとえ認識できたとしても)。ドロップダウンリスト）。 コードのコピーをここに示します。何か提案はありますか?? ありがとう！

私が試したこと：

私のコード:

Imports System
Imports System.Threading
Imports System.IO.Ports
Imports System.ComponentModel

Public Class Form1

    Dim myport As Array
    Delegate Sub settextcallback(ByVal [text] As String)

    Private Sub Form1_Load(sender As Object, e As EventArgs)
        Handles MyBase.Load

        myport = IO.Ports.SerialPort.GetPortNames()
        Printer_Comport.Items.AddRange(myport)

    End Sub

    Private Sub Printer_Comport_MouseClick(sender As Object, e As MouseEventArgs)
        Handles Printer_Comport.MouseClick

        Printer_Comport.Items.Clear()
        myport = IO.Ports.SerialPort.GetPortNames
        Printer_Comport.Items.AddRange(myport)

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs)
        Handles Button1.Click

        SerialPort1.PortName = Printer_Comport.Text 'Heres where I get error
        SerialPort1.BaudRate = 9600
        SerialPort1.Open()
        SerialPort1.Write("Hello World")
        SerialPort1.Close()
    End Sub
End Class