Repository.Unit.GetAllUnits: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) mNo edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
| Line 11: | Line 11: | ||
'''VBA|VB.NET''' | '''VBA|VB.NET''' | ||
{{APIComment|' | {{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}} | ||
{{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository | {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository | ||
MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}}) | |||
{{APIComment|'Get a list of all defined units in the repository.}} | {{APIComment|'Get a list of all defined units in the repository.}} | ||
{{APIPrefix|Dim}} ListOfUnits() {{APIPrefix|As}} UnitInfo | |||
ListOfUnits = MyRepository.Unit.GetAllUnits() | |||
{{APIComment|'Output sample: Display the number of elements in the array.}} | {{APIComment|'Output sample: Display the number of elements in the array.}} | ||
{{APIPrefix|Dim}} NumberofElements {{APIPrefix|As}} Integer | |||
NumberofElements = UBound(ListofUnits) - LBound(ListofUnits) + 1 | |||
MsgBox (NumberofElements) | |||
Revision as of 17:46, 8 April 2016
 |
Member of: SynthesisAPI.Repository
Gets the unit of measurement associated with a Repository object. Returns a UnitInfo object that represents the unit of measurement.
Syntax
.Unit.GetAllUnits()
Example
VBA|VB.NET 'Declare a new Repository object and connect to a Synthesis repository. Dim MyRepository As New Repository MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10") 'Get a list of all defined units in the repository. Dim ListOfUnits() As UnitInfo ListOfUnits = MyRepository.Unit.GetAllUnits() 'Output sample: Display the number of elements in the array. Dim NumberofElements As Integer NumberofElements = UBound(ListofUnits) - LBound(ListofUnits) + 1 MsgBox (NumberofElements)