Изменение цвета в поле формы при совпадении значения поля с аналогичным полем другой

@Braser · Регистрация: 16.03.2013

Author24 — интернет-сервис помощи студентам

Добрый день! Прошу помочь в решении проблемы. Есть задумка подскажите пожалуйста как реализовать. есть некая форма 1, содержащая в столбце некоторые значения А,Б,В,Г,Д....и тд. нужно реализовать механизм следующего действия. При открытии формы 2, у которой всего 1 столбец, в котором есть такие же значения, но не все, например - только"Б" и "Д". Мне нужно, чтобы при открытии формы 2 производилась проверку на наличие таких же значений (БиД) в форме 1 и в форме 1 они бы стали подсвечены. Попробовал так:

Visual Basic

Private Sub Form_Open(Cancel As Integer)
lngYellow = RGB(255, 255, 0)
If Me.Программа = Forms!ГрафикФорма.Программа Then
Forms!ГрафикФорма.Программа.BackColor = lngYellow
Forms!ГрафикФорма.Requery
End If
End Sub

не работает, чего-то не правильно, подскажите как подправить или может есть другой метод, более рациональный.
Спасибо.

@amd48 · 26.02.2020, 14:45

Что-то мне это напоминает банальный фильтр ленточной формы по значениям свободных полей в заголовке формы. Зачем для этого городить кучу дополнительных форм, не понятно. Вообще, при придумывании интерфейса надо стараться свести количество манипуляций пользователя к минимуму. Даже фильтр должен выполняться не нажатием специальной кнопкой, а просто с задержкой в секунду после ввода последнего символа в поле фильтра. То же самое с формами - каждая всплывающая форма, скорее всего, лишняя и может быть или вкладкой на форме или стандартным полем ввода InputBox или просто более информатированным полем, типа кнопки календарика рядом с полем-датой.

@Braser · 27.02.2020, 06:30 **[ТС]**

Сообщение от Capi

Вторую форму удалила. Она не нужна

не открывается почему то, можете перезалить? Пишет не удалось открыть файл как архив

Добавлено через 1 минуту

Сообщение от amd48

Вообще, при придумывании интерфейса надо стараться свести количество манипуляций пользователя к минимуму.

Согласен, но не всегда знания методов такой оптимизации хватает, опыта маловато в некоторых случаях, проще говоря

@Capi · 27.02.2020, 09:53

Сообщение от Braser

не открывается почему то, можете перезалить?

Держите.

@Braser · 27.02.2020, 11:58 **[ТС]**

Спасибо, но немного не то. Упустил одну важную деталь, я ранее писал, а сам пропустил в примере это.
- В источнике формы Ф1 "Заказы" не могут фигурировать.
- В оригинале БД есть 2 таблицы. Одна- Программы. Вторая -Заказы.

"Программы" - содержит только названия программ, поле логическое для выбора и еще некоторые атрибуты.
В таблице "Заказы" есть номера заказов, детали, количество и номер программы в которой они размещены.
Но связи между таблицами нет.

Для Ф1 не подходит источник данных, в котором можно связь между этими таблицами сделать, потому что на форме элементы выбора типа флажок, он же логическое поле перестают работать

примерно так

@Capi · 27.02.2020, 12:12

Сообщение от Braser

В оригинале БД есть 2 таблицы. Одна- Программы. Вторая -Заказы.

А зачем фальшивый пример выложили?
Там только таблица Таблица1, одна на все случаи жизни.

Сообщение от Braser

Но связи между таблицами нет.

Мне это неважно.

Сообщение от Braser

Спасибо, но немного не то

Пеняйте на себя.

@Capi · 27.02.2020, 12:48

Вместо оправданий и лишних эмоций лучше бы исправили свою "невнимательность" и выложили правильный пример.

@Braser · 27.02.2020, 12:50 **[ТС]**

Сегодня, 13:08 [ТС]

Лежит уже

извиняюсь, опять не доделал немного, это тот вариант который самый похожий на правду

@Capi · 27.02.2020, 15:41

Сообщение от Braser

это тот вариант который самый похожий на правду

М-да. Найдите 10 отличий.

В основной базе тоже всё текстовое, да еще с отформатированными до лидирующих нулей числами?

@alvk · 28.02.2020, 02:18

Таблица, форма, два запроса, один неработающий и функция. Что нужно со всем этим делать? Галки ставил, в таблице отображаются. Что ещё?

@Braser · 28.02.2020, 07:57 **[ТС]**

Сообщение от Capi

В основной базе тоже всё текстовое, да еще с отформатированными до лидирующих нулей числами?

прошу понять и простить...

не, в оригинале не все текстовые...
Вот этот механизм, который вы реализовали в примере, это вот самое то что нужно, но я не догоняю, как мне вкрутить правильно функцию в свою базу чтобы она заработала, у меня там в номерах заказов есть и по 2 и 3 и более номеров. не работает она в общем у меня, посмотрите пожалуйста, можно сказать что это почти готовый скелет оригинала, интерфейс и все надо доделывать, прошу сильно за реализацию всяких элементов и процессов не пинать сильно, я все таки не профессионал в области БД, скорее любитель, вот собственно...

