OpenSTAAD V8i
This function creates a .STD file with specified length and force units.
Where:
A string variable that will hold the name of the .STD file, which needs to be created.
An integer variable that will hold the input unit to be assigned for length of the new .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 new .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 strFileName As String
Dim intInputUnitForLength As Integer
Dim intInputUnitForForce As Integer
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Create New File
objOpenSTAAD.NewSTAADFile strFileName, intInputUnitForLength, intInputUnitForForce