contagem em blocos

Pessoal preciso de ajuda na geração de um txt.
Preciso que quando meu código gere  o arquivo ele conte a quantidade de linha em cada bloco e adicionei essa regra no final de cada bloco

|0990|quantidade linha|.

O meu bloco no txt chama: Bloco 0, Bloco T e Bloco V como o arquivo txt abaixo.
Então um exemplo: bloco T ele terá |T| mais um numero aleatório com caracteres indefinido, ficando assim |T001|, |T0540| e assim para o demais, mais sempre amarrando o bloco com o primeiro caractere depois do pipe|
 
Como faço ele puxar essa informações e gera em txt através de vba Acccess
 
 
|0000| |01042011|31122011|
|0000|0|
|0990|3|
 
|T001|0|
|T0540|01042011|01|
|T0540|01042011|01|
|T0540|01042011|01|
|T0540|01042011|01|
|T0540|01042011|01|
|T0541|10|||
|T0540|01042011|
|T0540|01042011|
|T0541|10|||
|0990|11|
 
|V001|0|
|V0540|01042011|01|
|V0540|01042011|01|
|V0540|01042011|01|
|0990|05|

Não consegui entender direito. Poderia acrescentar mais fermento na explicação?