AJUDA COMENTARIO

GUNS 07/09/2009 06:36:14
#322187
Pessoal tenho uma duvida simples
utilizo este cs que na minha aplicação porem nao fui eu que desenvolvi, estou precisando comentar este mas nao consegui entender o ele faz mesmo depurando passo a passo.
poderiam me ajudar, dei uma olhada na net mas nao encontrei nada..

Obrigado,

Public Property Let List(ByVal index As Integer, ByVal sItem As String)
m_List(index) = sItem
End Property

Public Property Get List(ByVal index As Integer) As String
List = m_List(index)
End Property

Public Property Let Checked(ByVal index As Integer, ByVal pItem As Boolean)
m_Checked(index) = pItem
End Property

Public Property Get Checked(ByVal index As Integer) As Boolean
Checked = m_Checked(index)
End Property

Public Property Let CompName(ByVal index As Integer, ByVal pItem As String)
m_CompName(index) = pItem
End Property

Public Property Get CompName(ByVal index As Integer) As String
CompName = m_CompName(index)
End Property

Public Property Let Email(ByVal index As Integer, ByVal sItem As String)
m_Email(index) = sItem
End Property

Public Property Get Email(ByVal index As Integer) As String
Email = m_Email(index)
End Property
Public Sub RedimEmail()
On Error Resume Next
ReDim m_Email(0 To EmailCount - 1)
End Sub

Public Sub RedimList()
On Error Resume Next
ReDim m_List(0 To ListCount - 1)
End Sub

Public Sub RedimChecked()
On Error Resume Next
ReDim m_Checked(0 To ListCount - 1)
End Sub

Public Sub RedimCompName()
On Error Resume Next
ReDim m_CompName(0 To ListCount - 1)
End Sub

Public Sub InitList(ByVal Count As Integer)
ListCount = Count
Call RedimList
Call RedimChecked
Call RedimCompName
End Sub

Public Sub InitEmail(ByVal Count As Integer)
EmailCount = Count
Call RedimEmail
End Sub
EMERSONTADEU 07/09/2009 08:04:43
#322191
Que coisa estranha :

Citação:

....utilizo este cLs que na minha aplicação porem nao fui eu que desenvolvi, estou precisando comentar este mas nao consegui entender o ele faz mesmo depurando passo a passo...



Como pode alguém usar algo em sua aplicação que não sabe o que está fazendo ?

Amigo, não há o que comentar ae, esta classe tem os métodos e propriedades que fazem exatamente o que dizem ... os comentários talvez onde vc prepara os dados para não mandar algo errado ...

O que que vc quer comentar na propriedade CompName ? manda um integer e uma string que ela adiciona no array na posição que vc determinar ... não seria seu problema o conceito de OOP ao invés de comentátrios ?

Pega uma apostila e estuda isto que em 1 dia vc já está craque ... não sei, me pareceu que vc ta tentando tapar o sol com a peneira e justificar que seu problema é específico a esta classe.

No VBM mesmo tem um montão de material disponível que trata sobre módulos de classe.

Obs ... cs é utilizado para arquivos C# (CSharp) no dotnet, em VB utilize cls que é o que fica no arquivo.
GUNS 07/09/2009 08:19:19
#322194
EMERSONTADEU,

Citação:

me pareceu que vc ta tentando tapar o sol com a peneira



Citação:

Como pode alguém usar algo em sua aplicação que não sabe o que está fazendo ?



Referente a coloção acima, gostaria de saber, se voce nunca achou parte de codigo em algum lugar e usou, e depois correu atrás para ver efetivamente suas funções.

Bom, acredito que você me entendeu errado. Minha intenção não é tapar o sol com a peneira.
De qualquer forma agradeço seu o interesse.
Tópico encerrado , respostas não são mais permitidas
Voltar