Wie erzeuge ich ein neues Feld mit VBA

Gespeichert von silvia am
im Forum ArcGIS
Hallo,
Meine Frage lautet wie er zeuge ich ein neues Feld in der Attribut-Tabelle mit VBA.

Bedingung ist:
Das Feld muß das Format "float" haben und 2 stellen hintern Komma genau sein.

Wie man das zu Fuß in ArcGIS erzeugt weis ich, ich möchte es gerne in VBA haben.

Jetzt schon mal danke an alle.

Gruß
Silvia

Gespeichert von Maxilla am Di., 28.08.2007 - 11:30

Permalink
'Feld TEST fuer ersten Layer im TOC

Sub AddField()
Dim pMxDoc As IMxDocument
Set pMxDoc = ThisDocument
Dim pMap As IMap
Set pMap = pMxDoc.FocusMap
Dim pLayer As ILayer
Set pLayer = pMap.Layer(0)
Dim pTable As ITable
Set pTable = pLayer
Dim pField As IField
Dim pFieldEdit As IFieldEdit

Set pField = New Field
Set pFieldEdit = pField
With pFieldEdit
.Type = 3
.Precision = 7
.Scale = 2
.Name = "Test"
End With
pTable.AddField pField

End Sub

Gespeichert von silvia am Di., 28.08.2007 - 12:09

Permalink
Ja super hat funktioniert.

Gruß
Silvia