一、数据库创建属性域。
sdk3.1 以下的开发版本不支持,不能使用 Pro SDK 向域添加新的编码值,可以使用地理处理工具:
'创建属性域
Dim va As IReadOnlyList(Of String)
Dim gpResult As ArcGIS.Desktop.Core.Geoprocessing.IGPResult
Dim environments = Geoprocessing.MakeEnvironmentArray(overwriteoutput:=True)
Dim executeFlags As GPExecuteToolFlags = GPExecuteToolFlags.AddOutputsToMap
Dim pgdbPath As String = Project.Current.DefaultGeodatabasePath
va = Geoprocessing.MakeValueArray(pgdbPath, "JZX_WZ", "界址线位置", "TEXT", "CODED")
Await Geoprocessing.ExecuteToolAsync("Management.CreateDomain", va, environments, Nothing, Nothing, executeFlags)
Dim domDict = New Dictionary(Of Integer, String)
domDict.Add(1, "左")
domDict.Add(2, "中")
domDict.Add(3, "右")
For Each code In domDict
Await Geoprocessing.ExecuteToolAsync("management.AddCodedValueToDomain", Geoprocessing.MakeValueArray(pgdbPath, &