Не правильно работает условная компиляция в excel XP

[Vitaly1]

dim n as long
n =val(Application.Version)
#if n>8 then
userform1.show
#else
userform1.show 0
#end if

В 97 офисе все правилно определяется, а в XP c точность до наоборот, почему

[alibek]

Советую убрать условную компиляцию и оставить обычную. Директивы условной компиляции бессмысленно применять в зависимости от значений переменных, которые вычисляются в рантайме; следует использовать только константы.

[Vitaly1]

Убрать условную компиляцию можно только в том случаи, если запускать форму с параметром Show 0 из другой процедуры, иначе буде ошибка в 97 оффисе "не верное число параметров"!

[alibek]

Если условие, указанное в IF не выполняется, то этот фрагмент кода никогда не получит управление. И ошибок, соответственно, тоже не будет. Правда у меня нет Office 97, возможно я и ошибаюсь.
В крайнем случае, можно объявить uf As Variant, присвоить Set uf = userform1 и вызывать uf.Show или uf.Show 0 в зависимости от условия.

[GSerg]

Не в крайнем, а в единственно возможном (ну или ещё как - главное перевести в late binding), и не variant, а object

[Vitaly1]

Если условие, указанное в IF не выполняется, то этот фрагмент кода никогда не получит управление. И ошибок, соответственно, тоже не будет. Правда у меня нет Office 97, возможно я и ошибаюсь

Тем не мененее, при использовании метода Show c параметром, внутри оператора условия, компилируется, даже в том случаи, если данное условие ложно и выдается ошибка!