Private Sub Komut119_Click()
With Me!hakedis
.SetFocus
If Not .Form.NewRecord Then
RunCommand acCmdRecordsGoToNew
End If
harödenek = hakedis.Form!alttoplam
End With
End Sub
alt formdaki(hakedis) alttoplamı ,formdaki metin kutusunda ( harödenek) göstermek istiyorum. bunu metin kutusunun denetim kısmina =hakedis.Form!alttoplam yazarak yapıyorum
ancak bunu bir komut tuşuna bağladığım zaman ilk kaydı göstermiyor. diğer kayıtlarıda birer eksik toplayarak devam ediyor. ( yukarıdaki kodları kullandım)
With Me!hakedis
.SetFocus
If Not .Form.NewRecord Then
RunCommand acCmdRecordsGoToNew
End If
harödenek = hakedis.Form!alttoplam
End With
End Sub
alt formdaki(hakedis) alttoplamı ,formdaki metin kutusunda ( harödenek) göstermek istiyorum. bunu metin kutusunun denetim kısmina =hakedis.Form!alttoplam yazarak yapıyorum
ancak bunu bir komut tuşuna bağladığım zaman ilk kaydı göstermiyor. diğer kayıtlarıda birer eksik toplayarak devam ediyor. ( yukarıdaki kodları kullandım)