Merhabalar;
Ders_kodlari tablosundaki dersleri field.name olarak ders_istatistikleri formunda açılan kutuda gösteriyorum. Buradan seçilen ders adına göre öğrencileri listelemek istiyorum. Ders adlarını alan adından aldığım için çıkamadım işin içindne, yardımcı olabilirmisiniz rica etsem.
Seçilen Derse Göre Öğrenci Listeleme
ak_ders_kodlari açılır kutusunun tıklanma yada değiştiğinde olayını aşağıdaki gibi düzenleyip dener misiniz?
Private Sub ak_ders_kodlari_Click()
Dim strSQL As String, xKriter As String
xKriter = ""
strSQL = ""
strSQL = strSQL & vbNewLine & " SELECT ders_kodlari.id, ogrenciler.ogrenci_adi, ders_kodlari.*"
strSQL = strSQL & vbNewLine & " FROM ogrenciler"
strSQL = strSQL & vbNewLine & " INNER JOIN ders_kodlari ON ogrenciler.id = ders_kodlari.ogrenci_id"
xKriter = vbNewLine & IIf(Len(ak_ders_kodlari & "") > 0, " where [" & ak_ders_kodlari & "]=-1;", ";")
Me.lst_ders_secenler.RowSource = strSQL & xKriter
End Sub
Hocam çok teşekkür ederim, doğru çalışıyor.
rica ederim
iyi çalışmalar
iyi çalışmalar
Sağolun hocam sizede iyi çalışmalar,
Konuyu Okuyanlar: 1 Ziyaretçi