[vic_ia]

hola...

desconozco VB, pero creo tu "traslado" de la función es correcta ...

tal vez si pusieras parte del codigo desde donde la llamas (incluyendo las variables que asignas a la llamada) podriamos ver si es por ahi donde esta la falla...

saludos...