vb database help me

[JagoVB]

para agan ane pny problem tugas nih.

mohon bantuannya



benerin coding ane dong



desain form1

http://cdn-u.kaskus.us/37/yp38ammh.jpg

coding form1

Private Sub Command1_Click()

Adodc1.Recordset.AddNew

End Sub



Private Sub Command2_Click()

Form2.Show

Unload Me

End Sub



Private Sub Command3_Click()

Adodc1.Recordset.Delete

If Not Text1.Text = " " Then

While Not Adodc1.Recordset.EOF

End Sub



desain form2

http://cdn-u.kaskus.us/37/7zqtl4id.jpg



:mewek::mewek:

:mewek::mewek:

:mewek::mewek:

:mewek::mewek:

:mewek::mewek:

:mewek::mewek:

</div>