COM object EvData
EvApplication > EvFileCollection > EvFile > EvVariablesCollection > EvVariableBase As EvVariableAcoustic > EvVariableAcousticProperties > EvData - OR - EvApplication > EvFileCollection >EvFile > EvVariablesCollection > EvVariableBase As EvVariableVirtual > EvVariableAcousticProperties > EvData
View the COM map and the COM summary. |
The EvData object gives you access to information about settings on the Data page of the Variable Properties dialog box of the acoustic or acoustic virtual variable.
EvData methods and properties:
ApplyMaximumThreshold
ApplyMinimumThreshold
ApplyMinimumTsThreshold
ApplyTimeVariedThreshold
LockSvMinimum
LockSvMaximum
MaximumThreshold
MinimumThreshold
MinimumTsThreshold
MinimumTsThresholdOffset
MaximumThresholdedValuesSetTo
TimeVariedThresholdSvAt1m
(read-write) boolean ApplyMaximumThreshold SummaryAccess or change the Apply checkbox for the Maximum threshold. ParametersNone ResultTrue or False. ExampleMsgBox "ApplyMaximumThreshold: " & AVariable.Properties.Data.ApplyMaximumThreshold AVariable.Properties.Data.ApplyMaximumThreshold = False |
|
(read-write) boolean ApplyMinimumThreshold SummaryAccess or change the Apply checkbox for the setting Minimum threshold. ParametersNone ResultTrue or False. ExampleMsgBox "ApplyMinimumThreshold: " & AVariable.Properties.Data.ApplyMinimumThreshold AVariable.Properties.Data.ApplyMinimumThreshold = True |
|
(read-write) boolean ApplyMinimumTsThreshold SummaryAccess or change the Apply checkbox for the setting Minimum TS threshold. ParametersNone ResultTrue or False. ExampleMsgBox "ApplyMinimumTsThreshold: " & AVariable.Properties.Data.ApplyMinimumTsThreshold AVariable.Properties.Data.ApplyMinimumTsThreshold = True |
|
(read-write) boolean ApplyTimeVariedThreshold SummaryAccess or change the Apply checkbox for the setting Time varied threshold. ParametersNone ResultTrue or False. ExampleMsgBox "ApplyTimeVariedThreshold: " & AVariable.Properties.Data.ApplyTimeVariedThreshold AVariable.Properties.Data.ApplyTimeVariedThreshold = False |
|
(read-write) boolean LockSvMinimum SummaryAccess or change the Lock to color display minimum checkbox under Minimum threshold. ParametersNone ResultTrue or False. ExampleMsgBox "LockSvMinimum: " & AVariable.Properties.Data.LockSvMinimum AVariable.Properties.Data.LockSvMinimum = True |
|
(read-write) boolean LockSvMaximum SummaryAccess or change the Lock to color display maximum checkbox under Maximum threshold. ParametersNone ResultTrue or False. ExampleMsgBox "LockSvMaximum: " & AVariable.Properties.Data.LockSvMaximum AVariable.Properties.Data.LockSvMaximum = False |
|
(read-write) double MaximumThreshold SummaryAccess or change the value for Maximum threshold. ExampleDim strVar: strVar = "Sv pings" Dim EvApp: Set EvApp = CreateObject("EchoviewCom.EvApplication") If EvApp.EvFiles.Count = 0 Then Msgbox "No EV file open" WScript.Quit End If Dim EvVar: Set EvVar = EvApp.EvFiles(0).Variables.FindByName(strVar) Dim SvVar: Set SvVar = EvVar.AsVariableAcoustic If SvVar Is Nothing Then MsgBox "Failed to find '" & strVar & "'" WScript.Quit End If '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' MsgBox "ApplyMinimumThreshold: " & SvVar.Properties.Data.ApplyMinimumThreshold SvVar.Properties.Data.ApplyMinimumThreshold = False MsgBox "ApplyMinimumThreshold: " & SvVar.Properties.Data.ApplyMinimumThreshold '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' SvVar.Properties.Data.ApplyMinimumThreshold = True MsgBox "MinimumThreshold: " & SvVar.Properties.Data.MinimumThreshold SvVar.Properties.Data.MinimumThreshold = -10.00 MsgBox "MinimumThreshold: " & SvVar.Properties.Data.MinimumThreshold |
|
(read-write) double MinimumThreshold SummaryAccess or change the value for Minimum threshold. ParametersNone ResultA dB value. ExampleMsgBox "MinimumThreshold: " & AVariable.Properties.Data.MinimumThreshold AVariable.Properties.Data.MinimumThreshold = -70.0 |
|
(read-write) double MinimumTsThreshold SummaryAccess or change the value for Minimum TS threshold. ParametersNone ResultA dB value. ExampleMsgBox "MinimumTsThreshold: " & AVariable.Properties.Data.MinimumTsThreshold AVariable.Properties.Data.MinimumTsThreshold = -50.0 |
|
(read-write) double MinimumTsThresholdOffset SummaryAccess or change the value for Calibration difference offset: under Minimum TS threshold. ParametersNone ResultA dB value. ExampleMsgBox "MinimumTsThresholdOffset: " & AVariable.Properties.Data.MinimumTsThresholdOffset AVariable.Properties.Data.MinimumTsThresholdOffset = 2.5 |
|
(read-write) string MaximumThresholdedValuesSetTo SummaryAccess or change the value for Set values set to: under Maximum threshold. The setting values are:
ParametersNone ResultA valid string under this setting. ExampleMsgBox "MaximumThresholdedValuesSetTo: " & AVariable.Properties.Data.MaximumThresholdedValuesSetTo AVariable.Properties.Data.MaximumThresholdedValuesSetTo = "No data" |
|
(read-write) double TimeVariedThresholdSvAt1m SummaryAccess or change the value for Sv at 1m: under Time varied threshold. ParametersNone ResultA dB value. ExampleMsgBox "TimeVariedThresholdSvAt1m: " & AVariable.Properties.Data.TimeVariedThresholdSvAt1m AVariable.Properties.Data.TimeVariedThresholdSvAt1m = -110.50 |