Sample code for loop through a Feature Set's attribute table and get all the values

Imports System.Windows.Forms
Imports DotSpatial.Data

Private Sub button1_Click(sender As Object, e As EventArgs)
	Dim fs As FeatureSet = New FeatureSet()
	fs.FillAttributes()
	fs.Open("C:\Temp\roads.shp")
	Dim dtOriginal As DataTable = fs.DataTable
	For row As Integer = 0 To dtOriginal.Rows.Count - 1
		Dim original As Object() = dtOriginal.Rows(row).ItemArray
	Next
End Sub

Last edited Jul 13, 2010 at 2:55 PM by AlamoMan, version 4