Проблема заключается в следующем:
Ваша форма привязаны к таблице test_table; Вы отображаете данные в связке связанных полей, нажимая на элемент в списке, но вы никогда не меняете текущую запись таблицы, и, таким образом, вы всегда обновляете первую запись с любыми значениями, отображаемыми в настоящее время.
Вместо того, чтобы использовать список, используйте кнопки навигации, которые форма позволяет перейти к записи, которую вы хотите обновить, тогда ваш образец может работать.
В качестве альтернативы Если вы добавили идентификатор RowSource ListBox в, когда вы хотели, чтобы сохранить вы могли бы сделать что-то вроде:
еще лучше, (в дополнение к вышесказанному) отвязать формы & элементы управления и использования набор записей, чтобы отображать текущие значения полей в форме, когда запись выбрана в списке. Затем данные не обязательно должны находиться в источнике строк в списке, поэтому вы должны изменить источник строк на «SELECT ID, Dates FROM Test_Table» и установить для свойства columnwidths значение «0cm; 3cm», чтобы скрыть идентификатор с дисплея. Тогда любая ссылка на песни8 является ссылкой на идентификатор текущей записи, и
List8 = 4
Будет ли установить выбранный индекс песни8 к строке с ID = 4.
Затем после сохранения, вы можете
List8.Requery
List8 = 4
List8_Click
будет отображать данные из базы данных.
Надеюсь, что это поможет
спасибо, что вам помогли. К сожалению, все еще не могу заставить это работать. Я использую этот набор записей: Dim дб As Database Dim гее As Recordset Set дб = CurrentDb Set гее = db.OpenRecordset ("Select * из tbl_ComplaintsCoded") rec.Edit Rec ("Бизнес-Эксперт") = Me.Text5 rec.Update Me.List1.Requery – dmorgan20
после того, как много игр вокруг этого теперь работает. Спасибо – dmorgan20