Kontrol LED Arduino Via Vasual Basic 6

Kontrol LED Arduino Via Vasual Basic 6
4.3 (86%) 7 votes

Assalamu’alaikum Wr. Wb , Alhamdulillah kali ini Allah masih memberikan saya waktu untuk bisa menulis postingan ini, kali ini saya akan berbagi tutorial cara mengontrol LED Arduino via Visual Basic 6. Berikut lngkahnya :

1. Uploud Sketch berikut ini ke Arduinonya, saya kebetulan memakai Arduino UNO

/* Simple Project by Giri Wahyu Pambudi
Kontrol LED via Viusal Basic 6
Http:www.cronyos.com */
void setup() {
Serial.begin(9600);
pinMode(13,OUTPUT);
}
char Data;
void loop() {
Data = Serial.read();
if (Data == 'H')
{
digitalWrite(13,HIGH);
}
else if (Data == 'M')
{
digitalWrite(13,LOW);
}
}

2. Buka Visual Basicnya, lalu tambahkan komponen berikut :

  • 2 Option Button
  • 1 Command Button
  • 1 Label
  • 1 MSComm (Project > Component / Ctrl+T > Control > Cari dan Centang Microsoft Comm Control > OK, maka akan muncul di Tab Komponen)
Baca Juga  Belajar Pemrograman Arduino untuk Pemula Part 4 : Mengenal Program Arduino

3. Ganti Caption Command Button menjadi “Eksekusi” dan Caption Option Button 1 dan 2 menjadi “Hidup”dan “Mati”,

4. lalu Ganti Shape dengan format Solid dan Circle, Caption Label 1 dikosongin aja

5. Setting Port dengan mengganti CommPort dengan lokasi Port Arduino Anda Berada

6. Sehingga menjadi seperti berikut :

Isikan Script berikut di sebagai Codenya :

Private Sub Command1_Click()
If Option1.Value = True Then
Shape1.BackColor = vbRed
MSComm1.Output = "H"
Label1.Caption = "HIDUP"
Else
Shape1.BackColor = vbWhite
End If
If Option2.Value = True Then
Shape1.FillColor = vbWhite
MSComm1.Output = "M"
Label1.Caption = "MATI"
Else
Shape1.FillColor = vbRed
End If
End Sub
Private Sub Form_Load()
MSComm1.PortOpen = True
End Sub

Berikut Video Hasilnya :)

Share your vote!


Vote and Share your Fell !
  • Fascinated
  • Happy
  • Sad
  • Angry
  • Bored
  • Afraid

About Giri Wahyu Pambudi

Giri Wahyu Pambudi - Seorang Pemuda Desa yang berkeinginan ikut membangun Indonesia dengan Sedikit Ilmu yang dimiliki SMK N 2 Wonogiri lulus 2015 UNIV Negeri Yogyakarta lulus 2019 2019 - Sekarang Bekerja di SMK Gajah Mungkur 1 Wuryantoro, Wonogiri
Jumlah Post : 396 Artikel

Artikel Serupa

Check Also

Cara Mengakses Sensor Tegangan DC menggunakan Arduino