Skip to content

ProSnippets Migrating to 2.0 vb

uma2526 edited this page Nov 10, 2021 · 9 revisions

ProSnippets: Migrating to 2.0 Visual Basic

Language:      Visual Basic
Subject:       Framework
Contributor:   ArcGIS Pro SDK Team <arcgisprosdk@esri.com>
Organization:  Esri, http://www.esri.com
Date:          9/28/2021  
ArcGIS Pro:    2.9 
Visual Studio: 2017, 2019

Find the C# migration document here: ProSnippets: Migrating to 2.0

The upgrade from ArcGIS Pro SDK 1.4 to ArcGIS Pro SDK 2.0 is a 'code breaking' change. This means that you have to change, recompile, rebuild, and redistribute any 1.x (SDK 1.4 and earlier) add-ins and configurations so that they work with ArcGIS Pro 2.0. This document lists the most common changes in the config.DAML and various API classes and interfaces.


In this topic

Upgrading the Config.daml to Pro SDK 2.0

All add-ins and configurations require that the "desktopVersion" attribute under the AddInInfo tag in the config.daml file is updated to the 2.0.0 version as shown below:
1.4 and earlier has a 1.x.x desktopVersion attribute under the AddInInfo tag:

<ArcGIS defaultAssembly="....dll" defaultNamespace="..." xmlns="...">
  <AddInInfo id="{...}" version="1.0" desktopVersion="1.4.7198">
    <Name>...</Name>
    <Description>...</Description>
    <Image>...</Image>
	...

2.0 requires a 2.0.0 (or higher) desktopVersion attribute under the AddInInfo tag:

<ArcGIS defaultAssembly="....dll" defaultNamespace="..." xmlns="...">
  <AddInInfo id="{...}" version="1.0" desktopVersion="2.0.0">
    <Name>...</Name>
    <Description>...</Description>
    <Image>...</Image>
	...

ArcGIS.Core.dll

ArcGIS.Core.Data

  • ArcGIS.Core.Data.FileSystemConnectionPath
  • ArcGIS.Core.Data.FileSystemDatastore
' before:

Using shapefile As New Shapefile(New ShapefileConnectionPath(New Uri("path\to\folder\containing\shapefiles")))
	Dim taxLotsFeatureClass As FeatureClass = TryCast(shapefile.OpenTable("TaxLots"), FeatureClass)
	Dim manHolesFeatureClass As FeatureClass = TryCast(shapefile.OpenTable("ManHoles.shp"), FeatureClass)
	' Can use the .shp extension, but its not needed.
	Dim taxDetailsTableWithoutExtension As Table = shapefile.OpenTable("TaxDetails")
	Dim taxDetailsTable As Table = shapefile.OpenTable("TaxDetails.dbf")
End Using

' now:
Using shapefile As New FileSystemDatastore(New FileSystemConnectionPath(New Uri("path\to\folder\containing\shapefiles"), FileSystemDatastoreType.Shapefile))
    Dim taxLotsFeatureClass As FeatureClass = shapefile.OpenDataset(Of FeatureClass)("TaxLots")
    Dim manHolesFeatureClass As FeatureClass = shapefile.OpenDataset(Of FeatureClass)("ManHoles.shp")
    ' Can use the .shp extension, but its not needed.
    Dim taxDetailsTableWithoutExtension As Table = shapefile.OpenDataset(Of Table)("TaxDetails")
    Dim taxDetailsTable As Table = shapefile.OpenDataset(Of Table)("TaxDetails.dbf")
End Using
  • ArcGIS.Core.Data.DatabaseConnectionFile
Dim connection As String = "C:\Work\temp.sde"

' before:

Dim sde As New Geodatabase(connection)

' now:

Dim dbGdbConnection = New DatabaseConnectionFile(New Uri(connection, UriKind.Absolute))
Dim sde As New Geodatabase(dbGdbConnection)
  • ArcGIS.Core.Data.Geodatabase.GetEnterpriseDatabaseType
' before:

Dim enterpriseDatabaseType As EnterpriseDatabaseType = geodatabase.GetEnterpriseDatabaseType()

' now:
Dim enterpriseDatabaseType = TryCast(geodatabase.GetConnector(), DatabaseConnectionProperties).DBMS

ArcGIS.Core.Geometry

  • ArcGIS.Core.Geometry.CubicBezierBuilder Constructor
Dim controlPt12D As ArcGIS.Core.Geometry.Coordinate2D
Dim controlPt22D As ArcGIS.Core.Geometry.Coordinate2D
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim startPt As ArcGIS.Core.Geometry.Coordinate
Dim endPt As ArcGIS.Core.Geometry.Coordinate
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim cubicbezierbuilder = New CubicBezierBuilder(startPt, controlPt12D, controlPt22D, endPt, spatialReference)
Dim cubicbezierbuilder = New CubicBezierBuilder(coordinates, spatialReference)

' now:
Dim startPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim endPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate2D)

Dim cubicbezierbuilder = New CubicBezierBuilder(startPt2D, controlPt12D, controlPt22D, endPt2D, spatialReference)
Dim cubicbezierbuilder = New CubicBezierBuilder(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.CubicBezierBuilder.CreateCubicBezierSegment
Dim controlPt12D As ArcGIS.Core.Geometry.Coordinate2D
Dim controlPt22D As ArcGIS.Core.Geometry.Coordinate2D
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim startPt As ArcGIS.Core.Geometry.Coordinate
Dim endPt As ArcGIS.Core.Geometry.Coordinate
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim cubicbezierbuilder As ArcGIS.Core.Geometry.CubicBezierBuilder
Dim result As ArcGIS.Core.Geometry.CubicBezierSegment = cubicbezierbuilder.CreateCubicBezierSegment(startPt, controlPt12D, controlPt22D, endPt, spatialReference)
Dim result As ArcGIS.Core.Geometry.CubicBezierSegment = cubicbezierbuilder.CreateCubicBezierSegment(coordinates, spatialReference)

' now:
Dim startPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim endPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate2D)

