Új hozzászólás Aktív témák

• #2669 Zsolt_974 tag Bobrooney #2668

  Új Válasz 2016-01-21 17:58:06 #2669

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Zsolt_974

  tag

  válasz Bobrooney #2668 üzenetére

  Így indul a program:

  

  A belépés gombra klikkelve:

  

  Ok gombra klikkelve és utána a "Com port lenyílóban ezek láthatók: Com1, Com9, Kommunikációs port(Com1)":

  

  A program kódban az ehhez tartozó sorok:

  Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_SerialPort")
  _______________________________________________________________________________________

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _Button1.Click

  For Each queryObj As ManagementObject In searcher.Get()
  MsgBox(queryObj("Name"))
  Dim textt As String = queryObj("Name").ToString
  RichTextBox1.Text = textt
  ComboBox1.Items.Add(textt)

  Next

  ComboBox1.Items.AddRange(IO.Ports.SerialPort.GetPortNames())
  End Sub

  Végül is tegnap már ott jártam, hogy a ComboBox-ba is beírja, de sajnos csak a
  Kommunikációs port(COM1). Az USB-SERIAL CH340(COM9) nem sikerül kiíratni.
  A két port közül miért csak a Kommunikációs port(COM1)-et találja meg?

Új hozzászólás Aktív témák