Select Case Me.Açılan_Kutu1
Case "Öğrenci"
Me.Açılan_Kutu5.RowSource = "ogrenci"
Case "Akademik"
Me.Açılan_Kutu5.RowSource = "akademik"
Case "İdari"
Me.Açılan_Kutu5.RowSource = "idari"
End Select
Me.Açılan_Kutu5.Requery
"Açılan_Kutu1"in güncelleştirme sonrasında olayına aşağıdaki kodu ekle