• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

jinja

[Abandonada] Usar classes em VB6 e VBA

3 mensagens neste tópico

Private Type modCreate 'tipo de dados
   NomeDoModulo As String
   EntidadesPorChegada As Integer
   NumMaxDeChegadas As Integer
   TmpAntesCriarPrimeiraEntidade As Long
        'Tempo entre chegadas (TEC)
   TECtipo As String
   TECvalor As Long
   TECunidade As String
End Type

Dim criaUmMod As modCreate ' variavel do tipo de dados criado

'propriedades da classe
Public Property Get oModCreate_get() As Variant
   oModCreate = criaUmMod
End Property

Public Property Let oModCreate_let(vNovoMod As Variant)
   criaUmMod.EntidadesPorChegada = vNovoMod.EntidadesPorChegada
   criaUmMod.NomeDoModulo = vNovoMod.NomeDoModulo
   criaUmMod.NumMaxDeChegadas = vNovoMod.NumMaxDeChegadas
   criaUmMod.TmpAntesCriarPrimeiraEntidade = vNovoMod.TmpAntesCriarPrimeiraEntidade
   criaUmMod.TECtipo = vNovoMod.TECtipo
   criaUmMod.TECunidade = vNovoMod.TECunidade
   criaUmMod.TECvalor = vNovoMod.TECvalor
End Property

Não funciona.. como usar um tipo de dados numa classe.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não funciona.. como usar um tipo de dados numa classe.

Olá jinja,

O que é que não funciona ? Não entendo qual é o problema.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Por falta de informação do utilizador e por não existirem respostas aceitáveis à pergunta efectuada, esta questão foi marcada como abandonada.

Jorge Paulino

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora