OpenSTAAD V8i
This function removes the current view with the specified name.
Where:
A string variable that will hold the name of the view to be removed.
A long variable that will hold the error number if the view cannot be removed.
Dim objOpenSTAAD As Object
Dim strViewName As String
Dim nErrorVal as Long
'Application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
objOpenSTAAD.RemoveNamedView strViewName, nErrorVal