Dim ctlC As Control
' For each control.
For Each ctlC in Me.Controls
If ctlC.ControlType = acTextBox Then
' Restore Old Value.
ctlC.Value = ctlC.OldValue
End If
Next ctlC
buradaki ctlC.Value = ctlC.OldValue satırını değiştirerek kullanabilirsiniz
iyi çalışmalar
