The code below raise a crash in the runtime of the apk. The target was to share an array between all activity modules. Sub Process_Globals Dim ArrRoles(1) As String:ArrRoles(0)="Cameriere":ArrRoles(1)="Titolare" end sub