Global Variable in Ereignis Struktur hinzufügen

Hi Martin,

beim Starten, bekomme ich diesen Fehler im Anhang.
Gegenwärtig funktioniert es mit der VB.NET und der VB6 Code.

Dieses Teil wie in VB.NET muss da sein lt. Lieferant Support:

Code:

Private Sub _server_OnRead(device As Device, data As ReadData) Handles YMcom.OnRead
        Dim line As String = $"Device Read (Addresse {device.Adresse}): {data.RelaisCount1}"


        Invoke(Sub()
                   Dim index As Integer = ComboBox1.SelectedIndex
                   Dim text As String = ComboBox1.Text


                   If (index > -1 AndAlso Not String.IsNullOrEmpty(text)) Then

                       Dim selectedAdresse As Integer = Convert.ToInt32(text)

                       Debug.WriteLine("selected2: " & selectedAdresse)

                       If (selectedAdresse = device.Adresse) Then
                           _UpdateChechboxes(data)
                       End If
                   End If

               End Sub)

        Debug.WriteLine(line)


    End Sub

Nach dem Starten, gibt die Hardware die Adresse zurück und diese muss dann angenommen werden.

Pfuuuuuuuuuuuh, alles so schwer :-)
Bin halt immer noch beim Experimentieren :-)


VG
Natalie