Cara menembak seseorang dengan Notepad

Assalamualaikum.......

Kali ini saya akan membagikan rumus notepad untuk memnembak seseorang :)
Rumus ini cocok bagi kalian yang canggung mengungkapkan perasaan secara langsung :v

bahan bahan :
1. pc ato laptop
2. Notepad
3. rumus

oke ini dia rumusnya :
Dim Jika
Jika = InputBox ("hai kamu, Sebenarnya aku sudah lama memendam perasaan kecilku ini. Sejak pertama aku melihat kamu, detak jantungku semakin kencang bila aku berada di dekatmu, Aku cinta kamu. , Tekan 'Y' apabila kamu terima aku jadi pacarmu, dan 'T' apabila kamu menolaknya. ","By : aji")
If UCase(Jika) = "Y" Then
MsgBox "Makasih ya udah menerima cintaku, hubungi aku ya :) ",0,"Thanks ya :)"
ElseIf UCase(Jika) = "T" Then
MsgBox "Okelah gapapa.",0,":("
Else
MsgBox "Kamu belum masukin jawabannya, ayo dong jawab please !!", 0 ,"Jawab dong :)"
End If
copy ke Notepad lalu save dengan nama .vbs

sekian postingan dari saya, terimakasih sudah berkunjung :)