Kod konusunda çok iyi sayılmam. Aşağıdaki gibi bir deneme yaptım fakat başaramadım.
Private Sub Command13_Click()
DoCmd.GoToRecord , Örnek_Tablo, acNewRec
'DoCmd.GoToRecord , , acNewRec
Kod = Me.Combo2
Rakip1 = Me.Text4
Rakip2 = Me.Text6
İskonto = Me.Text9
Net_TL = Me.Text11
Tarih = Me.Text14
DoCmd.GoToRecord , , acNext
DoCmd.Close
End Sub
![Çözüldü](images/icons/cozuldu.png)
Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!
(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
ölsende yaşamaya mecbursun!
UNUTMA!!!
(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)