Уместней цитировать другого Толстого, который "Буратино" написал.
Буратин в сети много. Может кто и захочет зарыть свои денюжки на вашем поле чудес...

Строить цепочку из IF ов дурной тон однако. для таких целей есть оператор Select Case. Это по поводу функции IncludeSearch() .