Need an array of Types
BlitzPlus Forums/BlitzPlus Programming/Need an array of Types
| ||
Type Record Field F1 Field F2 End Type Global Transaction=New Record Dim Transaction(6000) X=12 WriteFile file For Transaction(X).Record = Each Record WriteLine file, Transaction(X)\F1 WriteLine file, Transaction(X)\F2 Next The above didn't work! Can somebody straighten it out for me, this should be my last hurdle to finish my program! Next CloseFile file |
| ||
Dim Transaction.Record(6000) Then every time you add a new transaction place it in the array. Transaction(1)=New Record Transaction(2)=New Record etc The array will act as an indexed pointer list to your type list. |
| ||
then change your for loop to thisFor X = 0 to 6000 If you weren't using an array but had declared many instances of Record, your for loop could be like this: For r.Record = each Record WriteLine File, r\f1 WriteLine File, r\f2 Next |
| ||
Thanks |