• Photo

  • Cara Membuat Program Pemeriksa Screen Saver Di Visual Basic 6.0Hai Dreamers kali ini saya akan menjelaskan tentang Cara Membuat Program Pemeriksa Screen Saver Di Visual Basic 6.0, Aplikasi ini berfungsi untuk memeriksa Screen Saver, Apakah Hidup atau Mati. Sobat Penasaran ?, Jika penasaran langsung aja ke Cara Membuat Program Pemeriksa Screen Saver Di Visual Basic 6.0

    Microsoft Visual Basic 6.0
    Pertama-tama :

    1. Buka Aplikasi Visual Basic 6.0 Pilih Standard Exe
    2. Buat 1 buah Form
    3. Buat 2 Buah Label
    • Name : lblSaver
    • Name : lblInfo
    Kalau sudah siap Ketik Atau (Copy) Kode dibawah ini di General (Declarations)

    Option Explicit

    'tutorial by dreamwarexcom.blogspot.com
    'salam dreamers
    Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
    Private Const SPI_GETSCREENSAVEACTIVE = 16

    Private Function IsScreenSaverEnable() As Boolean
      Dim bReturn As Boolean
      Dim bActive As Boolean
      Call SystemParametersInfo(SPI_GETSCREENSAVEACTIVE, vbNull, bReturn, 0)
        IsScreenSaverEnable = bReturn
    End Function

    Private Sub Form_Load()
    lblSaver.Caption = "Screen Saver : " & IsScreenSaverEnable & ""
    lblInfo.Caption = "Sumber : Dreamwarexcom.blogspot.com"
    End Sub

    Desain Sesuai Keinginan anda

    Sekian dreamers, terimakasih
    kunjungi terus dreamware
    jangan lupa share dan jangan lupa sertakan sumber
    salam dreamers

    0 komentar:

    Posting Komentar

    1. Berkomentarlah dengan bahasa jelas, agar kami mudah memahaminya
    2. Berkomentarlah dengan sopan
    3. Hargai orang lain
    4. Jangan jadi spamer di komentar

    by : Andi Fajar (ADMIN)

    Pasang Iklan