Access like table in VB6

In Access I can use the lookup wizard and I get a combo box for that field.

Is there any way to do this with the DataGrid or is there a thrid party control that will let me do this in VB6?