Sub DisplayFeet() Dim objControl, objPage, Meters, Feet 'Get the control, page objects Set objControl = ThisEvent.Object Set objPage = ThisEvent.Object.Parent Meters = objControl.Value Feet = Meters * 3.2808399 'Display the value on a editbox control named "edtFeet" on the same page objPage.Controls("edtFeet").Value = Feet & "ft" End Sub
Signed in members can post, follow updates, and more. New here? Register a free account.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.