Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Как сравнить время??? Добавлено: 20.11.05 10:48  

Автор вопроса:  KEP
Люди добрые помогите!.

Нужно чтобы к примеру


С 03.00 до 08.00 Label1 = "10 руб."
С 08.00 до 15.00 Label1 = "20 руб."
С 15.00 до 03.00 Label1 = "25 руб."

Как сравнить промижуток времини.
Очень нужно.

Ответить

  Ответы Всего ответов: 6  

Номер ответа: 1
Автор ответа:
 PeterS



Вопросов: 24
Ответов: 109
 Профиль | | #1 Добавлено: 20.11.05 11:39
If Time > #3:00:00 AM# And Time < #8:00:00 AM# Then Label1 = "10 руб."
If Time > #8:00:00 AM# And Time < #3:00:00 PM# Then Label1 = "20 руб."
If Time > #3:00:00 PM# And Time < #3:00:00 AM# Then Label1 = "25 руб."

Ответить

Номер ответа: 2
Автор ответа:
 KEP



Вопросов: 44
Ответов: 119
 Профиль | | #2 Добавлено: 20.11.05 12:27
Большое спасибо!!!!

Ответить

Номер ответа: 3
Автор ответа:
 AgentFire



ICQ: 192496851 

Вопросов: 75
Ответов: 3178
 Профиль | | #3 Добавлено: 20.11.05 12:30
Нее, не так!
If Time > "3:00:00 AM" And Time < "8:00:00 AM" Then Label1 = "10 руб."
If Time > "8:00:00 AM" And Time < "3:00:00 PM" Then Label1 = "20 руб."
If Time > "3:00:00 PM" And Time < "3:00:00 AM" Then Label1 = "25 руб."
у меня в VB решетка не катит. У других тоже может не покатить ;)

Ответить

Номер ответа: 4
Автор ответа:
 KEP



Вопросов: 44
Ответов: 119
 Профиль | | #4 Добавлено: 20.11.05 15:35
Да точно с решоткой не катит!, большое спасибо за помощь!

Ответить

Номер ответа: 5
Автор ответа:
 Barsik



Разработчик Offline Client

ICQ: 343368641 

Вопросов: 17
Ответов: 686
 Web-сайт: barsik.newmail.ru
 Профиль | | #5
Добавлено: 20.11.05 20:08
2PeterS:
решетка некатит однозначно! да и зачем АМ и РМ?

Ответить

Номер ответа: 6
Автор ответа:
 Sacred Phoenix



ICQ: 304238252 

Вопросов: 52
Ответов: 927
 Профиль | | #6 Добавлено: 20.11.05 22:00
А можно так:

Select Case True
   Case Time > "3:00:00" And Time < "8:00:00": Label1 = "10 руб."
   Case Time > "8:00:00" And Time < "15:00:00": Label1 = "20 руб."
   Case Time > "15:00:00" And Time < "3:00:00": Label1 = "25 руб."
End Select

Ведь тогда условие проверяется один раз. Ерунда, но нужно привыкать

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам