Получение целочисленных значений
Добавлено: 12 Июль 2006, 13:28
Для получения последней цифры года использовал несколько лет последовательность:
Y3# = Year(Today())/10 ! Получаю 1-ые три цифры года
Y4# = Year(Today()) - (Y3# * 10) ! Получаю последнюю цифру года
После получения новой машины под Win XP оператор
Y3# = Year(Today())/10 вместо значения 200 стал устойчиво выдавать
значение 201
Y3# = Int(Year(Today())/10) также выдает значение 201
Явно прописал, что Y3 Long - не помогает
Пришлось делать через строковую переменную Y3 String(3) и далее
Y3 = Format(Year(Today())/10,@s3)
Y3# = Y3 ! дает искомое 200 и далее
Y4# = Year(Today()) - (Y3# * 10) ! Получаю последнюю цифру года
Кто встречался с подобным казусом - почему Int стала работать не так как прежде
Спасибо
Y3# = Year(Today())/10 ! Получаю 1-ые три цифры года
Y4# = Year(Today()) - (Y3# * 10) ! Получаю последнюю цифру года
После получения новой машины под Win XP оператор
Y3# = Year(Today())/10 вместо значения 200 стал устойчиво выдавать
значение 201
Y3# = Int(Year(Today())/10) также выдает значение 201
Явно прописал, что Y3 Long - не помогает
Пришлось делать через строковую переменную Y3 String(3) и далее
Y3 = Format(Year(Today())/10,@s3)
Y3# = Y3 ! дает искомое 200 и далее
Y4# = Year(Today()) - (Y3# * 10) ! Получаю последнюю цифру года
Кто встречался с подобным казусом - почему Int стала работать не так как прежде
Спасибо