Option Compare Database
Private Sub Komut6_Click()
On Error GoTo Err_Komut6_Click
DoCmd.GoToRecord , , acFirst
Exit_Komut6_Click:
Exit Sub
Err_Komut6_Click:
MsgBox Err.Description
Resume Exit_Komut6_Click
End Sub
Option Compare Database
Option Explicit
Dim path As String
Compile'yi buldum yukarıdaki kodda hata buldu.(Only comments may appear after End Sub , End Fuction , or End property)
