farklı bir yöntem olarak da aşağıdaki şekilde kullanabilirsiniz.
1 - bir modüle aşağıdaki kodları ekleyin

Global AnaKrls As String



Function AnaFrmKrls() As String

AnaFrmKrls = AnaKrls

End Function

2 - AnaMenu formundaki  Giriş butonun en başına aşağıdaki kodu ekleyin

AnaKrls = Me.kuruluş

3 - S_KURULUSsorgusunun kodu

SELECT kullanici.id, kullanici.kuruluş, kullanici.kullanici, kullanici.sifre, kullanici.yetki

FROM kullanici

WHERE (((kullanici.kuruluş)=AnaFrmKrls()));

şeklinde dener misiniz?