C# / VB.NET - Comunicazione con Arduino

Buongiorno nessuno
Il timer lo uso già nell'arduino per mandare i vari dati ogni tot secondi. Se uso un timer anche lato VB non corro il rischio che i due timer non siano sincronizzati e mi perdo dei dati?
Per capirci, la parte VB sarebbe solo l'interfaccia, serve solo per mostrare quello che sta facendo Arduino.
Io avevo pensato a due possibilità:
1) lasciare sempre la parte VB in ascolto sulla seriale e quando iniziano ad arrivare i dati elaborarli e metterli nelle varie textbox. Questa non ho capito come realizzarla
2) lasciare Arduino sempre in ascolto , da VB mandare un tris sulla seriale e a quel punto Arduino mi rimanda i vari dati. Questa soluzione mi piace poco perché vorrei tenere Arduino il più libero possibile per quello che deve realmente fare.
Nel caso ci siano altre possibilità, se qualcuno me le spiega ne sarei felice.
Buona giornata.

In vb usa un timer da 300 ms

Sostituisco il pulsante del primo esempio con un timer da 300 ma? Giusto?

Fai la prova

Salve , dopo il consiglio di nessuno ho fatto nella seguente maniera .
Considerando che devo anche mandare dei dati nella seriale , ho pensato di usare l'evento click sulle textbox in cui devo scrivere i dati da inviare , così facendo fermo il timer e con il pulsante di invio lo riabilito .
Ogni suggerimento è ben accetto
Grazie

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'Scivo le varie COM attive nella combobox
        ComboBox1.Visible = True
        SerialPort1.Close()
        ComboBox1.Items.Clear()
        ComboBox1.Items.AddRange(IO.Ports.SerialPort.GetPortNames())
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        'Seleziono la seriale  e attivo il timer 
        ComboBox1.Visible = False
        SerialPort1.Close()
        If ComboBox1.Text <> "" Then
            Try
                SerialPort1.Encoding = System.Text.Encoding.Default
                SerialPort1.PortName = ComboBox1.Text
                SerialPort1.Open()
                Button2.Text = "Connesso"
                Label29.Visible = True
                Label29.Text = "Collegato alla porta" + ComboBox1.Text
                Timer1.Enabled = True
            Catch ex As Exception
                MsgBox(" Non Connesso")
            End Try
        End If

    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        'Invia i dati ad arduino 
        SerialPort1.WriteLine(TextBox12.Text)                ' invia il valore Set.Menisco
        SerialPort1.WriteLine(TextBox14.Text)                ' invia il valore velocità pompa mandata   
        Timer1.Enabled = True                                ' riattivo il timer    
    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        'Ogni 300ms leggo la seriale 
        Dim pressioneIn As Short
        Dim pressioneOut As Short
        Dim arduino As String = SerialPort1.ReadLine()                  'scrivo in arduino quello che ricevo dalla seriqale 
        arduino = arduino.Trim()                                        'elimino eventuale porcheria 
        Dim lunghezza As Short = Len(arduino)                           'ricavo la lunghezza del dato 
        Dim indice As String = arduino.Substring(0, 1)                  'ricavo l'indice dai dati ricevuti per sapere dove mettere i valori 
        Dim valore As Short = arduino.Substring(1, lunghezza - 1)  'ricavo i valori 
        If indice = 0 Then
            TextBox13.Text = valore                     'valore menisco
        End If
        If indice = 1 Then
            TextBox11.Text = valore                     'velocità pompa ritorno
        End If
        If indice = 2 Then
            TextBox10.Text = valore                     'valore pressione mandata
            pressioneIn = valore
        End If
        If indice = 3 Then
            TextBox9.Text = valore                      'valore pressione ritorno
            pressioneOut = valore
        End If


        TextBox8.Text = pressioneIn - pressioneOut
    End Sub

    Private Sub TextBox14_TextChanged(sender As Object, e As EventArgs) Handles TextBox14.Click
        'Fermo il timer per scrivere i dati 
        Timer1.Enabled = False
    End Sub

    Private Sub TextBox12_TextChanged(sender As Object, e As EventArgs) Handles TextBox12.Click
        'Fermo il timer per scrivere i dati
        Timer1.Enabled = False
    End Sub


End Class