@Braser · 28.02.2020, 08:03 **[ТС]**

пс пришлось почикать все сетевые таблицы и кое что еще ... на главной форме, которая открывается первой поле F для ввода номера заказов, только у меня источником в функции запрос выступает, а не таблица.

@Capi · 29.02.2020, 02:30

Сообщение от Braser

поле F

Нет. Оно не было F. Оно иначе называлось. Написать в надписи F - не значит назвать так поле.

Вот теперь оно стало F. И форматировать его значение в выражении к чему?

@Braser · 29.02.2020, 05:50 **[ТС]**

Сообщение от Capi

Нет. Оно не было F. Оно иначе называлось. Написать в надписи F - не значит назвать так поле.

Прошу понять и простить в очередной раз.... Опять банальная невнимательность и спешка. Часто так бывает, что из за спешки допущу какую нибудь ерундовую ошибку и недоумеваю что не так?! Вроде по коду все правильно, а не работает должным образом... начинаешь разбираться, то поле не обозвал как надо, то еще что-нибудь подобное...
Архив открыть не получилось, почему то RAR не хочет открываться у меня, но я согласно вашим замечаниям все подправил в оригинале и заработало все должным образом. За что вам ОГРОМНОЕ ЧЕЛОВЕЧЕСКОЕ СПАСИБО!!!

Добавлено через 8 минут
PS Если вам не трудно, пожалуйста, перезалейте архив, у меня таки не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой, подозреваю, что функция в данном случае должна выглядеть несколько иначе

Добавлено через 19 минут

Сообщение от Braser

у меня таки не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой, подозреваю, что функция в данном случае должна выглядеть несколько иначе

Прошу прощения, не совсем ясно выразился...
Не отображаются на форме цветом программы, для которых в источнике данных функции в поле "НомераЗаказов" указан не один искомый заказ, например ТАЙ00001234 а несколько ТАЙ00001234;ТАЙ00004321;ТАЙ00004132
Т.е. если в поле поиска на форме введем "ТАЙ00001234" и соответсвующее значение в функции возвращает значение ТАЙ00001234 то поле на форме подкрашивается, а если функция возвращает значение "ТАЙ00001234;ТАЙ00004321;ТАЙ00004132" закрашивать не хотит

@Capi · 29.02.2020, 13:35

Сообщение от Braser

почему то RAR не хочет открываться у меня

У меня на ноутбуке более новая версия архиватора.
А на машине - старее.

Сейчас заархивировала старым. Попробуйте.

Сообщение от Braser

не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой

Теперь отображаются.

shanemac51 · 29.02.2020, 16:00

Сообщение от Braser

Опять банальная невнимательность и спешка

чем больше вы так спешите, тем дольше не получите нормального ответа

Добавлено через 2 минуты

Сообщение от Braser

не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой

базу пока не смотрела, но вряд ли это разумно - это признак того, что база не нормализована

@Capi · 29.02.2020, 17:03

Сообщение от shanemac51

чем больше вы так спешите, тем дольше не получите нормального ответа

Сообщение от shanemac51

базу пока не смотрела, но вряд ли это разумно - это признак того, что база не нормализована

Банальных нотаций мало. Пока одни слова.
Решение выложите, пожалуйста. НОРМАЛЬНОЕ, естественно.

Только начните с самого начала - с базы в #18.
Во всех прочих уже мои вставки и удаления есть.

@Braser · 02.03.2020, 07:03 **[ТС]**

Сообщение от Capi

Решение выложите, пожалуйста. НОРМАЛЬНОЕ, естественно.

Такое решение подойдет?

@Braser · 02.03.2020, 07:06 **[ТС]**

Очередное ОГРОМЕНСКОЕ СПАСИБО! всем знатокам и наставникам

, всем, кто принял участие в решении моей проблемы, и особенно Capi

@Capi · 02.03.2020, 10:36

Сообщение от Braser

Сообщение от Capi

Решение выложите, пожалуйста. НОРМАЛЬНОЕ, естественно.

Такое решение подойдет?

Предложение дать решение было адресовано shanemac51.

@Braser 393 / 137 / 37 Регистрация: 16.03.2013 Сообщений: 1,491
	27.02.2020, 06:30 [ТС]	22
	Сообщение от Capi Вторую форму удалила. Она не нужна не открывается почему то, можете перезалить? Пишет не удалось открыть файл как архив Добавлено через 1 минуту Сообщение от amd48 Вообще, при придумывании интерфейса надо стараться свести количество манипуляций пользователя к минимуму. Согласен, но не всегда знания методов такой оптимизации хватает, опыта маловато в некоторых случаях, проще говоря 0

@Braser 393 / 137 / 37 Регистрация: 16.03.2013 Сообщений: 1,491
	28.02.2020, 08:03 [ТС]	31
	пс пришлось почикать все сетевые таблицы и кое что еще ... на главной форме, которая открывается первой поле F для ввода номера заказов, только у меня источником в функции запрос выступает, а не таблица. 0

