[+] Post Title :

Membuat Tool Message Box Java Script menggunakan VB 6.0

[+] Date : Rabu, 01 Februari 2012
[+] Author : šëHëR!êž Hⁿc
[+] Link : http://seherieshnc.blogspot.com/2012/01/membuat-tool-message-box-java-script.html
[+] Type : Tutorial

Oke langsung saja gan, :D saya rasa sudah jelas dengan judul di atas, yang belum jelas silahkan bertanya :D

1. Buka Vb 6.0
2. New Project Standard EXE


3. Tambahkan 2 buah TextBox & 2 buah CommandButton


4. Copas code berikut :


Private Sub Command1_Click()

Dim code1 As String

code1 = ""
code1 = code1 & "<SCRIPT language='JavaScript'>alert("""
code1 = code1 & Text1.Text
code1 = code1 & """"
code1 = code1 & ");</SCRIPT>"

Text2.Text = code1
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text1.SetFocus
End Sub



5. Jalankan dengan menekan tombol F5

Demo : JS-creator