Membuat Form Berkedip

Sisipkan 1 command , & 1 Module


 •)Pastekan Kode Berikut Di Module


Option Explicit

Public Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long

Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

•)Lalu Kode Ini Di Form


Private Sub Command1_Click()
Dim x As Long
    For c = 1 To 10
        x = FlashWindow(Form1.hwnd, 1)
        Sleep 100
    Next c
        x = FlashWindow(Form1.hwnd, 0)
End Sub



Disini Saya Akan Memberikan Tutorial Yg Simple Dan Dimengerti
Jadi.....


Selamat Berkreasi

READMORE

Membuat Menu Klik Kanan Dan Tombol Popup Menu

Caranya Hampir Sama Dengan Posting Sebelumnya
Yaitu Membuat Menu Terlebih Dahulu ..


LAngsung Aja Ke TKP..............





    Kita Lihat Pada Atas Form Akan Terlihat Menu File

   

       Kita Akan Menghilangkan Tampilan Menu Tersebut,
Tapi Tidak Menghilangkan Isi Dari Menu Tersebut..
Dengan Cara Hilangkan Centang Pada Visible.............
Nah Itu Untuk Menghilangkan Tampilan Menu ..
••>>) Sekarang Kita Akan Membuat Menu Pada Klik Kanan..

   CaraNya :
•)Sediakan Semangkuk Tai Panas Serta
   Bumbu Balado Lengkap Dengan Bawang Rebus
                      Cuman Bercanda  
•)kita Pastekan Kode Berikut Di Form
  
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mnFile 'memanggil menu menjadi pop up menu'
End If
End Sub


       Beres Deh Untuk Membuat Menu Klik Kanan Pada Form

••>>) Sekarang Menu Di Tombol..   
•)CaraNya Tuliskan Pada Tombol
    Misalkan "


Private sub Command1_click()
PopupMenu MnFile


End Sub

Selesai Deh..!!!!!!!


       Selamat Berkreasi

READMORE

Membuat Menu Pada Visual Basic

CaraNya Mudah Yaitu
•) Klik Kanan Pada Form
•) Lalu Pilih Menu Editor
        Nah Disini Kalian Bisa Berkreasi Sendiri 
  Contoh Seperti Ini !!!

   










             Seperti Gambar Di samping Disana Ada Menu File Dan DiDampingi exit..
Untuk Membuat Yg Seperti Itu Kalian Tinggal Isi Caption dengan "file"

dan Name Dengan MnFile.............


    Nah Jika Sudah, Klik Tombol Next.
Lalu Klik Juga Tombol Panah Kanan.
Lalu Isikan Caption Dengan Exit Dan Name Dengan MnExit Nah Sekarang Tinggal Klik Tombol
Selesai Deh


Lalu Klik File Di VB,
Lalu Klik Make Project.exe


Selamat Berkreasi

READMORE