@Braser 393 / 137 / 37 Регистрация: 16.03.2013 Сообщений: 1,491
	29.02.2020, 05:50 [ТС]	33
	Сообщение от Capi Нет. Оно не было F. Оно иначе называлось. Написать в надписи F - не значит назвать так поле. Прошу понять и простить в очередной раз.... Опять банальная невнимательность и спешка. Часто так бывает, что из за спешки допущу какую нибудь ерундовую ошибку и недоумеваю что не так?! Вроде по коду все правильно, а не работает должным образом... начинаешь разбираться, то поле не обозвал как надо, то еще что-нибудь подобное... Архив открыть не получилось, почему то RAR не хочет открываться у меня, но я согласно вашим замечаниям все подправил в оригинале и заработало все должным образом. За что вам ОГРОМНОЕ ЧЕЛОВЕЧЕСКОЕ СПАСИБО!!! Добавлено через 8 минут PS Если вам не трудно, пожалуйста, перезалейте архив, у меня таки не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой, подозреваю, что функция в данном случае должна выглядеть несколько иначе Добавлено через 19 минут Сообщение от Braser у меня таки не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой, подозреваю, что функция в данном случае должна выглядеть несколько иначе Прошу прощения, не совсем ясно выразился... Не отображаются на форме цветом программы, для которых в источнике данных функции в поле "НомераЗаказов" указан не один искомый заказ, например ТАЙ00001234 а несколько ТАЙ00001234;ТАЙ00004321;ТАЙ00004132 Т.е. если в поле поиска на форме введем "ТАЙ00001234" и соответсвующее значение в функции возвращает значение ТАЙ00001234 то поле на форме подкрашивается, а если функция возвращает значение "ТАЙ00001234;ТАЙ00004321;ТАЙ00004132" закрашивать не хотит 0

@Braser 393 / 137 / 37 Регистрация: 16.03.2013 Сообщений: 1,491
	02.03.2020, 07:06 [ТС]	38
	Очередное ОГРОМЕНСКОЕ СПАСИБО! всем знатокам и наставникам, всем, кто принял участие в решении моей проблемы, и особенно Capi 0

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	02.03.2020, 10:36	39
	Сообщение от Braser Сообщение от Capi Решение выложите, пожалуйста. НОРМАЛЬНОЕ, естественно. Такое решение подойдет? Предложение дать решение было адресовано shanemac51. 0

@amd48 841 / 472 / 79 Регистрация: 18.05.2016 Сообщений: 1,255 Записей в блоге: 4
	26.02.2020, 14:45	21
	Что-то мне это напоминает банальный фильтр ленточной формы по значениям свободных полей в заголовке формы. Зачем для этого городить кучу дополнительных форм, не понятно. Вообще, при придумывании интерфейса надо стараться свести количество манипуляций пользователя к минимуму. Даже фильтр должен выполняться не нажатием специальной кнопкой, а просто с задержкой в секунду после ввода последнего символа в поле фильтра. То же самое с формами - каждая всплывающая форма, скорее всего, лишняя и может быть или вкладкой на форме или стандартным полем ввода InputBox или просто более информатированным полем, типа кнопки календарика рядом с полем-датой. 1

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	27.02.2020, 12:12	25
	Сообщение от Braser В оригинале БД есть 2 таблицы. Одна- Программы. Вторая -Заказы. А зачем фальшивый пример выложили? Там только таблица Таблица1, одна на все случаи жизни. Сообщение от Braser Но связи между таблицами нет. Мне это неважно. Сообщение от Braser Спасибо, но немного не то Пеняйте на себя. 1

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	27.02.2020, 12:48	26
	Вместо оправданий и лишних эмоций лучше бы исправили свою "невнимательность" и выложили правильный пример. 0

@alvk 7442 / 4576 / 301 Регистрация: 12.08.2011 Сообщений: 14,243
	28.02.2020, 02:18	29
	Таблица, форма, два запроса, один неработающий и функция. Что нужно со всем этим делать? Галки ставил, в таблице отображаются. Что ещё? 0

shanemac51 Модератор 12084 / 4944 / 791 Регистрация: 07.08.2010 Сообщений: 14,522 Записей в блоге: 4
	29.02.2020, 16:00	35
	Сообщение от Braser Опять банальная невнимательность и спешка чем больше вы так спешите, тем дольше не получите нормального ответа Добавлено через 2 минуты Сообщение от Braser не хотят отображаться номера заказов, которые записаны по несколько штук в одно поле через точку запятой базу пока не смотрела, но вряд ли это разумно - это признак того, что база не нормализована 1

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	29.02.2020, 17:03	36
	Сообщение от shanemac51 чем больше вы так спешите, тем дольше не получите нормального ответа Сообщение от shanemac51 базу пока не смотрела, но вряд ли это разумно - это признак того, что база не нормализована Банальных нотаций мало. Пока одни слова. Решение выложите, пожалуйста. НОРМАЛЬНОЕ, естественно. Только начните с самого начала - с базы в #18. Во всех прочих уже мои вставки и удаления есть. 0