You said without VBA, but I don't see a way to do that with a macro.
Assume the name of the textbox you want to update is txtProductName
There are two ways the ProductName can change:
1. When you change the ProductID with the combobox.
2. As you scroll thru the records on the form.
Each of these will require VBA code to update the textbox.
First, the combobox change:
Code:
Private Sub Keuzelijst220_AfterUpdate()
txtProductName =DLookUp("[Artikel_naam]";"tblAtrikel";"[ArtikelID]='" & [Keuzelijst220] & "'")
End Sub
Then scrolling:
Code:
Private sub Form_Current()
If not isnull(Keuzelijst220) then
Call Keuzelijst220_AfterUpdate
end if
end sub
If you feel you are unable to insert the code properly, post you DB and we can get a working copy back to you in short order.
Also just noticed that you did not apply the Dlookup in post #4 properly. You left out the single quotes:
Code:
=Dlookup("Artikel_naem","tblAtrikel","ArtikelID='" & Keuzelijst220 & "'")
You might try that again before trying the VBA.