Android Question Array of custom types - can I do this?

[Arf]

I've made a type, like this:

Type ThisPatExamsForUpload (ULpat As PatientStruct, ULexam() As Exam)

Which contains patient data, and a bunch of exams for that patient - there could be any number of exams.
When I try populate the instance, I get a exception when I try initialise the first ULexam() - ArrayIndexOutOfBounds.

PatAndExams.ULexam(j).Initialize
PatAndExams.ULexam(j) = exm

I understand the error occurs as PatAndExams.ULexam(0) does not exist yet. How can I create ULexam(0) and subsequent exams in that array in order that they can be initialised?

Thanks

 

[Erel]

You need to create an array an assign it to this field

Type MyType(Ints() As Int)
...

Dim m As MyType
m.Initialize
Dim ii(20) As Int
m.Ints = ii

'Another option:
m.Ints = Array As Int(1, 2, 3)

However why not use a List instead of the array?

 

[Arf]

Thanks.
Well this chunk of patients and exam data needs to be sent to a PC and then unpacked into a database on the PC, and with my programming skills not being very strong, I thought I'd start simple - and arrays seem the simpler data type, and I probably stand the best chance of ending up with a well defined structure to transport.

I may be completely wrong on my approach and have to do something completely different.. living and learning

 

[Informatix]

Thanks.
Well this chunk of patients and exam data needs to be sent to a PC and then unpacked into a database on the PC, and with my programming skills not being very strong, I thought I'd start simple - and arrays seem the simpler data type, and I probably stand the best chance of ending up with a well defined structure to transport.

I may be completely wrong on my approach and have to do something completely different.. living and learning

If your type has only two fields and one is an unique ID, you may also use a map. Instead of:
Type ThisPatExamsForUpload (ULpat As PatientStruct, ULexam As List)
Dim TPEfU(10) as ThisPatExamsForUpload
...
you could have:
Dim PatExamsForUpload as Map
PatExamsForUpload.Put(ULpat, ULExam)