ник: Explorer
а может это CheckLinksBaseName(BaseName) не принимает значения True или с аргументом BaseName косяк - по такому короткому куску сложно судить
PS
значем вы все эти громоздкие конструкции с ифами и элсами громоздите
Me.Visible = Not CheckLinksBaseName(BaseName)
ЗЫ added
"громоздкие конструкции громоздите" - это я что-то громоздкое загромоздил... ну да ладно - править не буду