Member baru? Bingung? Perlu bantuan? Silakan baca panduan singkat untuk ikut berdiskusi.

Selamat datang, Pengunjung. Silahkan masuk atau mendaftar. Apakah anda lupa aktivasi email?

Desember 03, 2021, 05:11:59 AM

Masuk dengan nama pengguna, kata sandi dan lama sesi

Topik Baru

Artikel Sains

Anggota
Stats
  • Total Tulisan: 139668
  • Total Topik: 10408
  • Online Today: 56
  • Online Ever: 441
  • (Desember 18, 2011, 12:48:51 AM)
Pengguna Online
Users: 0
Guests: 21
Total: 21

Ikuti ForSa

ForSa on FB ForSa on Twitter

Penulis Topik: menampilkan data serial di VB  (Dibaca 7835 kali)

0 Anggota dan 1 Pengunjung sedang melihat topik ini.

Offline segi

  • Siswa Baru
  • *
  • Tulisan: 6
  • IQ: 3
menampilkan data serial di VB
« pada: Desember 23, 2010, 03:45:14 AM »
buat semuanya, saya ada pertanyaan seputar Visual Basic..

saya menggunakan mikrokontroler ATMega128, pake sensor GPS dll.
setelah di program menggunakan codevision, maka tampilan di hyperterminal nya sbb:

GPS= 710 m
suhu= 27 c           
tekanan= 920

pertanyaan nya, gimana caranya nampilin data di atas ke dalam visual basic dengan tampilan form sbb(gk ngerti d bagian MSComm nya buat nampilin semua data tsb biar bisa nampil di textbox4):

Objek           Properti             setting

Label1          Caption             GPS
Label2          Caption             Suhu
Label3          Caption             Tekanan
Label4          Caption             Data yg Masuk
Textbox1      Name                Text1
Textbox2      Name                Text2
Textbox3      Name                Text3
Textbox4      Name                Text4
MSComm1     Commport          6
                  setting              19200,N,8,1
                  Portopen            True



                 



Offline coughin

  • Siswa Baru
  • *
  • Tulisan: 4
  • IQ: 1
Re: menampilkan data serial di VB
« Jawab #1 pada: Desember 23, 2010, 05:55:28 AM »
itu masih pake VB6 ya?
saya saranin pake visual studio 2005 aja, lebih bagus.

saya kasih contoh untuk menerima sebuah data dari serial. misalnya kalo dibaca di hyperterminal akan menjadi seperti ini:
x

[cuma ngasih huruf x doang]

kalo pake VB6, kalo saya ga salah langkahnya gini:
1. di form_load ketik:

MSComm1.open();

itu untuk ngebuka port serialnya

2. buat variabel global baru untuk nyimpen data, misalnya
Dim a as integer
[karena contoh, jadi cuma 1 aja]

3. setelah itu di bagian 'event' (lambangnya kyk petir, sebelahnya properties) dari MSComm1, double click pilihan dataReceived, nanti akan otomatis dibuatin ke sebuah fungsi. nah fungsi ini adalah event handler untuk si data yang masuk ke serial port, jadi kalo ada data yang masuk, fungsi ini bakal langsung kepanggil. semacam interrupt data received kalo di AVR.

4. untuk menyimpan data yang diterima di serial port ke variabel, ketik
a = MSComm1.read()

[saya ga terlalu inget untuk VB yang versi ini gimana syntaxnya, pokoknya pasti mengandung kata 'read' deh]

4. buat timer untuk mengupdate tampilan label setiap beberapa detik, asumsi saya, mas sudah tau cara pake timer. di dalam event handler timer_tick, ketikkan:
label1.text = a.toString()

fungsi toString untuk mengubah nilai integer di dalam variabel a menjadi string supaya bisa ditampilkan ke label.

nah, kalo dengan cara ini nanti tulisan di label1.text akan menjadi 120 [yaitu nilai ascii dari huruf 'x']

mudah2an membantu..

Offline segi

  • Siswa Baru
  • *
  • Tulisan: 6
  • IQ: 3
Re: menampilkan data serial di VB
« Jawab #2 pada: Desember 26, 2010, 01:17:22 AM »
ok oM..makasih pencerahan nya.. :D

tar saya coba2... :)

Offline nivahendri

  • Siswa Baru
  • *
  • Tulisan: 1
  • IQ: 0
  • ForSa!
Re:menampilkan data serial di VB
« Jawab #3 pada: Juni 27, 2012, 11:14:33 AM »
mau tanya mas, program codevisionnya gmn ya mas???

 

Related Topics

  Subyek / Dimulai oleh Jawaban Tulisan terakhir
2 Jawaban
6325 Dilihat
Tulisan terakhir Desember 09, 2010, 01:23:50 AM
oleh bagus yunanto
7 Jawaban
7603 Dilihat
Tulisan terakhir Juni 23, 2011, 12:16:48 AM
oleh rakanety
2 Jawaban
5279 Dilihat
Tulisan terakhir Januari 26, 2011, 01:46:06 PM
oleh jalil64
0 Jawaban
2746 Dilihat
Tulisan terakhir April 20, 2011, 02:12:17 AM
oleh onyenk
0 Jawaban
179551 Dilihat
Tulisan terakhir Desember 18, 2013, 03:38:20 AM
oleh masjawa16