diff --git a/AdvancedAuxiliaryInterfaces/Signals.vb b/AdvancedAuxiliaryInterfaces/Signals.vb index 1f75f8db91b80ae5f7c73cf7f1b03f160188510d..a13c40503cf0f046ceead0010ff6792ed4997378 100644 --- a/AdvancedAuxiliaryInterfaces/Signals.vb +++ b/AdvancedAuxiliaryInterfaces/Signals.vb @@ -35,8 +35,6 @@ Implements ISignals _smartElectrics=value - Debug.WriteLine(String.Format("SmartElectrics {0}", _smartElectrics)) - End Set end property diff --git a/VECTOAux/VectoAuxiliaries/AuxiliaryConfig.vb b/VECTOAux/VectoAuxiliaries/AuxiliaryConfig.vb index 3345d1b001ad534d6db07e6c8f7241a08036ae9a..75b6657780c46119cf7de0937ac05a6b53d3b9e1 100644 --- a/VECTOAux/VectoAuxiliaries/AuxiliaryConfig.vb +++ b/VECTOAux/VectoAuxiliaries/AuxiliaryConfig.vb @@ -25,9 +25,6 @@ imports VectoAuxiliaries Public Class AuxiliaryConfig Implements IAuxiliaryConfig - - - 'Vecto Public Property VectoInputs As IVectoInputs implements IAuxiliaryConfig.VectoInputs diff --git a/VECTOAux/VectoAuxiliaries/DownstreamModules/M8.vb b/VECTOAux/VectoAuxiliaries/DownstreamModules/M8.vb index a4e8158d9307399a20a7e33f0e60eeb333be4992..c34cf2d8d8fa10bd4f0a9150a82a9e99f4aa8d1c 100644 --- a/VECTOAux/VectoAuxiliaries/DownstreamModules/M8.vb +++ b/VECTOAux/VectoAuxiliaries/DownstreamModules/M8.vb @@ -86,7 +86,6 @@ End Property #End Region 'Class Outputs - ' 'OUT1 Public ReadOnly Property AuxPowerAtCrankFromElectricalHVACAndPneumaticsAncillaries As Single Implements IM8.AuxPowerAtCrankFromElectricalHVACAndPneumaticsAncillaries Get diff --git a/VECTOAux/VectoAuxiliaries/UI/FB_Global.vb b/VECTOAux/VectoAuxiliaries/UI/FB_Global.vb index 38958b1f4bda31f6ca404aa1f5933e14c8da2e89..0bc09407f0159eee2b83e751682612e37fa1a014 100644 --- a/VECTOAux/VectoAuxiliaries/UI/FB_Global.vb +++ b/VECTOAux/VectoAuxiliaries/UI/FB_Global.vb @@ -42,9 +42,9 @@ Module FB_Global Public fbVMOD As cFileBrowser 'Paths - private MyAppPath = My.Application.Info.DirectoryPath & "\" - private MyConfPath = MyAppPath & "Config\" - private MyDeclPath = MyAppPath & "Declaration\" + private MyAppPath As String = My.Application.Info.DirectoryPath & "\" + private MyConfPath As String = MyAppPath & "Config\" + private MyDeclPath As String = MyAppPath & "Declaration\" 'private FB_FilHisDir = MyConfPath & "FileHistory\" private HomePath As String = "<HOME>" private JobPath As String = "<JOBPATH>"