Getting pointers from array

Type Station
	Field Name$
	Field FileName$
	Field PosX%
	Field PosY%
	Field PosZ%
End Type

Dim ArrayStations.Station(15, 10)

For i = 1 To 15
	For j = 1 To 10
		ArrayStations(i, j) = New Station
		arraystations(i,j)\name=Mid$("abcdefghijklmnopqrst",j,1)
	Next
Next

For i = 1 To 10
	Print Handle(arraystations(1,i))
	Print ArrayStations(1, i)\name
Next

WaitKey()

Try the above which is almost identical to your original. To print the value of a type instance handle use handle(typevar).