Halo agan agan dan master master, saya punya masalah dalam menampilkan data jarak di [pranala luar disembunyikan, sila masuk atau daftar.]

saya menggunakan Arduino untuk pemogramannya, dan sensor  ultrasonic untuk pembacaan jaraknya. program sensor ultrasonic dapat dilihat sebgai berikut:

/*
HC-SR04 Ping distance sensor]
VCC to arduino 5v GND to arduino GND
Echo to Arduino pin 13 Trig to Arduino pin 12
More info at: [pranala luar disembunyikan, sila masuk atau daftar.]
*/

#define trigPin 0
#define echoPin 7

void setup() {
  Serial.begin (9600);
  pinMode(trigPin, OUTPUT);
  pinMode(echoPin, INPUT);
}

void loop() {
  int duration, distance;
  digitalWrite(trigPin, HIGH);
  delayMicroseconds(1000);
  digitalWrite(trigPin, LOW);
  duration = pulseIn(echoPin, HIGH);
  distance = (duration/2) / 29.1;
  if (distance >= 200 || distance <= 0){
    Serial.println("Out of range");
  }
  else {
    Serial.print(distance);
    Serial.println(" cm");
  }
  delay(500);
}

salah satu syarat agar dapat di tampilkan di visual basic adalah adanya {Serial.Print(distance); / Serial.Printn("cm")

>>pertanyaanya :

>>> bagaimana ya caranya agar data pengukuran diatas dapat di tampikan di dalam form "textBox"? ini codingnya untuk komunikasi serial sebagai berikut:

Public Class Optronic

    Private Sub Optronic_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'TODO: This line of code loads data into the 'Data_pasienDataSet.all' table. You can move, or remove it, as needed.
        Me.AllTableAdapter.Fill(Me.Data_pasienDataSet.all)
        Try
            With SerialPort1
                .PortName = "COM1"
                .BaudRate = 9600
                .Parity = IO.Ports.Parity.None
                .DataBits = 8
                .StopBits = [pranala luar disembunyikan, sila masuk atau daftar.]
            End With

            [pranala luar disembunyikan, sila masuk atau daftar.]()
            SerialPort1.Write("0s")

        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try

    End Sub

<