vba - vbaを使用してフォームのテキストボックスにいくつかの行を表示する

Question

たとえば 5 行を返すクエリがあります。これらの行 (フィールド) をテキスト ボックスに表示したいと考えています。しかし、それは私に1つのレコードしか表示しません。また、フォームのデフォルト ビュー プロパティを連続フォームに設定しました。彼女は私のコードです：

Private Sub List2_DblClick(Cancel As Integer)
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT XValue, YValue,Wert FROM tb_DCM_Daten WHERE (FzgID=" & Forms!frm_fahrzeug!ID & " AND [Name]='" & List2.Value & "')")
If rst.RecordCount <> 0 Then

Do While Not rst.EOF
  Text8.SetFocus
  Text8.Text = rst.Fields("XValue").Value

  Text10.SetFocus
  Text10.Text = rst.Fields("YValue").Value

  Text11.SetFocus
  Text11.Text = rst.Fields("Wert").Value
  rst.MoveNext
Loop   
  End If
End Sub

どうやってやるの？