Consulta basica

[pablito_f]

Hola
Tengo una consulta bastante sencilla
En el siguiente codigo quisiera poder resumir la cantidad de case, usando uno solo, ya que se repite la misma variable.
Hay alguna funcion "or" que pueda colocar en un mismo case
(algo como case "1" or "2" or "3" or"4")??

Select Case (Day(Now))
Case "1"
imagen="2.gif"
Case "2"
imagen="2.gif"
Case "3"
imagen="2.gif"
Case "4"
imagen="2.gif"
Case else
imagen="1.gif"
End Select

Gracias, Pablo