Selamat malam teman-teman..
Kali ini saya akan membagikan cara mengirim/memindahkan nilai/data antar form menggunakan visual basic 6.0. Awalnya saya kesuliatn ketika ingin mengambil data di form lain tanpa harus menginput ulang, karena waktu itu sedang mengerjakan project menggunakan visual basic dan database maka saya memutuskan untuk mengambil data dari form lain dari pada terjadi pengulangan data (redundancy).
Baik, langsung saja kita masuk ke topik pembahasan cara mengirim/memindahkan nilai/data antar form menggunakan visual basic 6.0.
Berikut langkah-langkahnya:
Buatlah 2 form seperti gambar dibawah, jika masih belum tahu cara membuat form bisa baca cara membuat circle berwarna menggunakan visual basic 6.0 disitu ada cara untuk membuat form.
Design Form |
Masukan listing/coding di bawah ini pada commandbutton di form1,
Private Sub cmdtransfer_Click()
Form2.txtjudul = txtjudul.Text
Form2.txturl = txturl.Text
Form2.Show
End Sub
Masukan listing/coding di bawah ini pada commandbutton dan form load di form2,
Private Sub Command1_Click()
Form1.Show
End Sub
Private Sub Form_Load()
txtjudul.Enabled = False
txturl.Enabled = False
End Sub
Lalu langkah selanjutnya adalah menjalankannya, tapi sebelum menjalankannya pilih project di menu bar terus pilih project properties, setelah muncul jendela properties pilih form2 di startup object lalu ok, lihat gambar dibawah. Fungsinya agar pada saat di start yang akan muncul adalah form2.
Setelah selesai mari jalankan dengan klik start di tools bar atau dengan menekan f5, lalu akan muncul jendela baru seperti gambar dibawah lalu klik tombol input data.
Setelah itu akan tampil form 1, lalu ketikkan nilai/data pada text box dan klik tombol transfer.
Setelah itu akan tampil form 2 dengan text box yang sudah otomatis ada nilai/datanya.
Mudah kan? Sekian sharing saya tentang cara mengirim/memindahkan nilai/data antar form menggunakan visual basic 6.0 ini, silahkan dicoba sendiri bagi teman-teman yang ingin mencobanya, semoga postingan ini bermanfaat buat teman-teman.
Salam hangat dan sampai jumpa dipostingan berikutnya.
No comments:
Post a Comment
Berbahasalah dengan baik dan sopan.
Komentar yang menurut admin tidak baik dan sopan akan dihapus.