Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не срабатывает корректно код после замены имен полей с "d1" на "d01" / 5 сообщений из 5, страница 1 из 1
25.04.2020, 13:50
    #39951330
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает корректно код после замены имен полей с "d1" на "d01"
Здравствуйте,

В таблице (на форме соответственно) есть поля с именами d1, d2....d30, d31 - код (изменение цвета поля) с ними работает как надо.
Решил поменять имена полей на d01, d02 ....d30, d31 и после этого перестали подкрашиваться поля с d01 до d09, остальные, которые были d10, d11 и т.д. подкрашиваются как положено.

Фрагмент из кода:
Код: vbnet
1.
2.
3.
For Each ctl In Me.Controls
       If ctl.ControlType = acTextBox And ctl.Name = "d" & Day(rs!DateNote) Then
            ctl.BackColor = RGB(214, 225, 242)



Если я меняю "d" на "d0" то подкрашиваться начинают наоборот, d01, d02 и до d09, а остальные перестают.
Пробовал "d00", "d0*" - не получается.

Подскажите, пж, что надо написать или не париться и переименовать заново эти девять полей в d1, d2?...
Мне просто интересно, для развития,так сказать ))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.04.2020, 14:41
    #39951345
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает корректно код после замены имен полей с "d1" на "d01"
kniga,

например так
If ctl.ControlType = acTextBox And ctl.Name = "d" & format(rs!DateNote,"dd") Then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.04.2020, 14:45
    #39951347
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает корректно код после замены имен полей с "d1" на "d01"
ПЕНСИОНЕРКА,

спасибо, все получилось!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.04.2020, 16:28
    #39951367
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает корректно код после замены имен полей с "d1" на "d01"
именно поэтому имя поля "_1"-это текст
а "D" & 01 это как цифра 01,которая аксом преобразуется в 1-а поля с именем D1 у Вас нет
применение же ф-ции Format позволяет оставить 01 текстом "01" "D"+format(rs!DateNote,"dd")="D01"
(повнимательней с текстом и числом-попробуйте создать перекрестный запрос в котором имена столбцов даты и посмотрите как ACCESS их обзывает)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2020, 15:01
    #39951680
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает корректно код после замены имен полей с "d1" на "d01"
sdku,

спасибо за информацию! )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не срабатывает корректно код после замены имен полей с "d1" на "d01" / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 166ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1610129]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 57ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 13ms
total:  166ms
x
x
Закрыть


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