Koding yang akan kami berikan sangat sederhana dan yang pasti anda bisa mengikutinya, silahkan ikuti langkah-langkah dibawah ya....
Buka Aplikasi VB 6.0 anda
Jika sudah, maka akan muncul form1
Buatlah design Form1 seperti gambar dibawah ini :
Pada gambar diatas, yang terpenting adalah terdapat Text1, Label3 dan Command1
Baca Juga : Cara Menghitung Selisih Tanggal Pada VB 6.0
Jika sudah masukan koding dibawah ini :
Private Sub Form_Load()Jika sudah, sialhkan Run atau jalankan Project anda, maka hasilnya seperti gambar paling atas pada pembelajaran ini.
Text1 = ""
Label3 = ""
End Sub
Private Sub Command1_Click()
On Error Resume Next
Label3 = "Rp " & Format(Text1, "###,###,###")
End Sub
Jika Tutorial ini bermanfaat, silahkan berkomentar dan ikuti terus pembelajaran kami lainnya :)