Access - insertar en un listbox

Sinopsis:
Tengo dos listbox: Lista1 y Lista 2 y estoy interasado introducir ,al evento de doble click sobre un de las lineas de Lista1, 2 columnas en lista Lista2 procedentes de Lista1.

Sinopsis en psedoVisual Basic:

Private Sub Lista1_DblClick(Cancel As Integer)

Me.Lista2.Comlumn(1,3)=Me.Lista1.Column(2)
Me.Lista2.Comlumn(1,4)=Me.Lista1.Column(3)

end Sub

PD:utilizo Access 2000

Gracias.