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