Sub ValidateChk(pThisEvent) Dim pControls Dim pThisForm, pThisPage Set pThisPage = pThisEvent.Object Set pThisForm = pThisPage.Parent Set pControls = pThisForm.Pages("PAGE1").Controls If pControls.Item("Check1").Value = False Then ThisEvent.MessageText ="Checkbox is required." ThisEvent.Result = False Exit Sub End If End Sub
Call ValidateChk(ThisEvent)
Angemeldete Mitglieder können Beiträge verfassen, Updates folgen und mehr. Neu hier? Registriere ein kostenloses Konto.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.