Access Veri Tabanından Bilgi Alma

[captan]

Aşağıdaki kodlar ile excelde hazırladığım Userform üzerindeki Listwiev e verileri alıyorum. Kodlar verileri getiriyor ama sıralarını karıştırıyor. Ben verileri getirirken Sıra numarasına göre getirmesini isiyorum

 Sub Ekle()
    Dim i As Integer
    Dim Liste As ListItem
    On Error GoTo KayıtYok
    
    lvListe.ListItems.Clear
    tblDeneme.MoveFirst
    For i = 1 To tblDeneme.RecordCount
        Set Liste = lvListe.ListItems.Add(, , tblDeneme("Sıra").Value)
        Liste.SubItems(1) = tblDeneme("Adı").Value
        Liste.SubItems(2) = tblDeneme("Soyadı").Value
        Liste.SubItems(3) = tblDeneme("Telefon").Value
        tblDeneme.MoveNext
    Next i
    Exit Sub
KayıtYok:
  
End Sub

Döngüde bir sorun olduğunu düşünüyorum. .
Yardıma ihiyacım var arkadaşlar

 

[Recep İpek]

Recordset oluşturduğunuz SQL kodunu ekleyebilirmisiniz?

 

[captan]

Sayın ripek ilginize çok teşekkür ederim.
Çözümü tam olarak anlayamadım,

Rica etsem,
Kodlar üzerinde değişiklik yapabilirmisiniz.

 

[Recep İpek]

Kodlarınızda SELECT * FROM ile başlayan bir cümle olması gerekiyor.

Bu satırı istemiştim.

 

[captan]

Dosyam Ekte

Arkadaşlar dosyam ekte,
Yardımlarınızı bekliyorum. .

 

[captan]

İlgilenen arkadaşlardan yardım bekliyorum !!