+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek (/konu-inputbox-degerine-gore-rapordaki-veriyi-boldurmek.html)
Sayfalar:
1
2
İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - SeferŞANLI - 17/06/2021
Raporun açılış olayına inputbox kontrolü koyarak, rapordaki textbox nesnesinin içindeki değeri inputboxtan girilen değere böldürüp, başka bir metin kutusuna nasıl yazdırabiliriz. Tabi değer girilmesi ve sıfır girilmemesi de gerekiyor.
RE: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - berduş - 17/06/2021
peki 0 yada sayısal olmayan bir değerse ne yapılacak input ekranına geri mi dönülecek yoksa varsayılan bir değer mi atanacak
Private Sub Report_Load()
Dim Message, Title, Default, MyValue
Message = "bir sayı giriniz" ' Set prompt.
Title = "Sayı gir" ' Set title.
Default = "1" ' Set default.
10
MyValue = InputBox(Message, Title, Default)
If Not IsNumeric(MyValue) Or Len(MyValue & "") = 0 Then GoTo 10
Me.txtSon = Me.txtVeri / MyValue
End SubRE: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - SeferŞANLI - 17/06/2021
Sayın hocam. Raporda sayısal bir alanım var. Rapor açıldığında o sayısal alandaki değeri inputboxdan girilen değere böldürüp rapordaki metin kutusuna yazdırarak çıktı almak. Yani inputbox boşsa exit yapıp ekrana dönebiliriz. Sıfırda girmemeli ve harf yada karakterde.
RE: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - berduş - 17/06/2021
2. mesajdaki kodu denediniz mi?
RE: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - SeferŞANLI - 17/06/2021
Evet Sayın Berduş; Ama hata mesajı verdi.
Dim Message, Title, Default, MyValue
Message = "bir sayı giriniz" ' Set prompt.
Title = "Sayı gir" ' Set title.
Default = "1" ' Set default.
10
MyValue = InputBox(Message, Title, Default)
If Not IsNumeric(MyValue) Or Len(MyValue & "") = 0 Then GoTo 10
Me.txtogrt = Me.txtder / MyValuehttps://resimyukle.org/i/xpZOF
https://resimyukle.org/i/xpcsZ
RE: İnputbox Değerine Göre Rapordaki Veriyi Böldürmek - SeferŞANLI - 17/06/2021
Raporlar-Çıktılar kısmından. Ders yükü raporunu açınca.