MS Access VBA для обновления поля таблицы Combobox

Question

У меня есть таблица с полем, в котором для элемента управления дисплеем установлено поле со списком, и я не могу читать или писать в него с помощью OpenRecordSet. Что мне нужно сделать, чтобы изменить эти сценарии ios для работы?

Sub TryToRead()
Set db = CurrentDb
Set rs = db.OpenRecordset("tbl", dbOpenDynaset)
x = rs!FieldName '<------Combo Box Field. x shows no info.
End Sub

Sub TryToWrite()

Set db = CurrentDb
Set rs = db.OpenRecordset("tbl", dbOpenDynaset)
With rs
.AddNew
rs!FieldName = "Test Value" '<------ Results in Run-time error 64224 Application-defined or object-defined error
   .Update
End With

End Sub

Answer 1

Я думаю, что у меня есть то, что мне нужно.

Sub Testing()

Set db = CurrentDb
Set rs = db.OpenRecordset("tbl", dbOpenDynaset)
MyStr = Array("Value1", "Value2")

Do Until rs.EOF = True
    Set rs2 = rs!FieldName!Value
    rs.Edit
    For Each c In MyStr
        rs2.AddNew
        rs2!Value.Value = c
        rs2.Update
    Next c
    rs.Update
    rs.MoveNext
Loop

End Sub