Sub Process_Globals
Private fx As JFX
Private MainForm As Form
Type RowType(data1 As Int, data2 As String, data3 As Object) '<---data... N
Dim Col As RowType
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.Show
Col.Initialize
setFields(Col,1,"fred","anObject")
Log(Col)
Log(Col.data1)
End Sub
Sub setFields(target As RowType,arg1 As Int,arg2 As String,arg3 As Object)
target.data1=arg1
target.data2=arg2
target.data3=arg3
End Sub