Selasa, 02 Agustus 2011

Mengaktifkan/nonaktifkan Fungsi Ctrl-Alt-Del VB6

Berikut ini adalah cara mengaktifkan dan nonaktifkan Fungsi Ctrl-Alt-Del pada keyboard di visual basic 6, untuk mempraktekannya siapkan :
1. Buat 1 Form, 1 Module, dan 2 Commandbutton.
2. Copy-kan coding berikut ke dalam editor Module dan Form yang bertalian.

          '--- Coding berikut ini di Module Anda...
          Declare Function SystemParametersInfo Lib "user32" Alias _
          "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, _ 
          ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
          '--- Batas coding di Module...

          '--- Coding berikut ini di Form Anda...
          Sub DisableCtrlAltDelete(bDisabled As Boolean)
          Dim x As Long
              x = SystemParametersInfo(97, bDisabled, CStr(1), 0)
          End Sub

          Private Sub Command2_Click()
             DisableCtrlAltDelete (False)    'Enable-kan fungsi Ctrl-Alt-Del
          End Sub

          Private Sub Command1_Click()
             DisableCtrlAltDelete (True)     'Disable-kan fungsi Ctrl-Alt-Del
          End Sub
          '--- Batas coding di Form...

Tags:
contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module

Ditulis Oleh : Wahyu Aji // 00.54
Kategori:

0 komentar:

Posting Komentar