[Resolvido]Listar vários registros em uma caixa de texto

Olá

Tenho uma tabela fictícia (tbl_teste) com duas colunas

1º coluna (codigo)
2º coluna (num_expedicao)


nesta tabela existem vários registros assim:

codigo | num_expedicao
123     |15666
456     |89999
123     |58887
123     |22222
899     |88997
555     |72333

gostaria de uma função por exemplo que localize o código: (123) e me retornasse todos os registros do (num_expedicao)
em apenas uma caixa de texto, ficando assim:

15666/58887/22222

ou seja todos os registros que compreendem o codigo (123) listados dentro de uma caixa de texto.

localizar: codigo (123)
Resultado: num_expedicao (15666/58887/22222)



valeu!!!

resolvi com um dos tópicos do Piloto


Me.Texto1 = Null
Dim Rs As DAO.Recordset
Dim StrSQL As String
StrSQL = "SELECT num_expedicao FROM tbl_teste WHERE codigo = " & Me.Texto3 & ""
Set Rs = CurrentDb.OpenRecordset(StrSQL)
Rs.MoveFirst
Do While Not Rs.EOF
Me.Texto1 = Me.Texto1 & Rs!num_expedicao & " / "
Rs.MoveNext
Loop