OpenSTAAD V8i
This function sets the input units of length and force of the currently open .STD file.
Where:
An integer variable that will hold the input unit to be assigned for length of the currently open .STD file. Value may vary from 0 to 7 (0- Inch, 1- Feet, 2- Feet, 3- CentiMeter, 4- Meter, 5- MilliMeter, 6 - DeciMeter, 7 – KiloMeter).
An integer variable that will hold the input unit to be assigned for force of the currently open .STD file. Value may vary from 0 to 7 (0- Kilopound, 1- Pound, 2- Kilogram, 3-Metric Ton, 4- Newton, 5-Kilo Newton, 6- Mega Newton, 7- DecaNewton).
Dim objOpenSTAAD As Object
Dim intInputUnitForLength As Integer
Dim intInputUnitForForce As Integer
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Set Input Units
objOpenSTAAD.SetInputUnits intInputUnitForLength, intInputUnitForForce