vb database help me

[JagoVB]

para agan ane pny problem tugas nih.

mohon bantuannya



benerin coding ane dong



desain form1



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