Kamis, 30 September 2010

1

[VB] Membuat Fungsi Sleep Sendiri

  • Kamis, 30 September 2010
  • Nurkholish Ardi Firdaus
  • Share
  • Terkadang untuk suatu keperluan, kamu harus menghentikan sejenak alur code yang kamu buat dalam beberapa detik.
    Dalam kasus ini, kamu bisa menggunakan fungsi API yang yaitu Sleep pada VB, apakah kamu tidak ingin membuatnya sendiri?

    Hehehe, aneh ya! sudah disediakan fungsi Sleep, masih tidak puas. Oke, untuk iseng-iseng mari kita buat prosedur yang mirip dengan
    fungsi Sleep, tetapi mari kita gunakan waktu dalam detik bukan dalam milidetik seperti fungsi Sleep, tidak terlalu rumit kok.

    Delarasi:

    1 Form
    1 Command Button




    Source Code:

    Private Sub Command1_Click()

    Dim waktu As Integer

    'waktu tidur=3 detik
    waktu = 3
    Ngorok_ZZZ waktu
    MsgBox "Bangun!!!, kau telah tidur selama " & waktu & " s"

    End Sub

    Private Sub Ngorok_ZZZ(ByVal time As Integer)

    Dim t As Single

    t = Timer

    Do Until (Timer - t) >= time
    DoEvents
    Loop

    End Sub

    '2010 crowja

    Jangan Lupa Komentar Yaa..
    Related Posts Plugin for WordPress, Blogger...

    1 Komentar Untuk “[VB] Membuat Fungsi Sleep Sendiri”

    Anonim mengatakan...

    Sabtu, 02 November 2013 19.00.00 WIB Reply To This Comment

    apa fungsi nya sleep itu?gan?


    Posting Komentar

    Berikan komentar positif tentang artikel yang sederhana ini niscaya sobat akan mendapatkan balasannya. Hehehe

    Subscribe