Tahap Kedua Pengkodingan

Hari ini adalah hari kedua saya melakukan pengkodingan pada visual basic untuk aplikasi yang akan saya buat. Setelah melakukan beberapa penulisan koding akhirnya saya berhasil menyelesaikan satu form yaitu form data user. Ada beberapa hal baru yang saya dapat untuk pengerjaan form data user ini yaitu pada code proses simpan saya menggunakan perintah query mungkin hal itu sudah biasa tapi bagi saya itu adalah hal yang baru. Kode untuk menyimpan dengan menggunakan query itu adalah sebagai berikut:

If rs.State = adStateOpen Then rs.Close
rs.Open "INSERT INTO namatabel (nmfield1,nmfield2,....)VALUES ('" & nmtextbox.text & "','" & nmtext.Text & "')"
Kemudian untuk penyimpanan supaya passwordnya dpt menjadi caracter bila dimunculkan pada listview kodenya adalah sebagai berikut.
isipassword = ""
For i = 1 To Len(Trim(rs.Fields(2)))
isipassword = isipassword + "*"
Next
ite.SubItems(3) = Replace(rs.Fields(2), Mid(rs.Fields(2), 1, Len(rs.Fields(2))), isipassword)
rs.MoveNext