AJUDA COM IDEIA DE COMO FAZER DAR CERTO
Em algumas sheets tinha alguns valores com o sinal de - isso consegui achar e arrumar nao sei se fiz corretamente kkk mais vamos tentando, mais este do cargo to tentando ainda...
KERPLUCK Pode me ajudar a Arrumar este erro dos cargos?
Se mais alguem souber como arrumar esse erro agradeceria pela ajuda...
up...
Você pode fazer uma [Ô]proteção[Ô] de valores nas suas propriedades:
Isso no [Ô]Set[Ô] de cada variável. Isso verifica se é numérico e não é dbnull e só então atribui o valor à variável interna.
If IsNumeric(value) And Not IsDBNull(value) Then _cargo = value
Isso no [Ô]Set[Ô] de cada variável. Isso verifica se é numérico e não é dbnull e só então atribui o valor à variável interna.
KerpLunk seria isso?
Private _cargo As String
Public Property Cargo() As String
Get
Return _cargo
End Get
Set(ByVal value As String)
If IsNumeric(value) And Not IsDBNull(value) Then _cargo = value
End Set
End Property
Private _cargo As String
Public Property Cargo() As String
Get
Return _cargo
End Get
Set(ByVal value As String)
If IsNumeric(value) And Not IsDBNull(value) Then _cargo = value
End Set
End Property
Acho que sim. Não cheguei a testar, mas a idéia é essa. E pra todas as propriedades de todos os objetos. Essa é uma das razões de se usar polimorfismo quando se usa OOP. O tratamento de erro se faz uma só vez e todo o código estará ok.
Quando voce fala pra todas as propriedades de todos os os objetos seria na sequencia abaixo dessa os mesmos tratamento...Ja tentei de todas as formas e todos os tratamentos possiveis, kkk ja to ficando doido kkkk mais sempre me da o mesmo erro quando....
Agora se eu tiro o tratamento que voce passou ai acima da horas apontadas e deixo desta forma...
Private _totalHorasApontadas As Int32
Public Property TotalHorasApontadas() As Int32
Get
Return _totalHorasApontadas
End Get
Set(ByVal value As Int32)
_totalHorasApontadas = value
End Set
End Property
Recebo este erro...
Private _totalHorasApontadas As Int32
Public Property TotalHorasApontadas() As Int32
Get
Return _totalHorasApontadas
End Get
Set(ByVal value As Int32)
_totalHorasApontadas = value
End Set
End Property
Recebo este erro...
No primeiro, era o que eu queria que acontecesse. Ele fez uma procura de apontamentos cujo cargo fosse [Ô]AGENTE.....[Ô]. Não foi encontrado nenhum, logo o objeto [Ô]agente[Ô] ficou [Ô]null[Ô], nesse caso, verifique se o objeto é null antes de adicioná-lo como sub-item
Tópico encerrado , respostas não são mais permitidas