Home › Blogs › Andrew's blog

Create your own datatype in StarBasic

Tue, 01/18/2011 - 21:08 — Andrew

I felt like posting an example in OOo BAsic (StarBasic) so I decided to create my own data type.

  1. Type PersonType
  2.   FirstName As String
  3.   LastName As String
  4. End Type
  5.  
  6. Sub ExampleCreateNewType
  7.   Dim Person(100) As PersonType
  8.   Person(0).FirstName = "Andrew"
  9.   Person(0).LastName  = "Pitonyak"
  10.   PrintPerson(Person(0)) 
  11. End Sub
  12.  
  13. Sub PrintPerson(x)
  14.   Print "Person = " & x.FirstName & " " & x.LastName
  15. End Sub