VB: asignar valores en una funcion.

[guif]

Quiero crear una funcion para que me cambie unos valores que recojo de una base de datos SQL.
El motivo es porque las tablas muestran numeros y estos los quiero pasar a Lentras.
Unos de los datos son:

1 = INFORMATICA
2 = ALMACENES
3 = MATERIAL
4 = ALUMNOS
5 = PROFESORES

Como lo hago?

[GeoAvila]

Iniciado por guif

Quiero crear una funcion para que me cambie unos valores que recojo de una base de datos SQL.
El motivo es porque las tablas muestran numeros y estos los quiero pasar a Lentras.
Unos de los datos son:

1 = INFORMATICA
2 = ALMACENES
3 = MATERIAL
4 = ALUMNOS
5 = PROFESORES

Como lo hago?

esto es más de base de datos.. lo podes hacer con un case when

es decir..

select case when valor = 1 then 'INFORMATICA'
ELSE
case when valor 2 then 'ALMACENES'
ELSE
** Y ASI SUCESIVAMENTE PARA TODAS LAS opciones..
END
END


nos vemos..