Nonton TV Bareng Bersama Blogger Syarif Hidayat
00.50
By
Syarif Hidayat
0
komentar
Tunggu, baru LOADING.
Read more
Dim Jika Jika = InputBox (" Isikan kata-kata untuk nembak cewek/cowok yang Anda sukai ") If UCase(Jika) = " isikan kata-kata yang menyatakan persetujuan, contoh : IYA(harus huruf besar)" Then MsgBox " isikan kata-kata jika cewek/cowok yang Anda suka mengisikan kata persetujuan pada kotak dialog" ElseIf UCase(Jika) = " isikan kata-kata yang menyatakan penolakan, contoh : TIDAK(harus huruf besar)" Then MsgBox " isikan kata-kata jika cewek/cowok yang Anda suka mengisikan kata penolakan pada kotak dialog" Else MsgBox " isikan kata-kata yang jika cowok/cewek yang Anda sukai tidak menyatakan persetujuan/penolakan " End If |
Dim Jika Jika = InputBox ("F** aku sayang bnget sama kamu, tapi kamu udah punyak T sekarang :(, tapi yng pasti ini aku buat cuman buat buktiin kalo aku sayang bnget sama kamu. Sekarang kamu plih si * apa si T f** ?? :D ketik * or T, lalu klik ok ^_^ ") If UCase(Jika) = "*" Then MsgBox "I Love You sayank, mmwah ~^_^~" ElseIf UCase(Jika) = "T" Then MsgBox "Never To Give Up ^_^" Else MsgBox "Pilihan hanya '*' untuk ya atau 'T' untuk tidak " End If |