Rotina em 1ms no vb.

[jHuy]

Estou no meio de um projeto e preciso ler e armazenar o bit lido da porta paralela numa variável e numa textbox a cada 1 milisegundo. Porém, não sei porque, meu programa não está conseguindo cumprir este tempo de execução. Quando eu deixo a rotina de leitura de porta (neste meu caso, dum pino) rodar sem dar sleep nenhum, ele consegue fazer esta leitura e arquivamento de bit na variável e no textbox em menos de 200 microsegundos. Mas quando eu uso um sleep(1) ele demora uns quase 200 milisegundos para realizar a rotina. A rotina está rodando como backgroundworker com loop infinito. Eu realmente não sei mais o que fazer para atingir este exato 1 milisegundo (o hardware já está montado e sincronizado para tal).