permitir solo numeros, letras y estos caracteres, espacio, -,.,#

[lexus]

hola
quiero depurar un poco el ingreso de los datos en ciertos campos

existe alguna forma de evitar que la gente me guarde algunos datos?
solo kiero permitir ke me ingresen
numeros, letras y estos caracteres, espacio, -,.,#
de resto cuando alguien coloque cualquier caracter diferente a esos anteriores ke lo reemplace por nada
yo lo estaba haciendo asi?
nombre = Replace(nombre, "@", "")
nombre = Replace(nombre, "%", "")
nombre = Replace(nombre, "*", "")

pero como son tantos casos me keda muy largo.
existe alguna otra forma con expresiones regulares o no se algo diferente?
gracias.