[Resolvido]Somar quantidade de textbox com mesmo texto

Boa tarde feras.
Acabei de resovler uma e veio outa duvida.
Tenho um relatório tipo calendário que é feito de 365 textbox com siglas indicando de é dia letivo, sábados, domingos, faltas, etc.

Eu preciso que some todos os que não são "S" (Sábado) e "D" (Domingo")

Os textbox são nomeados assim;

txtJan1 (1º de janeiro)
txtOut4 (4 de outubro)

e por aí vai.

Alguma dica?

Abrasss!!!

Há na sala de repositório exemplo de feriados brasileiros do Alexandre neves... pode aplicar em relação a tabela ou caixas texto para verificar se S ou D e somar os que não são...
Podes aplicar isso no evento ao imprimir ou Ao pintar da secção detalhes.


Cumprimentos.

Já tinha visto esse exemplo piloto, mas não é isso que quero.

Quero a função que soma quantos dias tem sem os domingos, feriados, sábados e faltas.

Nos dias úteis, os textbox são preenchidos com a letra "C";
Nos sábados "S"
Nos Domingos "D"
Nos feriados "F"

Quero que some todos os que não estão preenchidos com D, S, F.

Para cada funcionário vai dar um resultado, entendeu?

Abrasss!!!

Faça uma consulta agrupada para soma e no criterio desse campo você escreve,

Not In ("F";"S";"D")

Ou, se não quiser consulta, use a função DSum

Podes tambem ir somando isso no evento do próprio relatório, em ao imprimir ou ao pintar...

Aplicando If ou case para C

Dim nCount as Integer
If Me.CaixaTexto =  "C" Then
   nCount = nCount +1
End If

É uma ideia.


Cumprimentos.

Muito grato por todas as dicas Mestres.
Mestre Avelino, já tinha consultado deu tutorial e usei em outras partes do meu BD, porém, achei mais prático o exemplo do Piloto.
Funcionou perfeitamente!

Abrasss!!!

O Fórum agradece o Retorno.