Senin, 04 Maret 2013

 15.41         No comments

Berikut ini adalah cara dan langkah-langkah dalam pembuatan aplikasi shutdown : 
- Buka Microsoft Visual Basic 6.0
- Akan muncul jendela seperti dibawah :
      Description: https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjA-4gTuRZOZjmNbsnjN0CyDaryi3oUx0O4lAr38w7Y0jjROH2lFBNbfllWbBDFqj7xlK6Q4aXKDtQvrPEon6Zn9mOQj8vBUnIiU4eU9xeDtmvilYwL4e2F9ICIxxAwH19WuNGQq9FKWu4/s320/New.png 


- Pilih standart Exe, kemudian klik tombol Open, maka akan muncul area kerja Visual Basic 6.0








Description: https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiofGzVZ2hsZBEYnbGfhR48BTXHWkrOIle3j24bEhdSKloJS02b-MxfD2JE2tL4upHSjhqAbi5ymatet9ooy66X-6y1GPM_bLrhuMdW2jheRw6EJWwPqKF8E6N9zJW0fND1Qx5xDwUteuw/s1600/desain.png


- Dari gambar diatas, tambahkan 3 buah Command Button dari toolbox ke desain form
- Ubah juga nilai propertis pada masing-masing objek :
   - Form1 :
      - Caption : Aplikasi Shutdown
      - MaxButton : False
      - MinButton : False
      - BorderStyle : 1-FixedSingle
   - Command1 :
      - (Name) : Cmd_Shutdown
      - Caption : Shutdown
   - Command2 :
      - (Name) : Cmd_Restart
      - Caption : Restart
   - Command3 :
      - (Name) : Cmd_LogOff
      - Caption : Log Off
- Jika Command button telah ditambahkan dan nilai properties dari masing-2 objek telah diatur, sekarang atur desain form seperti gambar dibawah :
Description: https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEB8M2Fv15QBF52HYXik1BFSHxT0JY2YrEyTjrMoanQIr9PEfu0MR1dVr59K_QbaFRRUXpcSHDYMWfYp1CpPn6mYv41RCXhrEo0WHtjZTYcpVGGJUXdZTcr3cAeCxMLQqHknLSAI2ju4k/s1600/desain+jadi.png
- Jika form telah didesain seperti diatas, sekarang saatnya untuk penulisan listing code dengan cara menekan F7 atau mengklik 2x salah satu objek. kemudian ketikkan listing dibawah : 

Private Sub Cmd_Logoff_Click()
    Call Shell("C:\Windows\System32\Shutdown.exe -l -t 00", vbHide)
End Sub
Private Sub Cmd_Restart_Click()
    Call Shell("C:\Windows\System32\Shutdown.exe -r -t 00", vbHide)
End Sub
Private Sub Cmd_Shutdown_Click()
    Call Shell("C:\Windows\System32\Shutdown.exe -s -t 00", vbHide)
End Sub 


ingat jangan salah memasukan kodenya... jika salah, tombol fungsi tidak akan sesuai perintah..  tapi kalo buat isengin temen yaaaa...... terserah kalian...


Keterangan :
  -s = shutdown
  -r = restart


  -l = logoff
  -t 00 = interval waktu antara penekanan tombol shutdown dengan pemanggilan perintah shutdown.exe

semoga bermanfaat bagi teman2 yah !!

0 komentar:

Posting Komentar

Assalamu'alaikum..
Berkomentar lah dengan baik dan sopan..
Pasti saya bales komentar dari sahabat semua yang berkomentar Baik dan Sopan...
Terima Kasih atas pengertian dan kunjungan sahabat di Dunia Informasi

Popular Posts

Menu

Social Icons

Followers