Cara supaya klik Next dan Previous terus menerus tidak bug pada VB

 Pada kesempatan kali ini saya akan membahas cara supaya klik Next dan Previous tidak bug pada VB berikut langkah-langkahnya 100% working :

Membuat database terlebih dahulu pada VB, Jika belum tau cara membuatnya klik di sini

Lalu koneksikan databasenya pada VB, Jika belum tau cara mengkoneksikannya klik di sini

Selanjutnya buat command button seperti dibawah ini

Masukkan pada coding dibawah ini pada command button tersebut

Private Sub Command6_Click()
Adodc1.Recordset.MoveFirst
End Sub

Private Sub Command7_Click()
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
End If
End Sub

Private Sub Command8_Click()
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
End If
End Sub

Private Sub Command9_Click()
Adodc1.Recordset.MoveLast
End Sub

Dan hasilnya akan seperti dibawah ini