Visual Basic - Visual

Hola amigos... bueno el problema que tengo es que en un formulario hae colocado un listbox y le hago un additem... pero este no funciona, no le adiciona nada..
el codgo es
Do while ...
...
if () then
lst.additem "hola"
doevents
exit do
end if
loop

Gracias