Dim QueryVariable QueryVariable = "SELECT [RelatedField1], [RelatedField2], [RelatedField3], ... [RelatedFieldN] FROM [RelatedTableName] WHERE [RelatedTableKeyValue] = " + Cstr(ParentKeyValue)
Dim RelatedArray, MyDatasource Set MyDatasource = Layers("ParentTableName").Datasource RelatedArray = MyDatasource.Execute(QueryVariable).ToArray(FALSE)
Dim lstResults, ResultArrayCounter, JustSomeVariable Set lstResults = Applet.Forms("NameOfForm").Pages("Page1").Controls("NameOfListBoxInMyForm") ResultArrayCounter = 0 For each JustSomeVariable In RelatedArray lstResults.AddItem RelatedArray(ResultArrayCounter, 2), RelatedArray(ResultArrayCounter, 2) ResultArrayCounter = ResultArrayCounter + 1 Next
Membros conectados podem postar, seguir atualizações e mais. Novo aqui? Registre uma conta gratuita.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.