ms access
2 отговора
166 прегледа
ms access
Public Sub ClearAllControlsInAForm(frm As Form)
Dim ctrl As Control
For Each ctrl In frm
ctrl.Value = Null
End Sub
tova neshto, kato go izvikam v OnClick na edin buton vuv vida:
ClearAllControlsInAForm (Forms("FrmEnterArticlesData"))
mi vika che sum izpolzval invalid type
mojete li da mi kajete kude burkam

Dim ctrl As Control
For Each ctrl In frm
ctrl.Value = Null
End Sub
tova neshto, kato go izvikam v OnClick na edin buton vuv vida:
ClearAllControlsInAForm (Forms("FrmEnterArticlesData"))
mi vika che sum izpolzval invalid type
mojete li da mi kajete kude burkam
Re: ms access
Притеснява ме тази стойност Null.Може някой от контролите да не търпи такава стойност. Например ако се извеждат само цифри.