{"id":467,"date":"2009-05-12T10:20:08","date_gmt":"2009-05-12T10:20:08","guid":{"rendered":"https:\/\/www.akademiautomasi.com\/?p=467"},"modified":"2009-05-12T10:20:08","modified_gmt":"2009-05-12T10:20:08","slug":"aplikasi-visual-basic-6-untuk-device-interfacing","status":"publish","type":"post","link":"https:\/\/www.akademiautomasi.com\/?p=467","title":{"rendered":"Aplikasi Visual Basic 6 untuk Device Interfacing"},"content":{"rendered":"<p><em>Menyambung tulisan singkat saya tentang <a href=\\\"http:\/\/learnautomation.wordpress.com\/2009\/04\/30\/komunikasi-serial-pc-plc-dengan-visual-basic-seri-1\/\\\" target=\\\"_blank\\\">komunikasi PC &#8211; PLC dengan Visual Basic<\/a>, berikut akan coba saya jelaskan slide saya di tulisan tersebut dalam bentul artikel. <\/em><\/p>\n<p><em>Artikel ini akan menjelaskan bagaimana menggunakan Visual Basic untuk mengakses peralatan di dunia luar. Contoh <strong>program Visual Basic<\/strong> dan sumber penting saya sertakan di bagian akhir artikel ini.<\/em><\/p>\n<p><strong>Pendahuluan<\/strong><\/p>\n<p>Sebagai media komunikasi dengan dunia luar, VB 6 telah menyediakan <strong>MS Comm Control 6.0 <\/strong>(tambahkan melalui : Project &#8211;&gt; Components).<\/p>\n<p><a href=\\\"http:\/\/learnautomation.wordpress.com\/wp-content\/uploads\/2009\/05\/vbcommcontrol.jpg\\\"><img class=\\\"aligncenter size-medium wp-image-472\\\" title=\\\"vbCommControl\\\" src=\\\"http:\/\/learnautomation.wordpress.com\/wp-content\/uploads\/2009\/05\/vbcommcontrol.jpg?w=300\\\" alt=\\\"vbCommControl\\\" width=\\\"300\\\" height=\\\"270\\\" \/><\/a><\/p>\n<p>Component ini berfungsi untuk :<\/p>\n<ul>\n<li>Mengadakan hubungan dengan serial port PC<\/li>\n<li>Berhubungan dengan alat komunikasi lain (contoh : modem)<\/li>\n<li>Melakukan pertukaran data<\/li>\n<li>Memonitor dan merespon event dan error yang terjadi pada hubungan serial<\/li>\n<\/ul>\n<p>Untuk mengadakan suatu komunikasi serial antara 2 peralatan, kita harus melakukan langkah &#8211; langkah berikut : <!--more--><\/p>\n<ol>\n<li>Membuka <em>serial port<\/em><\/li>\n<li>Mengatur <em>serial device<\/em><\/li>\n<li><em>Setting Receive and Transmit Buffer Properties<\/em><\/li>\n<li><em>Managing Receive and Transmit Buffer<\/em><\/li>\n<\/ol>\n<p>Penjelasan masing &#8211; masing langkah akan diberikan di bawah.<\/p>\n<p><strong>1. Membuka Serial Port<\/strong><\/p>\n<p>Pada komunikasi serial, bit &#8211; bit data yang masuk dari dunia luar ke dalam komputer melalui <em>serial port <\/em>akan ditampung dulu di <em>receive buffer <\/em>sebelum akan dieksekusi oleh <em>main controller<\/em>. Demikian pula sebelum dikirim ke luar, data akan ditampung dulu di <em>transmit buffer<\/em>. Skema lengkapnya dapat di lihat pada gambar di bawah.<\/p>\n<p style=\\\"text-align:left\\\"><a href=\\\"http:\/\/learnautomation.wordpress.com\/wp-content\/uploads\/2009\/05\/vbscada.gif\\\"><img class=\\\"size-medium wp-image-471 aligncenter\\\" title=\\\"VBscada\\\" src=\\\"http:\/\/learnautomation.wordpress.com\/wp-content\/uploads\/2009\/05\/vbscada.gif?w=300\\\" alt=\\\"VBscada\\\" width=\\\"300\\\" height=\\\"242\\\" \/><\/a><\/p>\n<p style=\\\"text-align:left\\\">Sebelum membuka <em>serial port<\/em>, dilakukan pengaturan protokol komunikasi serial dengan <em>property <\/em>MSComm berikut :<\/p>\n<ul>\n<li><em>CommPort <\/em>: menentukan nomor port komunikasi<\/li>\n<li><em>Setting<\/em> : menentukan baud rate, parity, data bits, stop bits  dalam string<\/li>\n<\/ul>\n<p style=\\\"text-align:left\\\">Untuk membuka serial port cukup dengan property :<\/p>\n<ul>\n<li><em>PortOpen <\/em>: membuka dan menutup port<\/li>\n<\/ul>\n<p>Sehingga kode program akan tertulis sebagai berikut :<\/p>\n<address>MSComm1.ComPort = 2<\/address>\n<address> MSComm1.Settings = \u201c9600,N,8,1\u201d<\/address>\n<address> MSComm1.PortOpen = True<\/address>\n<p style=\\\"text-align:left\\\"><strong>2. Mengatur Serial Device<\/strong><\/p>\n<p style=\\\"text-align:left\\\">Pada tahap ini kita perlu memastikan bahwa pengaturan protokol komunikasi serial yang digunakan pada peralatan lain yang kita akses (misal : PLC, modem, mikrokontroler) sesuai dengan pengaturan pada komputer yang kita pakai.<em><\/em><\/p>\n<p style=\\\"text-align:left\\\"><strong>3. Setting Receive and Transmit Buffer Properties<\/strong><\/p>\n<p style=\\\"text-align:left\\\">Ada beberapa <em>property<\/em> dari <em>receive buffer<\/em> dan <em>transmit buffer<\/em> (<em>property <\/em>dari MS Comm) yang perlu kita atur.<\/p>\n<ul>\n<li><em>InBufferSize <\/em>: mengatur ukuran <em>receive buffer<\/em><\/li>\n<li><em>OutBufferSize <\/em>: mengatur ukuran <em>transmit buffer<\/em><\/li>\n<li><em>Rthreshold <\/em>: menentukan jumlah karakter yang diterima oleh <em>receive <\/em><em>buffer <\/em>sebelum <em>OnComm <\/em><em>event <\/em>dipicu<\/li>\n<li><em>Sthreshold <\/em>: menentukan jumlah karakter yang diterima oleh <em>transmit <\/em><em>buffer <\/em>sebelum <em>OnComm <\/em><em>event <\/em>dipicu\n<ul>\n<li>Jika bernilai 0 berarti tidak pernah dipicu<\/li>\n<li>Jika bernilai 1 berarti dipicu setiap satu karakter<\/li>\n<\/ul>\n<\/li>\n<li><em>InputLen<\/em> : menentukan jumlah karakter yang dibaca CPU dari receive buffer\n<ul>\n<li>Jika bernilai \u201c 0 \u201c, maka seluruh isi receive buffer akan dibaca CPU<\/li>\n<\/ul>\n<\/li>\n<li><em>InputMode <\/em>: menentukan tipe data input yang akan dibaca CPU\n<ul>\n<li><em>comInputModeText<\/em> : untuk data <em>string<\/em>\/teks<\/li>\n<li><em>comInputModeBinary <\/em>: untuk data biner<\/li>\n<\/ul>\n<\/li>\n<\/ul>\n<p><strong>4. <\/strong><strong>Managing Receive and Transmit Buffer <\/strong><\/p>\n<p>Untuk menampilkan data dari peralatan lain ke dalam aplikasi VB, digunakan properti : <strong>Input.<\/strong> Sehingga kode akan berbentuk :<\/p>\n<address>TxtDisplay.Text = MSComm1.Input<\/address>\n<p>Untuk mengirim data dari aplikasi VB ke peralatan lain digunakn properti : <strong>Output<\/strong>. Sehingga kode akan berbentuk :<\/p>\n<address>MSComm1.Output = \u201cIni nilai string\u201d<\/address>\n<p>Untuk mengawasi jumlah bit yang ada di <em>transmit buffer<\/em> dan <em>receive buffer<\/em>, property berikut dapat ditampilkan.<\/p>\n<ul>\n<li><em>InBufferCount<\/em><\/li>\n<li><em>OutBufferCount<\/em><\/li>\n<\/ul>\n<p><em>MSComm <\/em>hanya memiliki 1 event, yaitu <strong>OnComm<\/strong>. Event ini akan terjadi jika properti dari <strong>CommEvent <\/strong>berubah, yaitu saat terjadi :<\/p>\n<ul>\n<li><em>Event<\/em> komunikasi<\/li>\n<li><em>Error<\/em><\/li>\n<\/ul>\n<p>Contoh dari <em>event<\/em> komunikasi <strong>OnComm :<\/strong><\/p>\n<ul>\n<li><em>comEvSend <\/em>: mengirim sejumlah karakter ke <em>transmit buffer<\/em><\/li>\n<li><em>comEvReceive <\/em>: menerima sejumlah karater di <em>receive buffer<\/em><\/li>\n<li><em>etc<\/em><\/li>\n<\/ul>\n<p>Sedang contoh dari <em>error <\/em>pada <strong>OnComm<\/strong> :<\/p>\n<ul>\n<li><em>comEventBreak <\/em>: sinyal <em>break <\/em>diterima<\/li>\n<li><em>comEventFrame <\/em>: ada kesalahan <em>framing<\/em><\/li>\n<li><em>comEventRxOver <\/em>: <em>receive buffer <\/em>mengalami <em>overflow<\/em><\/li>\n<li><em>comEventTXFull <\/em>: <em>transmit buffer <\/em>penuh<\/li>\n<li><em>etc<\/em><\/li>\n<\/ul>\n<p>Sebagai media latihan, berikut ini saya sertakan <a href=\\\"http:\/\/www.4shared.com\/file\/104868094\/47d9b032\/Program_chatting_2_PC.html\\\" target=\\\"_blank\\\">program VB untuk <em>chatting <\/em>antara 2 komputer<\/a>.<\/p>\n<p>Semoga berguna dan menambah wawasan!<\/p>\n<p><em>Sumber :<\/em><\/p>\n<ul>\n<li><a href=\\\"http:\/\/msdn.microsoft.com\/en-us\/vbrun\/ms788232.aspx\\\" target=\\\"_blank\\\">Resource VB 6.0 dari MSDN<\/a> merupakan sumber terbaik.<\/li>\n<li>Ratna Prasetia, Catur Edi Widodo,<a href=\\\"http:\/\/betaversion.andipublisher.com\/?buku-komputer&amp;p=productsMore&amp;iProduct=242\\\" target=\\\"_blank\\\"> \u201c<em>Interfacing<\/em><em> Port Paralel  dan Port<\/em><\/a><em><a href=\\\"http:\/\/betaversion.andipublisher.com\/?buku-komputer&amp;p=productsMore&amp;iProduct=242\\\" target=\\\"_blank\\\"> Serial Komputer dengan Visual Basic 6.0\u201d<\/a>,<\/em> Penerbit Andi<\/li>\n<\/ul>\n","protected":false},"excerpt":{"rendered":"<p>Menyambung tulisan singkat saya tentang komunikasi PC &#8211; PLC dengan Visual Basic, berikut akan coba saya jelaskan slide saya di tulisan tersebut dalam bentul artikel. Artikel ini akan menjelaskan bagaimana menggunakan Visual Basic untuk mengakses peralatan di dunia luar. Contoh program Visual Basic dan sumber penting saya sertakan di bagian akhir artikel ini. Pendahuluan Sebagai &#8230; <a title=\"Aplikasi Visual Basic 6 untuk Device Interfacing\" class=\"read-more\" href=\"https:\/\/www.akademiautomasi.com\/?p=467\" aria-label=\"Read more about Aplikasi Visual Basic 6 untuk Device Interfacing\">Read more<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"single-with-sidebar","format":"standard","meta":{"_kadence_starter_templates_imported_post":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[39],"tags":[74],"class_list":["post-467","post","type-post","status-publish","format-standard","hentry","category-scada-hmi-tutorial","tag-visual-basic"],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=\/wp\/v2\/posts\/467","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=467"}],"version-history":[{"count":0,"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=\/wp\/v2\/posts\/467\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=467"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=467"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.akademiautomasi.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=467"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}