MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Variável com valores múltiplos

    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 534
    Registrado : 20/01/2013

    [Resolvido]Variável com valores múltiplos Empty [Resolvido]Variável com valores múltiplos

    Mensagem  João Ricardo 30/3/2014, 23:13

    Olá pessoal!!   cheers 

     Question   Question  É possível criar uma variável e atribuir a ela diversos valores, com separadores, para depois poder usar na instrução if ... then ... else?  Crying or Very sad   Crying or Very sad 

    O que pretendo é criar uma variável onde eu possa atribuir as séries dos alunos da escola (6º A, 6º B, 7º A, 7º B, ..., 3º MB) e depois fazer uma comparação:

    if strSerie = (aqui entraria a variável) then
    msgBox "blablabla"
    else

    Eu já pesquisei sobre matrizes, mas, até onde eu compreendi, daria um conjunto de 14 posições a serem declaradas (de 6º A ao 3º MB), mais outras 12 posições (Ed. Inf. ao 5º B) para o outro grupo de alunos.


     Very Happy Laughing Razz affraid Neutral Rolling Eyes
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3877
    Registrado : 04/04/2010

    [Resolvido]Variável com valores múltiplos Empty Re: [Resolvido]Variável com valores múltiplos

    Mensagem  Avelino Sampaio 31/3/2014, 07:48

    Olá!

    Bom, vc pode colocar a sequencia em uma variavel simples e então utilizar a função Instr() para localizar.  Exemplo:

    dim strLista$
    strlista = "6º A, 6º B, 7º A, 7º B, ..., 3º MB"

    if instr(strlista,"7º A")>0 then
    'a 7º A está na lista
    end if


    Ou vc pode utilizar a função split()

    dim k, j as byte
    k = split("6º A, 6º B, 7º A, 7º B, ..., 3º MB",",")
    for j = 0 to uBound(k)
      if k(j) = "7º A" then
         'a 7º A está na lista
         exit for
      end if
    next


    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 534
    Registrado : 20/01/2013

    [Resolvido]Variável com valores múltiplos Empty Re: [Resolvido]Variável com valores múltiplos

    Mensagem  João Ricardo 2/4/2014, 15:20

    Grande Avelino!!!
    Grato pelo retorno e desculpas pela demora, tá meio corrido aqui!!!
    Funcionou perfeitamente.

    Conteúdo patrocinado


    [Resolvido]Variável com valores múltiplos Empty Re: [Resolvido]Variável com valores múltiplos

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 01:08