Interfacing : Receive One or more Data over Serial from arduino to VB

Visual Studio

السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Visual Basic adalah salah satu bahasa pemrograman desktop visual yang berjalan diatas .NET Framework dan dibuat serta dikembangkan oleh Microsoft. Sedangkan Arduino adalah board serta bahasa pemrograman yang dimodifikasi dari bahasa C++ untuk lingkungan mikrokontroller. Visual basic dapat berkomonikasi dengan arduino via Serial (TTL) karena di dalam board arduino tertanam chip FTDI atau Ch340(arduino KW) jadi tidak diperlukan tambahan aksesoris atau module lainnya.

Untuk software pemrograman Visual basic .NET dapat menginstall Visual studio 2013 atau 2015 community (free) yang dapat di download di web resmi visual studio. Untuk alat dan bahas sendiri hanya dibutuhkan

• Visual Studio
• Arduino IDE
• Kabel USB ke arduino

1. Pertama tama buka arduino IDE dan ketik
   Untuk mengirim 1 data,contoh mengirim nilai variable "hitung"
   

   void setup() {
     Serial.begin(9600); //setting baudrate 9600 dengan parameter 8N1
   }
   int hitung=0;
   void loop() {
     hitung++;
     Serial.println(hitung); //kirim data diakhiri dengan cr+lf
     delay(500);
   }

2. Untuk mengirim 2 data kira-kira formatnya sebagai berikut
   data1,data2,data3,dataX data diakhiri dengan cr+lf dan setiap data dipisah dengan koma
   

   void setup() {
     Serial.begin(9600); //setting baudrate 9600 dengan parameter 8N1
   }
   int hitung=0;
   int hitung2=0;
   int hitung3=0;
   void loop() {
     hitung++;
     hitung+=2;
     hitung+=3;
     Serial.print(hitung); //kirim data 1
     Serial.print(",");
     Serial.print(hitung2); //kirim data 2
     Serial.print(",");
     Serial.println(hitung3); //kirim data 3 diakhiri cr+lf
     delay(500);
   }

3. Pada Visual Studio dapat download source kodenya disini (https://www.dropbox.com/s/tcs9aa35a02xz5l/Vb%20net%20serial%20receive.rar?dl=0)
4. Kita hanya menambahkan Tool Serial Port dan event SerialPort_received, dan kemudian mendelegasikan ke suatu fungsi untuk mengubah tulisan pada Form utama,berikut kodenya 
   
   Dim baca as String = SerialPort1.ReadLine()untuk membaca data yang diterima dengan akhiran cr+lf
   
   Dim baca_clear as String = Replace(Replace(baca, vbLf, ""), vbCr, "")
   untuk menghapus karakter cr(carriage return) dan lf(life feed) 
   
   Dim data_masuk() As String
   data_masuk = vb.Split(baca_clear, ",")
   Jika data lebih dari satu dan terdapat tanda , (koma) maka akan disimpan di variable array data_masuk(0), data_masuk(1) dst
   
   Dim jumlah_koma as Integer = Len(baca) - Len(Replace(baca, ",", ""))
   Untuk membaca jumlah koma
   
5. Berikut tampilannya

Vb to arduino

Untuk Simulasi dapat menggunakan Virtual Serial Port http://www.ismaillowkey.net/2015/04/membuat-virtual-serial-port-rs233rs485.html

dan Hterm(hyper terminal) disini http://www.der-hammer.info/terminal/hterm.zip

Berikut tampilan Hterm(hyper terminal) untuk simulasinya

Good Luck

Semoga bermanfaat

وَعَلَيْكُمْ السَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