|
merhaba arkadaşlar,
butonlara sabit işlevler eklemek istiyorum...alt formun ismini belirtim kayıtlar arasında dolaşmak gibi....
mesaj kutusundan yanıt alıyorum ama kayıt gezintisi olmuyor....
[code=vba]Public Sub AltFrm_Kayit_islem(formadi As String, altformadi As String)
Dim ctl As Control
For Each ctl In Forms(formadi).Controls
With ctl
On Error Resume Next
Select Case .ControlType
Case acCommandButton
If Mid(.Name, 9, 20) = "previous" Then
|