TeamInfo.GetCrewIDs Method: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
mNo edit summary
mNo edit summary
 
Line 32: Line 32:
   {{APIPrefix|Dim}} lower {{APIPrefix|As Integer}}
   {{APIPrefix|Dim}} lower {{APIPrefix|As Integer}}
   
   
  lower = {{APIPrefix|LBound}}(myarray)
   upper = {{APIPrefix|UBound}}(myarray)
   upper = {{APIPrefix|UBound}}(myarray)
   
   
   {{APIPrefix|For}} i = lower {{APIPrefix|To}} upper
   {{APIPrefix|For}} i = 0 {{APIPrefix|To}} upper
     MsgBox "Crew ID = " & myarray(i)
     MsgBox "Crew ID = " & myarray(i)
   {{APIPrefix|Next}} i
   {{APIPrefix|Next}} i

Latest revision as of 16:13, 13 March 2019

APIWiki.png


Member of: SynthesisAPI.TeamInfo


Returns an array of the IDs of the crews included in the team.


Remarks: Designed for VB6/VBA users, .NET users should use CrewIDs property instead.

Syntax

.GetCrewIDs(ByRef arr())

Parameters

arr()

Required as integer. An array of the crew IDs.

Example

VBA
 ... 

 'Add code to get an existing team. 
  Dim aTeam As TeamInfo

 ... 

 'Get the IDs of the crews assigned to the team. 
  Dim myarray() As integer
  Call aTeam.GetCrewIDs(myarray)

 'Sample output. 
  Dim i As Integer
  Dim upper As Integer
  Dim lower As Integer

  upper = UBound(myarray)

  For i = 0 To upper
    MsgBox "Crew ID = " & myarray(i)
  Next i