On Tue, 2011-10-25 at 08:25 +0200, wally wrote:

> Public Struct axis
>   i As Integer 
>   f  As Float
>   ia As Integer[]
> End Struct 

etc

' Gambas module file

Public Struct axis
  i As Integer 
  f As Float
  ia As Integer[]
End Struct

Public Sub Main()

Dim testit As New Axis
Dim x As Integer

testit.ia = New Integer[]

testit.i = 212
testit.f = Pi()

Print testit.ia.Bounds

testit.ia.Add(1)
testit.ia.Add(2)
For x = 1 To 312654
  testit.ia.Add(x)
Next

End

seems to work.

Bruce
------------------------------------------------------------------------------
The demand for IT networking professionals continues to grow, and the
demand for specialized networking skills is growing even more rapidly.
Take a complimentary Learning@Cisco Self-Assessment and learn 
about Cisco certifications, training, and career opportunities. 
http://p.sf.net/sfu/cisco-dev2dev
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to