powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / парочка маленьких вопросиков..
5 сообщений из 5, страница 1 из 1
парочка маленьких вопросиков..
    #32872183
Доброго дня всем!!! Поскажите, пожалуйста, в чем дело:

1) lab1(1).text= #9:30:00 AM# ....

Do Until rs.EOF
If rs.Fields("Start_Time") <= lab1(i) then...
...
Loop

Поле Start_Time в таблице - Дата. В VBA воспринимает строку, а в VB.NET - нет. Пишит, что оператор <= не применим здесь.

2) Надо узнать, является ли цвет контрола, к примеру, красным?
If btnroom1(i).BackColor.Red then..
ругается..

Буду признательна любой подсказке..
...
Рейтинг: 0 / 0
парочка маленьких вопросиков..
    #32873196
Фотография Лиман Артём
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1) с датами не так все просто
как вариант, может подойдет так?:
Код: plaintext
1.
If ctype(rs.Fields("Start_Time"), Date).Ticks <=Date.Parse(lab1(i).Text).Tick

2) тут попроще все
Код: plaintext
1.
if control.BackColor.Equals(Color.Red) then ...
...
Рейтинг: 0 / 0
парочка маленьких вопросиков..
    #32873770
Артем, спасибо, со вторым вопросом всё в порядке, а вот первый никак не хочет разрешаться..
Дело в том, что rs.Fields() vb.net никак не хочет конвертировать ни в дату, ни в стринг, ни во что другое тоже.. - говорит ошибку :(
...
Рейтинг: 0 / 0
парочка маленьких вопросиков..
    #32874401
Фотография Лиман Артём
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда немного поясни что такое rs, а лучше всего приведи нормальную часть кода
...
Рейтинг: 0 / 0
парочка маленьких вопросиков..
    #32874517
Alexey Kudinov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если rs - это ADODB.Recordset, то попробуйте
конвертировать не
rs.Fields("Start_Time"),

а
rs.Fields("Start_Time").Value
или даже
rs.Fields("Start_Time").Value.ToString()

Второй вариант нужен если стоит Option Strict On

PS: советую переходить на Ado.Net, раз уж занялись VB.Net
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / парочка маленьких вопросиков..
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]