Hola amigos

Mi duda es si hay alguna forma de evitar esto:

Dim PatataChunga as String
 
....
 
If PatataChunga ="Chunga" or PatataChunga = "NoChunga" or PatataChunga = "Mr.Potato" then
....
 
End if
 

Ya que esto poner "Chunga" or "NoChunga" no funciona.

Perfecto gracias