1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
| Public Class Failures
Public AtaNumber As Integer
Public SystemNumber As Integer
Public SystemName As String
Public SubsystemName As String
Public SubsystemNumber As String
Public SystemLogo As ValueType
Public EcamFailure As String
Public StatusType As Integer
Public StatusSingle As Object
Public StatusDouble As Object
Public FlagFailure As Integer
Property AtaNum() As Integer
Get
Return AtaNumber
End Get
Set(ByVal value As Integer)
AtaNumber = value
End Set
End Property
Property SystemIcon() As ValueType
Get
Return SystemLogo
End Get
Set(ByVal value As ValueType)
SystemLogo = value
End Set
End Property
Property StatusTyp() As Integer
Get
Return StatusType
End Get
Set(ByVal value As Integer)
StatusType = value
End Set
End Property
Property EcamFailName() As String
Get
Return SystemName
End Get
Set(ByVal value As String)
SystemName = value
End Set
End Property
End Class |
Partager