Ungkapkan Cinta Menggunakan Script

Kalian tentu pernah merasakan jatuh cinta bukan?pastinya menyenangkan jika kita bisa mengungkapkan perasaan cinta kita kepada si dia. Tapi gimana kalo kita gak berani untuk mengungkapkanya secara langsung

hmmm..pasti hati tak karuan, pikiran kacau dan akhirnya galaupun datang (hahaha :D pengalaman pribadi).

Tenang.. tak usah galau ataupun risau karena saya akan memberi solusinya hehe

Silahkan sobat coba trik yang satu ini "Ungkapkan Cinta Menggunakan Script".

Dim Jika Jika = InputBox ("Hai .. Sebenarnya aku udah lama menyimpan rasa ini ,, kali ini aku ingin mengungkapkanya pada mu ... apakah kamu bersedia jadi pacar ku????? Jika kamu ''BERSEDIA'' ketik IYA tapi jika kamu ''MENOLAK'' ketik TIDAK") If UCase(Jika) = "IYA" Then MsgBox "Terimakasih udah mau jadi pacar ku ,, ku kan selalu menjagamu .. I LOVE YOU" ElseIf UCase(Jika) = "TIDAK" Then MsgBox "Hmm .. Makasih ,, mungkin ini keputusan yang terbaik untuk mu .." Else MsgBox "Ketikan IYA atau TIDAK ...!!!!!!!!!!!" Jika = InputBox ("Hai .. Sebenarnya aku udah lama menyimpan rasa ini ,, kali ini aku ingin mengungkapkanya pada mu ... apakah kamu bersedia jadi pacar ku????? Jika kamu ''BERSEDIA'' ketik IYA tapi jika kamu ''MENOLAK'' ketik TIDAK") End If

copas kode di atas pada notepad sobat

text bisa sobat ubah sesuai ungkapan hati sobat

kemudian simpan dengan format nama.VBS

buka file  VBS yang telah sobat buat untuk memastikan sudah sesuai atau tidak.

selanjutnya tinggal pindah ke laptop si dia.

kalo diterima yaa.. "Alhamdulillah" tapi kalo ditolak "Syukuri sajalah" mungkin bukan jodoh hehehe

-->Good Luck<--