Как правильно работать с переменными типа date сравнивая их?

Программирование на Visual Basic for Applications
Evaldor
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 17.10.2005 (Пн) 15:55

Как правильно работать с переменными типа date сравнивая их?

Сообщение Evaldor » 31.05.2006 (Ср) 10:21

Проблема такая,

dim d as date
dim f as date

d = xx.xx.xx ' присваевается корректное значение даты
f = xx.xx.xx ' присваевается корректное значение даты

If d <= f then

...................

end if


Так вот, дату большую с меньшей он не сравнивает =( как сделать так, чтобы отсеивались все даты меньше или равные установленной?
Делай что должеи и будь что будет!

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 31.05.2006 (Ср) 10:30

Код: Выделить всё
Sub test()
    Dim d As Date, f As Date
   
    d = #5/30/2006#
    f = #5/31/2006#
   
    Debug.Print d > f
    Debug.Print f > d
   
   
End Sub


Все прекрасно работает.
Быть... или не быть. Вот. В чём вопрос?

Evaldor
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 17.10.2005 (Пн) 15:55

Сообщение Evaldor » 31.05.2006 (Ср) 10:43

а что есть debug.print ?


ЗЫ хехе, моя подпись звучит как ответ на твою подпись =)))
Делай что должеи и будь что будет!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.05.2006 (Ср) 10:45

Ну нет в vba debug.print, ну да.
Ну и чего?
По контексту и по названию метода не понятно разве?
Ну msgbox поставь.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Evaldor
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 17.10.2005 (Пн) 15:55

Сообщение Evaldor » 31.05.2006 (Ср) 10:56

блин... почему -то не работает сравнение >= или <=

а только больше или меньше


ЗЫ всем спасибо огромное, пошол работать дальше.
Делай что должеи и будь что будет!

$€rg
Обычный пользователь
Обычный пользователь
 
Сообщения: 99
Зарегистрирован: 11.01.2006 (Ср) 10:15
Откуда: Санкт-Петербург

Сообщение $€rg » 31.05.2006 (Ср) 11:12

if d<d2 or d=d2 then
процесс печатания программного кода укрепляет моральные устои С. Каммингс VBA4Dummies
:study:

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 31.05.2006 (Ср) 11:34

GSerg писал(а):Ну нет в vba debug.print, ну да.

Как это нет?
Lasciate ogni speranza, voi ch'entrate.

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.05.2006 (Ср) 11:35

Ну вот, сбивают меня опять...
debug.? есть, debug.assert нет...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 31.05.2006 (Ср) 12:49

GSerg писал(а):Ну вот, сбивают меня опять...
debug.? есть, debug.assert нет...

Как это нет?
(только что заглянул в Word 2003)
Изображение

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.05.2006 (Ср) 12:53

Значит в 2003 он есть, а у меня нет...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

MeMBus
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 450
Зарегистрирован: 23.02.2005 (Ср) 7:03
Откуда: Из леса...

Сообщение MeMBus » 31.05.2006 (Ср) 13:42

GSerg писал(а):Значит в 2003 он есть, а у меня нет...

Если есть "immediate", должен быть и дебаг...
Бороться и искать, найти и перепрятать!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.05.2006 (Ср) 13:45

Мы уже про assert.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 31.05.2006 (Ср) 14:05

И в 2000 есть
Весь мир матрица, а мы в нем потоки байтов!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.05.2006 (Ср) 14:26

А в 97 нет.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 31.05.2006 (Ср) 14:44

Ну ты сравнил :)
Там скорее VB5, чем VB6. Assert и в VB5 не было.
Lasciate ogni speranza, voi ch'entrate.


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 44

    TopList