Dim cubicbezierbuilder As ArcGIS.Core.Geometry.CubicBezierBuilder
Dim result As ArcGIS.Core.Geometry.CubicBezierSegment = CubicBezierBuilder.CreateCubicBezierSegment(startPt2D, controlPt12D, controlPt22D, endPt2D, spatialReference)
Dim result As ArcGIS.Core.Geometry.CubicBezierSegment = cubicbezierbuilder.CreateCubicBezierSegment(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.EllipticArcBuilder Constructor
Dim centerPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim rotationAngle As Double
Dim semiMajorAxis As Double
Dim minorMajorRatio As Double
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference
Dim radius As Double
Dim interiorPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim orientation As ArcGIS.Core.Geometry.esriArcOrientation
Dim centralAngle As Double
Dim chordLength As Double
Dim chordBearing As Double
Dim minorOrMajor As ArcGIS.Core.Geometry.MinorOrMajor

' before:
Dim orientation As ArcGIS.Core.Geometry.esriArcOrientation = 1
Dim fromPt As ArcGIS.Core.Geometry.MapPoint
Dim toPt As ArcGIS.Core.Geometry.MapPoint
Dim fromAngle As Double

Dim ellipticarcbuilder = New EllipticArcBuilder(centerPt2D, rotationAngle, semiMajorAxis, minorMajorRatio, 1, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(centerPt2D, radius, 1, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(fromPt, toPt, interiorPt2D)
Dim ellipticarcbuilder = New EllipticArcBuilder(fromPt, toPt, centerPt2D, orientation, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(fromAngle, centralAngle, centerPt2D, radius, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(fromPt, chordLength, chordBearing, radius, orientation, minorOrMajor,
spatialReference)

' now:
Dim segment1 As ArcGIS.Core.Geometry.Segment
Dim segment2 As ArcGIS.Core.Geometry.Segment
Dim hintPoint2D As ArcGIS.Core.Geometry.Coordinate2D
Dim startPt As ArcGIS.Core.Geometry.MapPoint
Dim arcLength As Double
Dim endPt As ArcGIS.Core.Geometry.MapPoint
Dim startAngle As Double

Dim ellipticarcbuilder = New EllipticArcBuilder(centerPt2D, rotationAngle, semiMajorAxis, minorMajorRatio, orientation, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(segment1, segment2, radius, hintPoint2D, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(startPt, chordLength, chordBearing, arcLength, orientation, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(centerPt2D, radius, orientation, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(startPt, endPt, interiorPt2D)
Dim ellipticarcbuilder = New EllipticArcBuilder(startPt, endPt, centerPt2D, orientation, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(startAngle, centralAngle, centerPt2D, radius, spatialReference)
Dim ellipticarcbuilder = New EllipticArcBuilder(startPt, chordLength, chordBearing, radius, orientation, minorOrMajor,
spatialReference)
  • ArcGIS.Core.Geometry.EllipticArcBuilder.CreateEllipticArcSegment
Dim centralAngle As Double
Dim centerPt2D As ArcGIS.Core.Geometry.Coordinate2D
Dim radius As Double
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference
Dim chordLength As Double
Dim chordBearing As Double
Dim orientation As ArcGIS.Core.Geometry.esriArcOrientation
Dim minorOrMajor As ArcGIS.Core.Geometry.MinorOrMajor
Dim rotationAngle As Double
Dim semiMajorAxis As Double
Dim minorMajorRatio As Double
Dim interiorPt2D As ArcGIS.Core.Geometry.Coordinate2D

' before:
Dim fromAngle As Double
Dim fromPt As ArcGIS.Core.Geometry.MapPoint
Dim orientation As ArcGIS.Core.Geometry.esriArcOrientation = 1
Dim toPt As ArcGIS.Core.Geometry.MapPoint

Dim ellipticarcbuilder As ArcGIS.Core.Geometry.EllipticArcBuilder
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(fromAngle, centralAngle, centerPt2D, radius, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(fromPt, chordLength, chordBearing, radius, orientation, minorOrMajor,
spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(centerPt2D, radius, 1, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(centerPt2D, rotationAngle, semiMajorAxis, minorMajorRatio, 1, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(fromPt, toPt, centerPt2D, orientation, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(fromPt, toPt, interiorPt2D, spatialReference)

' now:
Dim startAngle As Double
Dim startPt As ArcGIS.Core.Geometry.MapPoint
Dim segment1 As ArcGIS.Core.Geometry.Segment
Dim segment2 As ArcGIS.Core.Geometry.Segment
Dim hintPoint2D As ArcGIS.Core.Geometry.Coordinate2D
Dim arcLength As Double
Dim endPt As ArcGIS.Core.Geometry.MapPoint

Dim ellipticarcbuilder As ArcGIS.Core.Geometry.EllipticArcBuilder
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(startAngle, centralAngle, centerPt2D, radius, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(startPt, chordLength, chordBearing, radius, orientation, minorOrMajor,
spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(centerPt2D, radius, orientation, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(segment1, segment2, radius, hintPoint2D, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(startPt, chordLength, chordBearing, arcLength, orientation, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(centerPt2D, rotationAngle, semiMajorAxis, minorMajorRatio, orientation, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(startPt, endPt, centerPt2D, orientation, spatialReference)
Dim result As ArcGIS.Core.Geometry.EllipticArcSegment = EllipticArcBuilder.CreateEllipticArcSegment(startPt, endPt, interiorPt2D, spatialReference)
  • ArcGIS.Core.Geometry.EnvelopeBuilder.CreateEnvelope
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim minCoord As ArcGIS.Core.Geometry.Coordinate
Dim maxCoord As ArcGIS.Core.Geometry.Coordinate

Dim envelopebuilder As ArcGIS.Core.Geometry.EnvelopeBuilder
Dim result As ArcGIS.Core.Geometry.Envelope = envelopebuilder.CreateEnvelope(minCoord, maxCoord, spatialReference)

' now:
Dim minCoord3D As ArcGIS.Core.Geometry.Coordinate3D
Dim maxCoord3D As ArcGIS.Core.Geometry.Coordinate3D
Dim envelope As ArcGIS.Core.Geometry.Envelope

Dim envelopebuilder As ArcGIS.Core.Geometry.EnvelopeBuilder
Dim result As ArcGIS.Core.Geometry.Envelope = EnvelopeBuilder.CreateEnvelope(minCoord3D, maxCoord3D, spatialReference)
Dim result As ArcGIS.Core.Geometry.Envelope = EnvelopeBuilder.CreateEnvelope(spatialReference)
Dim result As ArcGIS.Core.Geometry.Envelope = EnvelopeBuilder.CreateEnvelope(envelope, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.Area
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.Area(geometry)

' now:

Dim result As Double = GeometryEngine.Instance.Area(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.AutoComplete
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim inputPolygon As ArcGIS.Core.Geometry.Polygon
Dim completionLine As ArcGIS.Core.Geometry.Polyline

' before:

Dim result As ArcGIS.Core.Geometry.Polygon = geometryengine.AutoComplete(inputPolygon, completionLine)

' now:

Dim result As ArcGIS.Core.Geometry.Polygon = GeometryEngine.Instance.AutoComplete(inputPolygon, completionLine)
  • ArcGIS.Core.Geometry.GeometryEngine.Boundary
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Boundary(geometry)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Boundary(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Buffer
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometries As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Geometry)
Dim distance As Double
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Buffer(geometries, distance)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Buffer(geometry, distance)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Buffer(geometries, distance)
Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Buffer(geometry, distance)
  • ArcGIS.Core.Geometry.GeometryEngine.CalculateNonSimpleMs
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim defaultMValue As Double

' before:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.CalculateNonSimpleMs(multipart, defaultMValue)

' now:

Dim result As ArcGIS.Core.Geometry.Multipart = GeometryEngine.Instance.CalculateNonSimpleMs(multipart, defaultMValue)
  • ArcGIS.Core.Geometry.GeometryEngine.CalculateNonSimpleZs
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim defaultZValue As Double

' before:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.CalculateNonSimpleZs(multipart, defaultZValue)

' now:

Dim result As ArcGIS.Core.Geometry.Multipart = GeometryEngine.Instance.CalculateNonSimpleZs(multipart, defaultZValue)
  • ArcGIS.Core.Geometry.GeometryEngine.CenterAt
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim envelope As ArcGIS.Core.Geometry.Envelope
Dim x As Double
Dim y As Double

' before:

Dim result As ArcGIS.Core.Geometry.Envelope = geometryengine.CenterAt(envelope, x, y)

' now:

Dim result As ArcGIS.Core.Geometry.Envelope = GeometryEngine.Instance.CenterAt(envelope, x, y)
  • ArcGIS.Core.Geometry.GeometryEngine.Centroid
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryengine.Centroid(geometry)

' now:

Dim result As ArcGIS.Core.Geometry.MapPoint = GeometryEngine.Instance.Centroid(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Clip
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim envelope As ArcGIS.Core.Geometry.Envelope

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Clip(geometry, envelope)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Clip(geometry, envelope)
  • ArcGIS.Core.Geometry.GeometryEngine.Contains
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Contains(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Contains(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.ConvexHull
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ConvexHull(geometry)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.ConvexHull(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Crosses
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Crosses(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Crosses(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Cut
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim cutter As ArcGIS.Core.Geometry.Polyline

' before:
Dim geometry As ArcGIS.Core.Geometry.Geometry

Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Geometry) = geometryengine.Cut(geometry, cutter)

' now:
Dim multipart As ArcGIS.Core.Geometry.Multipart

Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Geometry) = GeometryEngine.Instance.Cut(multipart, cutter)
  • ArcGIS.Core.Geometry.GeometryEngine.DensifyByDeviation
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim maxDeviationMeters As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.DensifyByDeviation(geometry, maxDeviationMeters)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.DensifyByDeviation(geometry, maxDeviationMeters)
  • ArcGIS.Core.Geometry.GeometryEngine.DensifyByLength
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim maxSegmentLength As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.DensifyByLength(geometry, maxSegmentLength)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.DensifyByLength(geometry, maxSegmentLength)
  • ArcGIS.Core.Geometry.GeometryEngine.Difference
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Difference(geometry1, geometry2)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Difference(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Disjoint
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Disjoint(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Disjoint(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Disjoint3D
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Disjoint3D(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Disjoint3D(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Distance
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.Distance(geometry1, geometry2)

' now:

Dim result As Double = GeometryEngine.Instance.Distance(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Distance3D
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.Distance3D(geometry1, geometry2)

' now:

Dim result As Double = GeometryEngine.Instance.Distance3D(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Equals
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Equals(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Equals(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Expand
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim envelope As ArcGIS.Core.Geometry.Envelope
Dim dx As Double
Dim dy As Double
Dim dz As Double
Dim asRatio As Boolean

' before:

Dim result As ArcGIS.Core.Geometry.Envelope = geometryengine.Expand(envelope, dx, dy, dz, asRatio)
Dim result As ArcGIS.Core.Geometry.Envelope = geometryengine.Expand(envelope, dx, dy, asRatio)

' now:

Dim result As ArcGIS.Core.Geometry.Envelope = GeometryEngine.Instance.Expand(envelope, dx, dy, dz, asRatio)
Dim result As ArcGIS.Core.Geometry.Envelope = GeometryEngine.Instance.Expand(envelope, dx, dy, asRatio)
  • ArcGIS.Core.Geometry.GeometryEngine.ExportToEsriShape
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.EsriShapeExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim buffer As System.Byte()

' before:

Dim result As Integer = geometryengine.ExportToEsriShape(exportFlags, geometry, buffer)
Dim result As System.Byte() = geometryengine.ExportToEsriShape(exportFlags, geometry)

' now:

Dim result As Integer = GeometryEngine.Instance.ExportToEsriShape(exportFlags, geometry, buffer)
Dim result As System.Byte() = GeometryEngine.Instance.ExportToEsriShape(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.ExportToJSON
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.JSONExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As String = geometryengine.ExportToJSON(exportFlags, geometry)

' now:

Dim result As String = GeometryEngine.Instance.ExportToJSON(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.ExportToWKB
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.WKBExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim buffer As System.Byte()

' before:

Dim result As Integer = geometryengine.ExportToWKB(exportFlags, geometry, buffer)
Dim result As System.Byte() = geometryengine.ExportToWKB(exportFlags, geometry)

' now:

Dim result As Integer = GeometryEngine.Instance.ExportToWKB(exportFlags, geometry, buffer)
Dim result As System.Byte() = GeometryEngine.Instance.ExportToWKB(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.ExportToWKT
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.WKTExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As String = geometryengine.ExportToWKT(exportFlags, geometry)

' now:

Dim result As String = GeometryEngine.Instance.ExportToWKT(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Extend
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim polyline As ArcGIS.Core.Geometry.Polyline
Dim extender As ArcGIS.Core.Geometry.Polyline
Dim ExtendFlags As ArcGIS.Core.Geometry.ExtendFlags

' before:

Dim result As ArcGIS.Core.Geometry.Polyline = geometryengine.Extend(polyline, extender, ExtendFlags)

' now:

Dim result As ArcGIS.Core.Geometry.Polyline = GeometryEngine.Instance.Extend(polyline, extender, ExtendFlags)
  • ArcGIS.Core.Geometry.GeometryEngine.Generalize
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim maxDeviation As Double

' before:
Dim removeDegenerateParts As Boolean = [False]
Dim preserveCurves As Boolean = [False]

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Generalize(geometry, maxDeviation, [False], [False])

' now:
Dim removeDegenerateParts As Boolean
Dim preserveCurves As Boolean

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Generalize(geometry, maxDeviation, removeDegenerateParts, preserveCurves)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicArea
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.GeodesicArea(geometry)

' now:

Dim result As Double = GeometryEngine.Instance.GeodesicArea(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicBuffer
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometries As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Geometry)
Dim distance As Double
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodesicBuffer(geometries, distance)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodesicBuffer(geometry, distance)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodesicBuffer(geometries, distance)
Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodesicBuffer(geometry, distance)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicDistance
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.GeodesicDistance(geometry1, geometry2)

' now:

Dim result As Double = GeometryEngine.Instance.GeodesicDistance(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicEllipse
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim parameter As ArcGIS.Core.Geometry.GeodesicEllipseParameter
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodesicEllipse(parameter, spatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodesicEllipse(parameter, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicLength
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.GeodesicLength(geometry)

' now:

Dim result As Double = GeometryEngine.Instance.GeodesicLength(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodesicSector
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim parameter As ArcGIS.Core.Geometry.GeodesicSectorParameter
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodesicSector(parameter, spatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodesicSector(parameter, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodeticDensifyByDeviation
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim maxDeviation As Double
Dim deviationUnit As ArcGIS.Core.Geometry.LinearUnit

' before:
Dim curveType As ArcGIS.Core.Geometry.CurveType

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodeticDensifyByDeviation(geometry, maxDeviation, deviationUnit, curveType)

' now:
Dim curveType As ArcGIS.Core.Geometry.GeodeticCurveType

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodeticDensifyByDeviation(geometry, maxDeviation, deviationUnit, curveType)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodeticDensifyByLength
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim maxSegmentLength As Double
Dim lengthUnit As ArcGIS.Core.Geometry.LinearUnit

' before:
Dim curveType As ArcGIS.Core.Geometry.CurveType

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.GeodeticDensifyByLength(geometry, maxSegmentLength, lengthUnit, curveType)

' now:
Dim curveType As ArcGIS.Core.Geometry.GeodeticCurveType

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.GeodeticDensifyByLength(geometry, maxSegmentLength, lengthUnit, curveType)
  • ArcGIS.Core.Geometry.GeometryEngine.GeodeticMove
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim points As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.MapPoint)
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference
Dim distance As Double
Dim unit As ArcGIS.Core.Geometry.LinearUnit
Dim azimuth As Double

' before:
Dim curveType As ArcGIS.Core.Geometry.CurveType

Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.MapPoint) = geometryengine.GeodeticMove(points, spatialReference, distance, unit, azimuth, curveType)

' now:
Dim curveType As ArcGIS.Core.Geometry.GeodeticCurveType

Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.MapPoint) = GeometryEngine.Instance.GeodeticMove(points, spatialReference, distance, unit, azimuth, curveType)
  • ArcGIS.Core.Geometry.GeometryEngine.GetEsriShapeSize
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.EsriShapeExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Integer = geometryengine.GetEsriShapeSize(exportFlags, geometry)

' now:

Dim result As Integer = GeometryEngine.Instance.GetEsriShapeSize(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.GetPredefinedCoordinateSystemList
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim filter As ArcGIS.Core.Geometry.CoordinateSystemFilter

' before:

Dim result As System.Collections.Generic.IReadOnlyList(Of ArcGIS.Core.Geometry.CoordinateSystemListEntry) = geometryengine.GetPredefinedCoordinateSystemList(filter)

' now:

Dim result As System.Collections.Generic.IReadOnlyList(Of ArcGIS.Core.Geometry.CoordinateSystemListEntry) = GeometryEngine.Instance.GetPredefinedCoordinateSystemList(filter)
  • ArcGIS.Core.Geometry.GeometryEngine.GetSubCurve
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim fromDistance As Double
Dim toDistance As Double
Dim asRatioOrLength As ArcGIS.Core.Geometry.AsRatioOrLength

' before:

Dim result As ArcGIS.Core.Geometry.Polyline = geometryengine.GetSubCurve(multipart, fromDistance, toDistance, asRatioOrLength)

' now:

Dim result As ArcGIS.Core.Geometry.Polyline = GeometryEngine.Instance.GetSubCurve(multipart, fromDistance, toDistance, asRatioOrLength)
  • ArcGIS.Core.Geometry.GeometryEngine.GetSubCurve3D
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim fromDistance As Double
Dim toDistance As Double
Dim asRatioOrLength As ArcGIS.Core.Geometry.AsRatioOrLength

' before:

Dim result As ArcGIS.Core.Geometry.Polyline = geometryengine.GetSubCurve3D(multipart, fromDistance, toDistance, asRatioOrLength)

' now:

Dim result As ArcGIS.Core.Geometry.Polyline = GeometryEngine.Instance.GetSubCurve3D(multipart, fromDistance, toDistance, asRatioOrLength)
  • ArcGIS.Core.Geometry.GeometryEngine.GetWKBSize
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim exportFlags As ArcGIS.Core.Geometry.WKBExportFlags
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Integer = geometryengine.GetWKBSize(exportFlags, geometry)

' now:

Dim result As Integer = GeometryEngine.Instance.GetWKBSize(exportFlags, geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.ImportFromEsriShape
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim importFlags As ArcGIS.Core.Geometry.EsriShapeImportFlags
Dim buffer As System.Byte()
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ImportFromEsriShape(importFlags, buffer, spatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.ImportFromEsriShape(importFlags, buffer, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.ImportFromJSON
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim importFlags As ArcGIS.Core.Geometry.JSONImportFlags
Dim jsonString As String

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ImportFromJSON(importFlags, jsonString)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.ImportFromJSON(importFlags, jsonString)
  • ArcGIS.Core.Geometry.GeometryEngine.ImportFromWKB
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim importFlags As ArcGIS.Core.Geometry.WKBImportFlags
Dim buffer As System.Byte()
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ImportFromWKB(importFlags, buffer, spatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.ImportFromWKB(importFlags, buffer, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.ImportFromWKT
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim importFlags As ArcGIS.Core.Geometry.WKTImportFlags
Dim wktString As String
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ImportFromWKT(importFlags, wktString, spatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.ImportFromWKT(importFlags, wktString, spatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.Intersection
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry
Dim resultDimension As ArcGIS.Core.Geometry.GeometryDimension

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Intersection(geometry1, geometry2, resultDimension)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Intersection(geometry1, geometry2)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Intersection(geometry1, geometry2, resultDimension)
Dim result As ArcGIS.Core.Geometry.Geometry = GeometryEngine.Instance.Intersection(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Intersects
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Intersects(geometry1, geometry2)

' now:

Dim result As Boolean = GeometryEngine.Instance.Intersects(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.IsSimpleAsFeature
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:
Dim forceIsSimple As Boolean = [False]

Dim result As Boolean = geometryengine.IsSimpleAsFeature(geometry, [False])

' now:
Dim forceIsSimple As Boolean

Dim result As Boolean = GeometryEngine.Instance.IsSimpleAsFeature(geometry, forceIsSimple)
  • ArcGIS.Core.Geometry.GeometryEngine.LabelPoint
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryengine.LabelPoint(geometry)

' now:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryEngine.Instance.LabelPoint(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Length
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.Length(geometry)

' now:

Dim result As Double = geometryEngine.Instance.Length(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Length3D
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.Length3D(geometry)

' now:

Dim result As Double = geometryEngine.Instance.Length3D(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Move
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim dx As Double
Dim dy As Double
Dim dz As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Move(geometry, dx, dy)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Move(geometry, dx, dy, dz)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Move(geometry, dx, dy)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Move(geometry, dx, dy, dz)
  • ArcGIS.Core.Geometry.GeometryEngine.MovePointAlongLine
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim distanceAlong As Double
Dim asRatio As Boolean
Dim offset As Double
Dim extension As ArcGIS.Core.Geometry.SegmentExtension

' before:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryengine.MovePointAlongLine(multipart, distanceAlong, asRatio, offset, extension)

' now:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryEngine.Instance.MovePointAlongLine(multipart, distanceAlong, asRatio, offset, extension)
  • ArcGIS.Core.Geometry.GeometryEngine.NearestPoint
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim point As ArcGIS.Core.Geometry.MapPoint

' before:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryengine.NearestPoint(geometry, point)

' now:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryEngine.Instance.NearestPoint(geometry, point)
  • ArcGIS.Core.Geometry.GeometryEngine.NearestPoint3D
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim point As ArcGIS.Core.Geometry.MapPoint

' before:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryengine.NearestPoint3D(geometry, point)

' now:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryEngine.Instance.NearestPoint3D(geometry, point)
  • ArcGIS.Core.Geometry.GeometryEngine.NearestVertex
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim point As ArcGIS.Core.Geometry.MapPoint

' before:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryengine.NearestVertex(geometry, point)

' now:

Dim result As ArcGIS.Core.Geometry.ProximityResult = geometryEngine.Instance.NearestVertex(geometry, point)
  • ArcGIS.Core.Geometry.GeometryEngine.NormalizeCentralMeridian
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.NormalizeCentralMeridian(geometry)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.NormalizeCentralMeridian(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.Offset
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim distance As Double
Dim offsetType As ArcGIS.Core.Geometry.OffsetType
Dim bevelRatio As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Offset(geometry, distance, offsetType, bevelRatio)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Offset(geometry, distance, offsetType, bevelRatio)
  • ArcGIS.Core.Geometry.GeometryEngine.Overlaps
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Overlaps(geometry1, geometry2)

' now:

Dim result As Boolean = geometryEngine.Instance.Overlaps(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Project
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim outputSpatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Project(geometry, outputSpatialReference)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Project(geometry, outputSpatialReference)
  • ArcGIS.Core.Geometry.GeometryEngine.ProjectEx
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim projTransformation As ArcGIS.Core.Geometry.ProjectionTransformation

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.ProjectEx(geometry, projTransformation)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.ProjectEx(geometry, projTransformation)
  • ArcGIS.Core.Geometry.GeometryEngine.QueryPointAndDistance
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim extension As ArcGIS.Core.Geometry.SegmentExtension
Dim inPoint As ArcGIS.Core.Geometry.MapPoint
Dim asRatioOrLength As ArcGIS.Core.Geometry.AsRatioOrLength
Dim distanceAlongCurve As System.Double
Dim distanceFromCurve As System.Double
Dim whichSide As ArcGIS.Core.Geometry.LeftOrRightSide

' before:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryengine.QueryPointAndDistance(multipart, extension, inPoint, asRatioOrLength, distanceAlongCurve, distanceFromCurve,
whichSide)

' now:

Dim result As ArcGIS.Core.Geometry.MapPoint = geometryEngine.Instance.QueryPointAndDistance(multipart, extension, inPoint, asRatioOrLength, distanceAlongCurve, distanceFromCurve,
whichSide)
  • ArcGIS.Core.Geometry.GeometryEngine.Relate
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry
Dim relateString As String

' before:

Dim result As Boolean = geometryengine.Relate(geometry1, geometry2, relateString)

' now:

Dim result As Boolean = geometryEngine.Instance.Relate(geometry1, geometry2, relateString)
  • ArcGIS.Core.Geometry.GeometryEngine.ReplaceNaNZs
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim zValue As Double

' before:
Dim multipart As ArcGIS.Core.Geometry.Multipart

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.ReplaceNaNZs(multipart, zValue)

' now:
Dim geometry As ArcGIS.Core.Geometry.Geometry

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.ReplaceNaNZs(geometry, zValue)
  • ArcGIS.Core.Geometry.GeometryEngine.Reshape
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim reshaper As ArcGIS.Core.Geometry.Polyline

' before:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.Reshape(multipart, reshaper)

' now:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryEngine.Instance.Reshape(multipart, reshaper)
  • ArcGIS.Core.Geometry.GeometryEngine.ReverseOrientation
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart

' before:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.ReverseOrientation(multipart)

' now:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryEngine.Instance.ReverseOrientation(multipart)
  • ArcGIS.Core.Geometry.GeometryEngine.Rotate
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim origin As ArcGIS.Core.Geometry.MapPoint
Dim rotationAngle As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Rotate(geometry, origin, rotationAngle)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Rotate(geometry, origin, rotationAngle)
  • ArcGIS.Core.Geometry.GeometryEngine.Scale
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry
Dim origin As ArcGIS.Core.Geometry.MapPoint
Dim sx As Double
Dim sy As Double
Dim sz As Double

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Scale(geometry, origin, sx, sy, sz)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Scale(geometry, origin, sx, sy)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Scale(geometry, origin, sx, sy, sz)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Scale(geometry, origin, sx, sy)
  • ArcGIS.Core.Geometry.GeometryEngine.SetConstantZ
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim multipart As ArcGIS.Core.Geometry.Multipart
Dim zValue As Double

' before:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryengine.SetConstantZ(multipart, zValue)

' now:

Dim result As ArcGIS.Core.Geometry.Multipart = geometryEngine.Instance.SetConstantZ(multipart, zValue)
  • ArcGIS.Core.Geometry.GeometryEngine.ShapePreservingArea
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.ShapePreservingArea(geometry)

' now:

Dim result As Double = geometryEngine.Instance.ShapePreservingArea(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.ShapePreservingLength
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Double = geometryengine.ShapePreservingLength(geometry)

' now:

Dim result As Double = geometryEngine.Instance.ShapePreservingLength(geometry)
  • ArcGIS.Core.Geometry.GeometryEngine.SimplifyAsFeature
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry As ArcGIS.Core.Geometry.Geometry

' before:
Dim forceSimplify As Boolean = [False]

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.SimplifyAsFeature(geometry, [False])

' now:
Dim forceSimplify As Boolean

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.SimplifyAsFeature(geometry, forceSimplify)
  • ArcGIS.Core.Geometry.GeometryEngine.SimplifyPolyline
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim polyline As ArcGIS.Core.Geometry.Polyline
Dim simplifyType As ArcGIS.Core.Geometry.SimplifyType

' before:
Dim forceSimplify As Boolean = [False]

Dim result As ArcGIS.Core.Geometry.Polyline = geometryengine.SimplifyPolyline(polyline, simplifyType, [False])

' now:
Dim forceSimplify As Boolean

Dim result As ArcGIS.Core.Geometry.Polyline = geometryEngine.Instance.SimplifyPolyline(polyline, simplifyType, forceSimplify)
  • ArcGIS.Core.Geometry.GeometryEngine.SymmetricDifference
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.SymmetricDifference(geometry1, geometry2)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.SymmetricDifference(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Touches
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Touches(geometry1, geometry2)

' now:

Dim result As Boolean = geometryEngine.Instance.Touches(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Union
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometries As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Geometry)
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Union(geometries)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryengine.Union(geometry1, geometry2)

' now:

Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Union(geometries)
Dim result As ArcGIS.Core.Geometry.Geometry = geometryEngine.Instance.Union(geometry1, geometry2)
  • ArcGIS.Core.Geometry.GeometryEngine.Within
Imports geometryengine = ArcGIS.Core.Geometry.GeometryEngine
Dim geometry1 As ArcGIS.Core.Geometry.Geometry
Dim geometry2 As ArcGIS.Core.Geometry.Geometry

' before:

Dim result As Boolean = geometryengine.Within(geometry1, geometry2)

' now:

Dim result As Boolean = geometryEngine.Instance.Within(geometry1, geometry2)
  • ArcGIS.Core.Geometry.LineBuilder Constructor
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim startCoord As ArcGIS.Core.Geometry.Coordinate
Dim endCoord As ArcGIS.Core.Geometry.Coordinate

Dim linebuilder = New LineBuilder(startCoord, endCoord, spatialReference)

' now:
Dim startCoord2D As ArcGIS.Core.Geometry.Coordinate2D
Dim endCoord2D As ArcGIS.Core.Geometry.Coordinate2D
Dim startCoord3D As ArcGIS.Core.Geometry.Coordinate3D
Dim endCoord3D As ArcGIS.Core.Geometry.Coordinate3D

Dim linebuilder = New LineBuilder(startCoord2D, endCoord2D, spatialReference)
Dim linebuilder = New LineBuilder(startCoord3D, endCoord3D, spatialReference)
  • ArcGIS.Core.Geometry.LineBuilder.CreateLineSegment
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim startCoord As ArcGIS.Core.Geometry.Coordinate
Dim endCoord As ArcGIS.Core.Geometry.Coordinate

Dim linebuilder As ArcGIS.Core.Geometry.LineBuilder
Dim result As ArcGIS.Core.Geometry.LineSegment = linebuilder.CreateLineSegment(startCoord, endCoord, spatialReference)

' now:
Dim startCoord2D As ArcGIS.Core.Geometry.Coordinate2D
Dim endCoord2D As ArcGIS.Core.Geometry.Coordinate2D
Dim startCoord3D As ArcGIS.Core.Geometry.Coordinate3D
Dim endCoord3D As ArcGIS.Core.Geometry.Coordinate3D

Dim linebuilder As ArcGIS.Core.Geometry.LineBuilder
Dim result As ArcGIS.Core.Geometry.LineSegment = LineBuilder.CreateLineSegment(startCoord2D, endCoord2D, spatialReference)
Dim result As ArcGIS.Core.Geometry.LineSegment = LineBuilder.CreateLineSegment(startCoord3D, endCoord3D, spatialReference)
  • ArcGIS.Core.Geometry.MapPointBuilder Constructor
Dim x As Double
Dim y As Double
Dim z As Double
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference
Dim m As Double

' before:
Dim hasZ As Boolean = [False]
Dim coordinate As ArcGIS.Core.Geometry.Coordinate
Dim hasM As Boolean = [False]

Dim mappointbuilder = New MapPointBuilder(x, y, z, spatialReference, [False])
Dim mappointbuilder = New MapPointBuilder(coordinate, spatialReference)
Dim mappointbuilder = New MapPointBuilder()
Dim mappointbuilder = New MapPointBuilder(x, y, z, m, spatialReference, [False],
[False])

' now:
Dim coordinate3D As ArcGIS.Core.Geometry.Coordinate3D
Dim id As Integer

Dim mappointbuilder = New MapPointBuilder(x, y, z, m, spatialReference)
Dim mappointbuilder = New MapPointBuilder(coordinate3D, spatialReference)
Dim mappointbuilder = New MapPointBuilder(x, y, z, spatialReference)
Dim mappointbuilder = New MapPointBuilder(x, y, z, m, id, spatialReference)
  • ArcGIS.Core.Geometry.MapPointBuilder.CreateMapPoint
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coord2D As ArcGIS.Core.Geometry.Coordinate2D
Dim coordinate As ArcGIS.Core.Geometry.Coordinate

Dim mappointbuilder As ArcGIS.Core.Geometry.MapPointBuilder
Dim result As ArcGIS.Core.Geometry.MapPoint = MapPointBuilder.CreateMapPoint(coord2D, spatialReference)
Dim result As ArcGIS.Core.Geometry.MapPoint = mappointbuilder.CreateMapPoint(coordinate, spatialReference)

' now:
Dim coordinate2D As ArcGIS.Core.Geometry.Coordinate2D
Dim coordinate3D As ArcGIS.Core.Geometry.Coordinate3D

Dim mappointbuilder As ArcGIS.Core.Geometry.MapPointBuilder
Dim result As ArcGIS.Core.Geometry.MapPoint = MapPointBuilder.CreateMapPoint(coordinate2D, spatialReference)
Dim result As ArcGIS.Core.Geometry.MapPoint = MapPointBuilder.CreateMapPoint(coordinate3D, spatialReference)
  • ArcGIS.Core.Geometry.MultipartBuilder.AddPart
' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipartbuilder As ArcGIS.Core.Geometry.MultipartBuilder(Of T)
multipartbuilder.AddPart(coordinates)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipartbuilder As ArcGIS.Core.Geometry.MultipartBuilder(Of T)
multipartbuilder.AddPart(coordinates)
  • ArcGIS.Core.Geometry.MultipartBuilder.InsertPart
Dim beforePartIndex As Integer

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipartbuilder As ArcGIS.Core.Geometry.MultipartBuilder(Of T)
multipartbuilder.InsertPart(beforePartIndex, coordinates)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipartbuilder As ArcGIS.Core.Geometry.MultipartBuilder(Of T)
multipartbuilder.InsertPart(beforePartIndex, coordinates)
  • ArcGIS.Core.Geometry.MultipointBuilder Constructor
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipointbuilder = New MultipointBuilder(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipointbuilder = New MultipointBuilder(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.MultipointBuilder.Add
' before:
Dim point As ArcGIS.Core.Geometry.Coordinate
Dim points As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
multipointbuilder.Add(point)
multipointbuilder.Add(points)

' now:
Dim point3D As ArcGIS.Core.Geometry.Coordinate3D
Dim points As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
multipointbuilder.Add(point3D)
multipointbuilder.Add(points)
  • ArcGIS.Core.Geometry.MultipointBuilder.CreateMultipoint
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
Dim result As ArcGIS.Core.Geometry.Multipoint = multipointbuilder.CreateMultipoint(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
Dim result As ArcGIS.Core.Geometry.Multipoint = multipointbuilder.CreateMultipoint(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.MultipointBuilder.Insert
Dim beforePointIndex As Integer

' before:
Dim coordinate As ArcGIS.Core.Geometry.Coordinate
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
multipointbuilder.Insert(beforePointIndex, coordinate)
multipointbuilder.Insert(beforePointIndex, coordinates)

' now:
Dim coordinate3D As ArcGIS.Core.Geometry.Coordinate3D
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim multipointbuilder As ArcGIS.Core.Geometry.MultipointBuilder
multipointbuilder.Insert(beforePointIndex, coordinate3D)
multipointbuilder.Insert(beforePointIndex, coordinates)
  • ArcGIS.Core.Geometry.PolygonBuilder Constructor
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim polygonbuilder = New PolygonBuilder(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim polygonbuilder = New PolygonBuilder(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.PolygonBuilder.CreatePolygon
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim polygonbuilder As ArcGIS.Core.Geometry.PolygonBuilder
Dim result As ArcGIS.Core.Geometry.Polygon = polygonbuilder.CreatePolygon(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim polygonbuilder As ArcGIS.Core.Geometry.PolygonBuilder
Dim result As ArcGIS.Core.Geometry.Polygon = polygonbuilder.CreatePolygon(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.PolylineBuilder Constructor
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim polylinebuilder = New PolylineBuilder(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim polylinebuilder = New PolylineBuilder(coordinates, spatialReference)
  • ArcGIS.Core.Geometry.PolylineBuilder.CreatePolyline
Dim spatialReference As ArcGIS.Core.Geometry.SpatialReference

' before:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate)

Dim polylinebuilder As ArcGIS.Core.Geometry.PolylineBuilder
Dim result As ArcGIS.Core.Geometry.Polyline = polylinebuilder.CreatePolyline(coordinates, spatialReference)

' now:
Dim coordinates As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.Geometry.Coordinate3D)

Dim polylinebuilder As ArcGIS.Core.Geometry.PolylineBuilder
Dim result As ArcGIS.Core.Geometry.Polyline = polylinebuilder.CreatePolyline(coordinates, spatialReference)

ArcGIS.Desktop.Core.dll

ArcGIS.Desktop.Core

  • ArcGIS.Desktop.Core.IProjectWindow.SelectedItems
' before:

Dim iprojectwindow As ArcGIS.Desktop.Core.IProjectWindow
Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Desktop.Core.ProjectItem) = iprojectwindow.SelectedItems

' now:

Dim iprojectwindow As ArcGIS.Desktop.Core.IProjectWindow
Dim result As System.Collections.Generic.IEnumerable(Of ArcGIS.Desktop.Core.Item) = iprojectwindow.SelectedItems
  • ArcGIS.Desktop.Core.Item.IsContainer
' before:

Dim item As ArcGIS.Desktop.Core.Item
Dim result As Boolean = item.IsContainer

' now:

Dim item As ArcGIS.Desktop.Core.Item
Dim result As Boolean = item.IsContainer
  • ArcGIS.Desktop.Core.ItemFactory.Create
Imports itemfactory = ArcGIS.Desktop.Core.ItemFactory
Dim uri As String
Dim itemType As ArcGIS.Desktop.Core.ItemType = 0

' before:

Dim result As ArcGIS.Desktop.Core.Item = itemfactory.Create(uri, 0)

' now:

Dim result As ArcGIS.Desktop.Core.Item = ItemFactory.Instance.Create(uri, 0)
  • ArcGIS.Desktop.Core.Project.Current.AddItem
Dim addFolderPath as String;

// before:

Dim theFolderToAdd = ItemFactory.Create(addFolderPath)
Await Project.Current.AddAsync(theFolderToAdd)

// now:

Dim theFolderToAdd = ItemFactory.Instance.Create(addFolderPath)
Await QueuedTask.Run(Function() Project.Current.AddItem(TryCast(theFolderToAdd, IProjectItem)))
  • ArcGIS.Desktop.Core.Project.Current.RemoveItem
// before:

Dim folderToRemove As FolderConnectionProjectItem = Project.Current.GetItems(Of FolderConnectionProjectItem)().FirstOrDefault(Function(myfolder) myfolder.Name.Equals("PlantSpecies"))
If folderToRemove IsNot Nothing Then
	Await Project.Current.RemoveAsync(folderToRemove)
End If

// now:

Dim folderToRemove As FolderConnectionProjectItem = Project.Current.GetItems(Of FolderConnectionProjectItem)().FirstOrDefault(Function(myfolder) myfolder.Name.Equals("PlantSpecies"))
If folderToRemove IsNot Nothing Then
    Project.Current.RemoveItem(TryCast(folderToRemove, IProjectItem))
End If
  • ArcGIS.Desktop.Core.Project.GetItems
' before:

Dim project As ArcGIS.Desktop.Core.Project
Dim result As System.Collections.Generic.IEnumerable(Of Item) = project.GetItems(Of Item)()
Dim result As System.Collections.Generic.IEnumerable(Of Item) = Await gdb.GetItemsAsync()
 
' now:

Dim project As ArcGIS.Desktop.Core.Project
Dim result As System.Collections.Generic.IEnumerable(Of Item) = project.GetItems(Of Item)()
  • ArcGIS.Desktop.Core.Project.Items
' before:

Dim project As ArcGIS.Desktop.Core.Project
Dim result As System.Collections.ObjectModel.ReadOnlyObservableCollection(Of ArcGIS.Desktop.Core.ProjectItem) = project.Items

' now:

Dim project As ArcGIS.Desktop.Core.Project
Dim result As System.Collections.ObjectModel.ReadOnlyObservableCollection(Of ArcGIS.Desktop.Core.Item) = project.Items
  • ArcGIS.Desktop.Core.Project.SearchAsync
Dim _mxd As New List(Of Item)()
'Gets all the folder connections in the current project
 
// before:

Dim allFoldersItem = Project.Current.GetItems(Of FolderConnectionProjectItem)()
If allFoldersItem IsNot Nothing Then
	'iterate through all the FolderConnectionProjectItems found
   For Each folderItem As var In allFoldersItem
		_mxd.AddRange(Await folderItem.SearchAsync(".mxd"))
	Next
End If
 
// now:

Dim _mxd As New List(Of Item)()
_mxd.AddRange(Await Project.Current.SearchAsync(".mxd"))

ArcGIS.Desktop.Core.Events

  • ArcGIS.Desktop.Core.Events.ProjectItemsChangedEventArgs.ProjectItem
' before:

Dim projectitemschangedeventargs As ArcGIS.Desktop.Core.Events.ProjectItemsChangedEventArgs
Dim result As ArcGIS.Desktop.Core.ProjectItem = projectitemschangedeventargs.ProjectItem

' now:

Dim projectitemschangedeventargs As ArcGIS.Desktop.Core.Events.ProjectItemsChangedEventArgs
Dim result As ArcGIS.Desktop.Core.Item = projectitemschangedeventargs.ProjectItem

ArcGIS.Desktop.Core.Geoprocessing

  • ArcGIS.Desktop.Core.Geoprocessing.Geoprocessing.ShowMessageBox
Dim messages As System.Collections.Generic.IEnumerable(Of ArcGIS.Desktop.Core.Geoprocessing.IGPMessage)
Dim content_header As String
Dim style As ArcGIS.Desktop.Core.Geoprocessing.GPMessageBoxStyle
Dim window_title As String
Dim icon_source As String

' before:

Dim geoprocessing As ArcGIS.Desktop.Core.Geoprocessing.Geoprocessing
geoprocessing.ShowMessageBox(messages, content_header, style, window_title, icon_source)

' now:
Dim parentViewModel As ArcGIS.Desktop.Framework.Contracts.ViewModelBase

Dim geoprocessing As ArcGIS.Desktop.Core.Geoprocessing.Geoprocessing
geoprocessing.ShowMessageBox(messages, content_header, style, window_title, icon_source, parentViewModel)

ArcGIS.Desktop.Editing.dll

ArcGIS.Desktop.Editing

  • ArcGIS.Desktop.Editing.EditOperation.Planarize
Dim sourceLayer As ArcGIS.Desktop.Mapping.Layer
Dim sourceOIDs As System.Collections.Generic.IEnumerable(Of Long)

' before:
Dim clusterTolerance As Double

Dim editoperation As ArcGIS.Desktop.Editing.EditOperation
editoperation.Planarize(sourceLayer, sourceOIDs, clusterTolerance)

' now:
Dim clusterTolerance As System.Nullable(Of Double)

Dim editoperation As ArcGIS.Desktop.Editing.EditOperation
editoperation.Planarize(sourceLayer, sourceOIDs, clusterTolerance)

ArcGIS.Desktop.Editing.Attributes

  • ArcGIS.Desktop.Editing.Attributes.Attribute.SetOriginalValue
Dim value As Object

' before:

Dim attribute As ArcGIS.Desktop.Editing.Attributes.Attribute
attribute.SetOriginalValue(value)

' now:
Dim didEditFail As Boolean = [False]

Dim attribute As ArcGIS.Desktop.Editing.Attributes.Attribute
attribute.SetOriginalValue(value, [False])

ArcGIS.Desktop.Editing.Events

  • ArcGIS.Desktop.Editing.Events.TopologyEventArgs Constructor
Dim newUseTopology As System.Tuple(Of stringbooldouble)
Dim oldUseTopology As System.Tuple(Of stringbooldouble)

' before:

Dim topologyeventargs = New TopologyEventArgs(newUseTopology, oldUseTopology)

' now:
Dim map As ArcGIS.Desktop.Mapping.Map

Dim topologyeventargs = New TopologyEventArgs(map, newUseTopology, oldUseTopology)

ArcGIS.Desktop.Framework.dll

ArcGIS.Desktop.Framework.Controls

  • ArcGIS.Desktop.Framework.Controls.EmbeddableControl Constructor
Dim options As System.Xml.Linq.XElement

' before:

Dim embeddablecontrol = New EmbeddableControl(options)

' now:
Dim canChangeOptions As Boolean

Dim embeddablecontrol = New EmbeddableControl(options, canChangeOptions)
  • ArcGIS.Desktop.Framework.Controls.EmbeddableControl.Create
Dim damlID As String

' before:
Dim options As System.Xml.Linq.XElement

Dim embeddablecontrol As ArcGIS.Desktop.Framework.Controls.EmbeddableControl
Dim result As System.Tuple(Of ArcGIS.Desktop.Framework.Controls.EmbeddableControl, System.Windows.Controls.UserControl) = embeddablecontrol.Create(damlID, options)

' now:

Dim embeddablecontrol As ArcGIS.Desktop.Framework.Controls.EmbeddableControl
Dim result As System.Tuple(Of ArcGIS.Desktop.Framework.Controls.EmbeddableControl, System.Windows.Controls.UserControl) = EmbeddableControl.Create(damlID)

ArcGIS.Desktop.Layouts.dll

ArcGIS.Desktop.Layouts

  • ArcGIS.Desktop.Layouts.GroupElement.Elements
' before:

Dim groupelement As ArcGIS.Desktop.Layouts.GroupElement
Dim result As System.Collections.ObjectModel.ObservableCollection(Of ArcGIS.Desktop.Layouts.Element) = groupelement.Elements

' now:

Dim groupelement As ArcGIS.Desktop.Layouts.GroupElement
Dim result As System.Collections.ObjectModel.ReadOnlyObservableCollection(Of ArcGIS.Desktop.Layouts.Element) = groupelement.Elements
  • ArcGIS.Desktop.Layouts.TextProperties Constructor
Dim text As String
Dim font As String
Dim fontSize As Double

' before:

Dim textproperties = New TextProperties(text, font, fontSize)

' now:
Dim fontStyle As String

Dim textproperties = New TextProperties(text, font, fontSize, fontStyle)

ArcGIS.Desktop.Mapping.dll

ArcGIS.Desktop.Mapping

  • ArcGIS.Desktop.Mapping.ColorFactory.BlackRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.BlackRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.BlackRGB
  • ArcGIS.Desktop.Mapping.ColorFactory.BlueRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.BlueRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.BlueRGB
  • ArcGIS.Desktop.Mapping.ColorFactory.CreateColor
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory
Dim color As System.Drawing.Color
Dim color As System.Windows.Media.Color

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.CreateColor(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.CreateColor(color)
  • ArcGIS.Desktop.Mapping.ColorFactory.CreateRGBColor
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:
Dim R As System.Single
Dim G As System.Single
Dim B As System.Single
Dim A As System.Single = 100

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.CreateRGBColor(R, G, B, 100)

' now:
Dim R As Double
Dim G As Double
Dim B As Double
Dim A As Double = 100

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.CreateRGBColor(R, G, B, 100)
  • ArcGIS.Desktop.Mapping.ColorFactory.GreenRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.GreenRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.GreenRGB
  • ArcGIS.Desktop.Mapping.ColorFactory.GreyRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.GreyRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.GreyRGB
  • ArcGIS.Desktop.Mapping.ColorFactory.RedRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.RedRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.RedRGB
  • ArcGIS.Desktop.Mapping.ColorFactory.WhiteRGB
Imports colorfactory = ArcGIS.Desktop.Mapping.ColorFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMColor = colorfactory.WhiteRGB

' now:

Dim result As ArcGIS.Core.CIM.CIMColor = ColorFactory.Instance.WhiteRGB
  • ArcGIS.Desktop.Mapping.LayerFactory.CanCreateLayerFrom
Imports layerfactory = ArcGIS.Desktop.Mapping.LayerFactory
Dim item As ArcGIS.Desktop.Core.Item

' before:

Dim result As Boolean = layerfactory.CanCreateLayerFrom(item)

' now:

Dim result As Boolean = LayerFactory.Instance.CanCreateLayerFrom(item)
  • ArcGIS.Desktop.Mapping.LayerFactory.CreateFeatureLayer
Imports layerfactory = ArcGIS.Desktop.Mapping.LayerFactory
Dim dataUri As System.Uri
Dim mapOrGroupLayer As ArcGIS.Desktop.Mapping.ILayerContainerEdit
Dim position As ArcGIS.Desktop.Mapping.LayerPosition = 0
Dim layerName As String = ""
Dim rendererDefinition As ArcGIS.Desktop.Mapping.RendererDefinition
Dim index As Integer
Dim dataConnection As ArcGIS.Core.CIM.CIMDataConnection
Dim featureClass As ArcGIS.Core.Data.FeatureClass
Dim item As ArcGIS.Desktop.Core.Item

' before:

Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(dataUri, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(dataUri, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(dataConnection, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(dataConnection, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(featureClass, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(featureClass, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(item, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = layerfactory.CreateFeatureLayer(item, mapOrGroupLayer, index, "", rendererDefinition)

' now:

Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(dataUri, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(dataUri, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(dataConnection, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(dataConnection, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(featureClass, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(featureClass, mapOrGroupLayer, index, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(item, mapOrGroupLayer, 0, "", rendererDefinition)
Dim result As ArcGIS.Desktop.Mapping.FeatureLayer = LayerFactory.Instance.CreateFeatureLayer(item, mapOrGroupLayer, index, "", rendererDefinition)
  • ArcGIS.Desktop.Mapping.LayerFactory.CreateGroupLayer
Imports layerfactory = ArcGIS.Desktop.Mapping.LayerFactory
Dim container As ArcGIS.Desktop.Mapping.ILayerContainerEdit
Dim index As Integer
Dim layerName As String = ""

' before:

Dim result As ArcGIS.Desktop.Mapping.GroupLayer = layerfactory.CreateGroupLayer(container, index, "")

' now:

Dim result As ArcGIS.Desktop.Mapping.GroupLayer = LayerFactory.Instance.CreateGroupLayer(container, index, "")
  • ArcGIS.Desktop.Mapping.LayerFactory.CreateLayer
Imports layerfactory = ArcGIS.Desktop.Mapping.LayerFactory
Dim dataUri As System.Uri
Dim mapOrGroupLayer As ArcGIS.Desktop.Mapping.ILayerContainerEdit
Dim position As ArcGIS.Desktop.Mapping.LayerPosition = 0
Dim layerName As String = ""
Dim dataConnection As ArcGIS.Core.CIM.CIMDataConnection
Dim index As Integer
Dim item As ArcGIS.Desktop.Core.Item

' before:

Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(dataUri, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(dataConnection, mapOrGroupLayer, index, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(dataConnection, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(item, mapOrGroupLayer, index, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(item, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = layerfactory.CreateLayer(dataUri, mapOrGroupLayer, index, "")

' now:

Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(dataUri, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(dataConnection, mapOrGroupLayer, index, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(dataConnection, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(item, mapOrGroupLayer, index, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(item, mapOrGroupLayer, 0, "")
Dim result As ArcGIS.Desktop.Mapping.Layer = LayerFactory.Instance.CreateLayer(dataUri, mapOrGroupLayer, index, "")
  • ArcGIS.Desktop.Mapping.MapFactory.CanCreateMapFrom
Imports mapfactory = ArcGIS.Desktop.Mapping.MapFactory
Dim item As ArcGIS.Desktop.Core.Item

' before:

Dim result As Boolean = mapfactory.CanCreateMapFrom(item)

' now:

Dim result As Boolean = MapFactory.Instance.CanCreateMapFrom(item)
  • ArcGIS.Desktop.Mapping.MapFactory.CreateMap
Imports mapfactory = ArcGIS.Desktop.Mapping.MapFactory
Dim name As String
Dim mapType As ArcGIS.Core.CIM.MapType = 0
Dim defaultViewingMode As ArcGIS.Core.CIM.MapViewingMode = 0
Dim basemap As ArcGIS.Desktop.Mapping.Basemap = 1

' before:

Dim result As ArcGIS.Desktop.Mapping.Map = mapfactory.CreateMap(name, 0, 0, 1)

' now:

Dim result As ArcGIS.Desktop.Mapping.Map = MapFactory.Instance.CreateMap(name, 0, 0, 1)
  • ArcGIS.Desktop.Mapping.StandaloneTableFactory.CanCreateStandaloneTableFrom
Imports standalonetablefactory = ArcGIS.Desktop.Mapping.StandaloneTableFactory
Dim item As ArcGIS.Desktop.Core.Item

' before:

Dim result As Boolean = standalonetablefactory.CanCreateStandaloneTableFrom(item)

' now:

Dim result As Boolean = StandaloneTableFactory.Instance.CanCreateStandaloneTableFrom(item)
  • ArcGIS.Desktop.Mapping.StandaloneTableFactory.CreateStandaloneTable
Imports standalonetablefactory = ArcGIS.Desktop.Mapping.StandaloneTableFactory
Dim dataConnection As ArcGIS.Core.CIM.CIMDataConnection
Dim container As ArcGIS.Desktop.Mapping.IStandaloneTableContainerEdit
Dim tableName As String = ""
Dim table As ArcGIS.Core.Data.Table
Dim item As ArcGIS.Desktop.Core.Item
Dim tableUri As System.Uri

' before:

Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = standalonetablefactory.CreateStandaloneTable(dataConnection, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = standalonetablefactory.CreateStandaloneTable(table, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = standalonetablefactory.CreateStandaloneTable(item, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = standalonetablefactory.CreateStandaloneTable(tableUri, container, "")

' now:

Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = StandaloneTableFactory.Instance.CreateStandaloneTable(dataConnection, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = StandaloneTableFactory.Instance.CreateStandaloneTable(table, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = StandaloneTableFactory.Instance.CreateStandaloneTable(item, container, "")
Dim result As ArcGIS.Desktop.Mapping.StandaloneTable = StandaloneTableFactory.Instance.CreateStandaloneTable(tableUri, container, "")
  • ArcGIS.Desktop.Mapping.StyleHelper.AddStyle
Dim customStyleToAdd As String = "C:\Temp\CustomStyle.stylx"

// before:

Await Project.Current.AddStyleAsync(customStyleToAdd)

// now:
 
Await QueuedTask.Run(Sub() StyleHelper.AddStyle(Project.Current, customStyleToAdd))
  • ArcGIS.Desktop.Mapping.StyleHelper.CreateStyle
Dim styleToCreate As String = "C:\Temp\CustomStyle.stylx"

// before:

Await Project.Current.AddStyleAsync(styleToCreate)

// now:
 
Await QueuedTask.Run(Sub() StyleHelper.AddStyle(Project.Current, styleToCreate))
  • ArcGIS.Desktop.Mapping.StyleHelper.RemoveStyle
// before:

Await Project.Current.RemoveStyleAsync("3D Vehicles")

// now:
 
Await QueuedTask.Run(Sub() StyleHelper.RemoveStyle(Project.Current, "3D Vehicles"))
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructFill
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolfactory.ConstructFill()

' now:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolFactory.Instance.ConstructFill()
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructHatchFill
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim angle As Double
Dim separation As Double

' before:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolfactory.ConstructHatchFill(color, angle, separation)

' now:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolFactory.Instance.ConstructHatchFill(color, angle, separation)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructLineSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim width As Double
Dim lineStyle As ArcGIS.Desktop.Mapping.SimpleLineStyle
Dim stroke As ArcGIS.Core.CIM.CIMStroke

' before:

Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.ConstructLineSymbol(color, width, lineStyle)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.ConstructLineSymbol(stroke)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.ConstructLineSymbol(color, width)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.ConstructLineSymbol()
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.ConstructLineSymbol(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.ConstructLineSymbol(color, width, lineStyle)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.ConstructLineSymbol(stroke)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.ConstructLineSymbol(color, width)
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.ConstructLineSymbol()
Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.ConstructLineSymbol(color)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructMarker
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim characterIndex As Integer
Dim fontFamily As String
Dim fontStyle As String
Dim size As Integer
Dim color As ArcGIS.Core.CIM.CIMColor
Dim size As Double
Dim markerStyle As ArcGIS.Desktop.Mapping.SimpleMarkerStyle

' before:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(characterIndex, fontFamily, fontStyle)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(characterIndex, fontFamily)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(characterIndex, fontFamily, fontStyle, size, color)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(characterIndex, fontFamily, fontStyle, size)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(color)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker()
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(color, size, markerStyle)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarker(color, size)

' now:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(characterIndex, fontFamily, fontStyle)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(characterIndex, fontFamily)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(characterIndex, fontFamily, fontStyle, size, color)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(characterIndex, fontFamily, fontStyle, size)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(color)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker()
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(color, size, markerStyle)
Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarker(color, size)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructMarkerFromBitmapSource
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim bitmapSource As System.Windows.Media.Imaging.BitmapSource

' before:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarkerFromBitmapSource(bitmapSource)

' now:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarkerFromBitmapSource(bitmapSource)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructMarkerFromStream
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim stream As System.IO.Stream

' before:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.ConstructMarkerFromStream(stream)

' now:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.ConstructMarkerFromStream(stream)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructPointSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim size As Double
Dim style As ArcGIS.Desktop.Mapping.SimpleMarkerStyle
Dim marker As ArcGIS.Core.CIM.CIMMarker

' before:

Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.ConstructPointSymbol(color, size, style)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.ConstructPointSymbol(marker)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.ConstructPointSymbol(color, size)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.ConstructPointSymbol()
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.ConstructPointSymbol(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.ConstructPointSymbol(color, size, style)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.ConstructPointSymbol(marker)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.ConstructPointSymbol(color, size)
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.ConstructPointSymbol()
Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.ConstructPointSymbol(color)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructPolygonSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim fillStyle As ArcGIS.Desktop.Mapping.SimpleFillStyle
Dim outline As ArcGIS.Core.CIM.CIMStroke
Dim fill As ArcGIS.Core.CIM.CIMFill

' before:

Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.ConstructPolygonSymbol(color, fillStyle, outline)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.ConstructPolygonSymbol(fill, outline)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.ConstructPolygonSymbol(color, fillStyle)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.ConstructPolygonSymbol()
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.ConstructPolygonSymbol(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.ConstructPolygonSymbol(color, fillStyle, outline)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.ConstructPolygonSymbol(fill, outline)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.ConstructPolygonSymbol(color, fillStyle)
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.ConstructPolygonSymbol()
Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.ConstructPolygonSymbol(color)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructProceduralSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim rulePackagePath As String
Dim featureLayer As ArcGIS.Desktop.Mapping.FeatureLayer
Dim [overrides] As System.Collections.Generic.IEnumerable(Of ArcGIS.Core.CIM.CIMPrimitiveOverride)

' before:

Dim result As ArcGIS.Core.CIM.CIMSymbolReference = symbolfactory.ConstructProceduralSymbol(rulePackagePath, featureLayer, [overrides])

' now:

Dim result As ArcGIS.Core.CIM.CIMSymbolReference = symbolfactory.Instance.ConstructProceduralSymbol(rulePackagePath, featureLayer, [overrides])
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructSolidFill
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor

' before:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolfactory.ConstructSolidFill(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolFactory.Instance.ConstructSolidFill(color)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructStroke
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim width As Double
Dim lineStyle As ArcGIS.Desktop.Mapping.SimpleLineStyle

' before:

Dim result As ArcGIS.Core.CIM.CIMStroke = symbolfactory.ConstructStroke(color, width)
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolfactory.ConstructStroke(color, width, lineStyle)
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolfactory.ConstructStroke()
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolfactory.ConstructStroke(color)

' now:

Dim result As ArcGIS.Core.CIM.CIMStroke = symbolFactory.Instance.ConstructStroke(color, width)
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolFactory.Instance.ConstructStroke(color, width, lineStyle)
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolFactory.Instance.ConstructStroke()
Dim result As ArcGIS.Core.CIM.CIMStroke = symbolFactory.Instance.ConstructStroke(color)
  • ArcGIS.Desktop.Mapping.SymbolFactory.ConstructTextSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim color As ArcGIS.Core.CIM.CIMColor
Dim size As Double
Dim fontFamilyName As String
Dim fontStyleName As String
Dim symbol As ArcGIS.Core.CIM.CIMPolygonSymbol

' before:

Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol(color)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol(color, size, fontFamilyName, fontStyleName)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol(symbol, size, fontFamilyName, fontStyleName)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol()
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol(size)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolfactory.ConstructTextSymbol(color, size)

' now:

Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol(color)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol(color, size, fontFamilyName, fontStyleName)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol(symbol, size, fontFamilyName, fontStyleName)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol()
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol(size)
Dim result As ArcGIS.Core.CIM.CIMTextSymbol = symbolFactory.Instance.ConstructTextSymbol(color, size)
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultFill
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolfactory.DefaultFill

' now:

Dim result As ArcGIS.Core.CIM.CIMFill = symbolFactory.Instance.DefaultFill
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultLineSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolfactory.DefaultLineSymbol

' now:

Dim result As ArcGIS.Core.CIM.CIMLineSymbol = symbolFactory.Instance.DefaultLineSymbol
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultMarker
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolfactory.DefaultMarker

' now:

Dim result As ArcGIS.Core.CIM.CIMMarker = symbolFactory.Instance.DefaultMarker
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultPointSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolfactory.DefaultPointSymbol

' now:

Dim result As ArcGIS.Core.CIM.CIMPointSymbol = symbolFactory.Instance.DefaultPointSymbol
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultPolygonSymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolfactory.DefaultPolygonSymbol

' now:

Dim result As ArcGIS.Core.CIM.CIMPolygonSymbol = symbolFactory.Instance.DefaultPolygonSymbol
  • ArcGIS.Desktop.Mapping.SymbolFactory.DefaultStroke
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory

' before:

Dim result As ArcGIS.Core.CIM.CIMStroke = symbolfactory.DefaultStroke

' now:

Dim result As ArcGIS.Core.CIM.CIMStroke = symbolFactory.Instance.DefaultStroke
  • ArcGIS.Desktop.Mapping.SymbolFactory.GetDictionarySymbol
Imports symbolfactory = ArcGIS.Desktop.Mapping.SymbolFactory
Dim dictionaryName As String
Dim values As System.Collections.Generic.Dictionary(Of stringobject)

' before:

Dim result As ArcGIS.Core.CIM.CIMSymbol = symbolfactory.GetDictionarySymbol(dictionaryName, values)

' now:

Dim result As ArcGIS.Core.CIM.CIMSymbol = symbolFactory.Instance.GetDictionarySymbol(dictionaryName, values)

ArcGIS.Desktop.TaskAssistant.dll

ArcGIS.Desktop.TaskAssistant

  • ArcGIS.Desktop.TaskAssistant.TaskAssistantModule.CloseTaskAsync
' before:
Dim taskGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task = TaskAssistantModule.CloseTaskAsync(taskGuid)

' now:
Dim taskItemGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task = TaskAssistantModule.CloseTaskAsync(taskItemGuid)
  • ArcGIS.Desktop.TaskAssistant.TaskAssistantModule.ExportTaskAsync
Dim path As String

' before:
Dim taskGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task(Of String) = TaskAssistantModule.ExportTaskAsync(taskGuid, path)

' now:
Dim taskItemGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task(Of String) = TaskAssistantModule.ExportTaskAsync(taskItemGuid, path)
  • ArcGIS.Desktop.TaskAssistant.TaskAssistantModule.OpenTaskItemAsync
' before:
Dim taskGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task(Of System.Guid) = TaskAssistantModule.OpenTaskItemAsync(taskGuid)

' now:
Dim taskItemGuid As System.Guid

Dim taskassistantmodule As ArcGIS.Desktop.TaskAssistant.TaskAssistantModule
Dim result As System.Threading.Tasks.Task(Of System.Guid) = TaskAssistantModule.OpenTaskItemAsync(taskItemGuid)

ArcGIS.Desktop.Workflow.dll

ArcGIS.Desktop.Workflow

  • ArcGIS.Desktop.Workflow.WorkflowModule.ConnectAsync
' before:

Dim workflowmodule As ArcGIS.Desktop.Workflow.WorkflowModule
Dim result As System.Threading.Tasks.Task(Of ArcGIS.Desktop.Workflow.Models.WorkflowConnectionStatus) = WorkflowModule.ConnectAsync()

' now:

Dim workflowmodule As ArcGIS.Desktop.Workflow.WorkflowModule
Dim result As System.Threading.Tasks.Task(Of ArcGIS.Desktop.Workflow.Models.WorkflowConnection) = WorkflowModule.ConnectAsync()

ArcGIS.Desktop.Workflow.Models

  • ArcGIS.Desktop.Workflow.Models.JobsManager.CloseJobs
' before:
Dim jobIDs As System.Collections.Generic.IReadOnlyList(Of Integer)

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.Collections.Generic.IReadOnlyList(Of Integer) = jobsmanager.CloseJobs(jobIDs)

' now:
Dim jobIDs As System.Collections.Generic.IReadOnlyList(Of String)

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.Collections.Generic.IReadOnlyList(Of String) = jobsmanager.CloseJobs(jobIDs)
  • ArcGIS.Desktop.Workflow.Models.JobsManager.DeleteJobs
Dim deleteVersion As Boolean
Dim deleteHistory As Boolean

' before:
Dim jobIDs As System.Int32()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.Int32() = jobsmanager.DeleteJobs(jobIDs, deleteVersion, deleteHistory)

' now:
Dim jobIDs As System.String()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.String() = jobsmanager.DeleteJobs(jobIDs, deleteVersion, deleteHistory)
  • ArcGIS.Desktop.Workflow.Models.JobsManager.DeleteMaps
' before:
Dim jobIDs As System.Int32()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.Int32() = jobsmanager.DeleteMaps(jobIDs)

' now:
Dim jobIDs As System.String()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.String() = jobsmanager.DeleteMaps(jobIDs)
  • ArcGIS.Desktop.Workflow.Models.JobsManager.DeleteVersions
' before:
Dim jobIDs As System.Int32()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.Int32() = jobsmanager.DeleteVersions(jobIDs)

' now:
Dim jobIDs As System.String()

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As System.String() = jobsmanager.DeleteVersions(jobIDs)
  • ArcGIS.Desktop.Workflow.Models.JobsManager.GetJob
' before:
Dim jobID2 As String

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.Job = jobsmanager.GetJob(jobID2)

' now:
Dim jobID As String

Dim jobsmanager As ArcGIS.Desktop.Workflow.Models.JobsManager
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.Job = jobsmanager.GetJob(jobID)

ArcGIS.Desktop.Workflow.Models.ConfigItems

  • ArcGIS.Desktop.Workflow.Models.ConfigItems.JobTypeDescription.ID
' before:

Dim jobtypedescription As ArcGIS.Desktop.Workflow.Models.ConfigItems.JobTypeDescription
Dim result As Integer = jobtypedescription.ID

' now:

Dim jobtypedescription As ArcGIS.Desktop.Workflow.Models.ConfigItems.JobTypeDescription
Dim result As String = jobtypedescription.ID

ArcGIS.Desktop.Workflow.Models.JobModels

  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.CanCompleteStep
' before:
Dim stepID As Integer = -1

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Tuple(Of Boolean, String) = job.CanCompleteStep(-1)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Tuple(Of Boolean, String) = job.CanCompleteStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.CanExecuteStep
' before:
Dim stepID As Integer = -1

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Tuple(Of Boolean, String) = job.CanExecuteStep(-1)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Tuple(Of Boolean, String) = job.CanExecuteStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.CanSetCurrentStep
' before:
Dim stepID As Integer

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As Boolean = job.CanSetCurrentStep(stepID)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As Boolean = job.CanSetCurrentStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.CompleteStep
' before:
Dim stepID As Integer = -1

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.CompleteStep(-1)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.CompleteStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.ExecuteStep
' before:
Dim stepID As Integer = -1

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.ExecuteStep(-1)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.ExecuteStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.FinishSplitExecutionStep
Dim args As System.Collections.Generic.IReadOnlyList(Of String)

' before:
Dim stepID As Integer

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.FinishSplitExecutionStep(stepID, args)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As ArcGIS.Desktop.Workflow.Models.JobModels.WorkflowExecutionResult = job.FinishSplitExecutionStep(stepID, args)
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.GetCurrentSteps
' before:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Collections.Generic.IReadOnlyList(Of Integer) = job.GetCurrentSteps()

' now:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As System.Collections.Generic.IReadOnlyList(Of String) = job.GetCurrentSteps()
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.ID
' before:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As Integer = job.ID

' now:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As String = job.ID
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.ParentJobID
' before:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As Integer = job.ParentJobID

' now:

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
Dim result As String = job.ParentJobID
  • ArcGIS.Desktop.Workflow.Models.JobModels.Job.SetCurrentStep
' before:
Dim stepID As Integer

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
job.SetCurrentStep(stepID)

' now:
Dim stepID As String

Dim job As ArcGIS.Desktop.Workflow.Models.JobModels.Job
job.SetCurrentStep(stepID)
  • ArcGIS.Desktop.Workflow.Models.JobModels.JobIdentifier.ID
' before:

Dim jobidentifier As ArcGIS.Desktop.Workflow.Models.JobModels.JobIdentifier
Dim result As Integer = jobidentifier.ID

' now:

Dim jobidentifier As ArcGIS.Desktop.Workflow.Models.JobModels.JobIdentifier
Dim result As String = jobidentifier.ID

ArcGIS.Desktop.Workflow.Models.Queries

  • ArcGIS.Desktop.Workflow.Models.Queries.JobQueryRow.JobID
' before:

Dim jobqueryrow As ArcGIS.Desktop.Workflow.Models.Queries.JobQueryRow
Dim result As Integer = jobqueryrow.JobID

' now:

Dim jobqueryrow As ArcGIS.Desktop.Workflow.Models.Queries.JobQueryRow
Dim result As String = jobqueryrow.JobID
Clone this wiki locally