Blog Adi Sanjaya Global Techno Solution

Delphi, Mikrokontroler , Embedded system...Menerima Pembuatan alat berbasis mikrokontroller

LightBlog
Responsive Ads Here

Monday, May 25, 2015

Fungsi Delay (Tunda) pada Basic4Android

Terkadang dalam sebuah proses pemrograman androd, kita memerlukan sebuah fungsi delay (tunda) untuk melakukan sebuah eksekusi program ke eksekusi program selanjutnya.

jika anda membutuhkan penundaan semisal selama 1 detik dimana 1 detik dapat dikonversikan menjadi 1000ms maka anda dapat menggunakan sub program sebagai berikut :

Sub Wait(MilliSekunden As Int)
   Dim Ti As Long
   Ti = DateTime.Now + MilliSekunden
   Do While DateTime.Now < Ti
      DoEvents
   Loop
End Sub

cara menggunakan sub program delay tersebut adalah sebagai berikut

Wait(2000)

kode diatas menghasilkan delay selama 2 detik,

sedangkan jika kita tuliskan kode :
 
Wait(1000)

kode diatas menghasilkan delay selama 1 detik,

jika ada kode fungsi tunda pada   Basic4Android yang menghasilkan respon yang lebih baik lagi, mohon dishare.. terimakasih


 Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.

Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, led running teks, pengendali lampu  atau peralatan listrik lainnya via internet dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com


1 comment:

  1. Perkenalkan, saya dari tim kumpulbagi. Saya ingin tau, apakah kiranya anda berencana untuk mengoleksi files menggunakan hosting yang baru?
    Jika ya, silahkan kunjungi website ini www.kbagi.com untuk info selengkapnya.

    Di sana anda bisa dengan bebas share dan mendowload foto-foto keluarga dan trip, music, video, filem dll dalam jumlah dan waktu yang tidak terbatas, setelah registrasi terlebih dahulu. Gratis :)

    ReplyDelete

Silakan dikomentari