Нужна помощь в настройке отображения курса на роль в Access DB

Question

Пример того, что я пытаюсь сделать. Я хочу отобразить в своей форме в текстовом поле или в списке список курсов, которые пользователь должен пройти после назначения ролей, необходимых для выполнения его обязанностей. У меня есть таблица (tbl_GRC_Master_Roles_List), в которой перечислены все роли в одном столбце, а в 6 других столбцах - 6 различных курсов. Каждая роль требует (курс 1), для другой (курс 2) - (курс 6) она варьируется. пример:

(Role-A) needs (Course1), (Course2), (Course5), (Course6)
(Role-B) needs (Course1), (Course4), (Course6)
(Role-C) needs (Course1), (Course2), (Course3), (Course4), (Course5)
(Role-D) needs (Course1)

и т. д. и т. д. для всех ролей, перечисленных в таблице.

Когда я в форме, я могу выбрать роль и назначить ее для пользователь, которого я хотел бы отображать курсы в текстовом поле или в списке, не уверенный, что проще или лучше всего подходит для выбранных ролей. Пользователи получают несколько назначенных ролей. Поэтому я не хочу дублировать курсы на дисплее. Я просто не уверен, как это сделать. Любые идеи помогут мне начать. моя таблица (tbl_GRC_Master_Roles_List) настроена следующим образом:

(ID) (RoleName) (Course1) (Course2) (Course3) (Course4) (Course5) (Course6)

Когда я назначаю роли пользователя, он добавляется в таблицу (tbl_Assigned_Roles), его настройки следующим образом:

(ID) (UserEmail) (RoleName)

Могу ли я использовать оператор SQL в списке для получения этих данных?

Answer 1

Итак, я сделал шаг назад и пересмотрел то, что пытался достичь. Теперь я только что выполнил поиск ролей, используя поле со списком, и для его источника строк был выбран запрос со всеми ролями и курсами в виде столбцов (tbl_GRC_Master_Roles_List). Затем я поместил текстовое поле под полем со списком и немного его расширил, чтобы видеть все отображаемые курсы. Когда я выбираю роль из поля со списком, он отображает только курсы для этой роли в текстовом поле. Ниже приведен код, который я использую в событии On-Change в поле со списком:

Private Sub cbo_SearchList_Change()
Me.txtCourseList.Value = Me.cbo_SearchList.Column(2) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(3) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(4) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(5) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(6) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(7) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(8) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(9) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(10) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(11) & _
                vbNewLine & _
                Me.cbo_SearchList.Column(12)
Me.txtCourseList.Requery
End Sub

Это то, что решило мою проблему, надеюсь, это поможет другим. Иногда просто лучше. Спасибо.