A
André Almeida Maldonado
Hy Guys.. I'm Trying to write a class (clasliga.vb), but I'M receiving this
message from compiler:
vbc: error BC30420: 'Sub Main' was not found in 'ClasLiga'
Please tell me what is wrong...
This is my code:
Public Class Ligacoes
Private sLigaAten as String
Private sLigaDest as String
Private sLigaReme as String
Private sLigaTele as String
Private sLigaAssu as String
Property LigaAten() As String
Get
Return sLigaAten
End Get
Set(ByVal sNome As String)
sLigaAten = sNome
End Set
End Property
Property LigaDest() As String
Get
Return sLigaDest
End Get
Set(ByVal sNome As String)
sLigaDest = sNome
End Set
End Property
Property LigaReme() As String
Get
Return sLigaReme
End Get
Set(ByVal sNome As String)
sLigaReme = sNome
End Set
End Property
Property LigaTele() As String
Get
Return sLigaTele
End Get
Set(ByVal sNome As String)
sLigaTele = sNome
End Set
End Property
Property LigaAssu() As String
Get
Return sLigaAssu
End Get
Set(ByVal sNome As String)
sLigaAssu = sNome
End Set
End Property
End Class
message from compiler:
vbc: error BC30420: 'Sub Main' was not found in 'ClasLiga'
Please tell me what is wrong...
This is my code:
Public Class Ligacoes
Private sLigaAten as String
Private sLigaDest as String
Private sLigaReme as String
Private sLigaTele as String
Private sLigaAssu as String
Property LigaAten() As String
Get
Return sLigaAten
End Get
Set(ByVal sNome As String)
sLigaAten = sNome
End Set
End Property
Property LigaDest() As String
Get
Return sLigaDest
End Get
Set(ByVal sNome As String)
sLigaDest = sNome
End Set
End Property
Property LigaReme() As String
Get
Return sLigaReme
End Get
Set(ByVal sNome As String)
sLigaReme = sNome
End Set
End Property
Property LigaTele() As String
Get
Return sLigaTele
End Get
Set(ByVal sNome As String)
sLigaTele = sNome
End Set
End Property
Property LigaAssu() As String
Get
Return sLigaAssu
End Get
Set(ByVal sNome As String)
sLigaAssu = sNome
End Set
End Property
End Class