Dim thisform = Application.Map.Layers(lyrname).Forms('EDITFORM') If lyrform.Mode = 2 Then Application.MessageBox('Form open for editing') Else If lyrform.Mode = 3 Then Application.MessageBox('Form open for new feature') End If
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.