I'd like to creat a function which fills in textboxes...
The function should do something like this...
txtVarType = rs.Fields("Type")
txtVarPrice = rs.Fields("SalesPrice")
txtVarDescr = rs.Fields("Description")

txtVar2Type = rs.Fields("Type")
txtVar2Price = rs.Fields("SalesPrice")
txtVar2Descr = rs.Fields("Description")

txtVar3Type = rs.Fields("Type")
txtVar3Price = rs.Fields("SalesPrice")
txtVar3Descr = rs.Fields("Description")

I was thinking of somthing like this...

Public Function Filltextbox(Fill As String)
"txt" & Fill & "Type" = rs.Fields("Type")
"txt" & Fill & "Price" = rs.Fields("SalesPrice")
"txt" & Fill & "Descr" = rs.Fields("Description")
End Function

Initiating the function as follows...
Filltextbox(Var)
Filltextbox(Var2)
Filltextbox(Var3)

But this..."txt" & Fill & "Type" doesn't seem to work..Can anyone help?