10-04-2022, 11:37
merhaba sayın hocalar, arkadaşlar, form açılırken listbox ım requery oluyor ve sonraki satırda da bir denetime listboxtaki bir kolonun değerini almak istiyorum ama hata veriyor, null değeri alıyor, isteğim lsteden seçim yapılmadan istenilen değeri nasıl alırız.
Private Sub sorgula_Click()
Me.surecAltForm.Requery
Me.listOdenek.Requery
Dim toplamTutarAl As Variant
toplamTutarAl = DSum("toplamFiyat", "surec", "sinifId=" & Me.acilan.Column(0))
Me.giderToplam = toplamTutarAl
Dim mgt As Variant
Dim mlc As Variant
mgt = Me.giderToplam
mlc = Me.listOdenek.Column(0, 1) buradan null değeri dönüyor
'Me.devreden = mgt + mlc
MsgBox mlc bunu deneme amaçlı yazdım ki göreyim ne olduğunu
End Sub
Private Sub sorgula_Click()
Me.surecAltForm.Requery
Me.listOdenek.Requery
Dim toplamTutarAl As Variant
toplamTutarAl = DSum("toplamFiyat", "surec", "sinifId=" & Me.acilan.Column(0))
Me.giderToplam = toplamTutarAl
Dim mgt As Variant
Dim mlc As Variant
mgt = Me.giderToplam
mlc = Me.listOdenek.Column(0, 1) buradan null değeri dönüyor
'Me.devreden = mgt + mlc
MsgBox mlc bunu deneme amaçlı yazdım ki göreyim ne olduğunu
End Sub