Quantidade de Ítens suportados em ListBox adicionado valores (Value List)

Olá amigos.
Trabalho com formulários desacoplados a algum tempo. Tenho tido bastante êxito em meus projetos (apesar da demora que demanda em se trabalhar assim).
Pois bem, uso casualmente ListView ou formulários no modo folha de dados acoplado a tabelas temporárias no Front-End. Criar, popular tabelas, acoplálas em tempo de execusão, gasta bastante tempo de meu serviço.
Afim de ganhar tempo e desempenho, fiz uns testes usando ListBox (Caixa de Listagem) com o Tipo de origem da linha = Lista de valores (RowSourceType = "Value List").

A triste conclusão que cheguei é que uma ListBox com 5 colunas, adicionando valores, apenas comporta 538 itens (linhas)... É uma tristeza...
O pior é que no Access 2010 (salvo outras versões), se minha tabela possuir 5000 registros, e for feito um loop para adicionar os registros,
tudo é realizado normalmente, não apresenta erro algum, mas apenas serão adicionadas 538 linhas na ListBox...

Cuidado amigo, para você não estar pensando que seus 5000 registros estão sendo adicionados a sua ListBox (adicionado valores), pois não estão, apesar de não apresentar erro algum...

Como teste, criei um pequeno aplicativo que simula situações semelhante para você mesmo comprovar.
Baixe o anexo TesteListBoxValueList.mdb.

Basicamente o aplicativo trabalha assim:

Quantidade de Itens: Aqui você informa a quantidade de itens que deseja adicionar. Ponha um valor maior que 538, por exemplo: 1000
Quantidade de laços: Informa a quantidade de Loops que foi dado para adicionar os ítens. (observe, que ele irá dar todos os laços que você definiu, sem erros.
Botão Gerar: Inicia a adição de valores a ListBox atraves de um Loop baseado na quantidade que você especificou.
Botão Limpar: Limpa a ListBox e os resultados.
Botão Contar: Conta efetivamente quantos itens foram adicionado. Veja o resultado abaixo.


Espero que ajude.

Eu falo sobre isso em uns experimentos para o qual criei um exemplo e está nesse tópico e tambem um vídeo meio fuleiro no youtube, hehehe.

Verdade criquio, acabei que esquecendo do seu exemplo.  
Eu acho que até tenho o seu exemplo no meu baú por aqui...

Mas é triste termos que recorrer a vínculos para popular eficientenete
uma caixa de listagem... Tenho que manter ListView e enfrentar alguns
problemas que os Activex ocasionam...

O melhor do Access está no trabalho com vínculos.

Se eu não me engano está limitado em 2048 caracteres.

Para contornar isso use o recordset para popular a listbox.  Veja exemplo de uma função:

Public Sub fncCarregaLista(strsql As String, ctl As Control)
Call fncAbreConexao
Set rs.ActiveConnection = cnn
rs.CursorLocation = adUseClient
rs.CursorType = adOpenKeyset
rs.LockType = adLockReadOnly
rs.Open strsql
Set ctl.Recordset= rs
rs.ActiveConnection = Nothing
End Sub

Segue arquivo exemplo.

Sucesso!

Muito bom Avelino! Achei interessante a maneira como usou para
popular o ListBox. Mais uma alternativa para meu trabalho! 

Boa informação Marcelo.

falando em Lista de valores este exemplo que fiz:

http://maximoaccess.forumeiros.com/t15348-carregar-lisbox-em-back-end-desvinculado-especificando-nome-da-tabela-campos-e-tamanho-de-colunas

Cumprimentos.

Que por sinal é uma ótima contribuição PILOTO! Dessa forma poderemos
padronizar o carregamento das ListBox em uma função
já pronta!

Obrigado por compartilhar!