COM object EvBeamSelect
|
EvApplication > EvFileCollection > EvFile > EvVariablesCollection > EvVariableBase As EvVariableVirtual >EvVariableAcousticProperties > EvBeamSelect
View the COM map and the COM summary. |
The EvBeamSelect object gives you access to settings on the Beam Select page of the Variable Properties dialog box of the acoustic virtual variable.
EvBeamSelect property:
|
|
Description |
|
BeamNumber |
BeamNumber SummaryAccess or change the value for the Beam Number on the Beam Select page. BeamNumber is restricted to the range of beams in the variable (beam zero to the maximum number of beams). ExampleDim EvApp: Set EvApp = CreateObject("EchoviewCom.EvApplication")
Dim EvFile: Set EvFile = EvApp.OpenFile("C:BeamSelectExample.EV")
If EvFile Is Nothing Then
MsgBox "Failed to open EV file"
Else
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Beam select
Dim VarA: Set VarA = EvFile.Variables.FindByName("Beam select 1")
If VarA Is Nothing Then
MsgBox "Failed to find beam select variable"
Else
Dim VarBeamSelect: Set VarBeamSelect = VarA.AsVariableVirtual
If VarBeamSelect Is Nothing Then
MsgBox "Variable is not virtual - beam select"
Else
VarBeamSelect.Properties.BeamSelect.BeamNumber = 5
MsgBox "Beam number should be 5"
End If
End If
|