Skip to main content

AccessTr.neT


TextBox'da bindelik sorunu

TextBox'da bindelik sorunu

#1
Merhaba arkadaşlar ekli dosyamda Fatura Sayfasındaki UserForm1 de +KDV TUTAR veya KDV DAHİL TUTARA 999 TL ye kadar rakam girdiğim zaman sorun yok. 999 TL den büyük rakam girdiğim zaman KDV ORANI ve ADEDİ TextBoxları hata veriyor. Yani yüzdelik sayılarda sorun yok bindelik sayılarda hata veriyor.

Bu konuda yardımlarınızı bekliyorum. Yardımlarınız için şimdiden teşekkürler.

Sayfa korumaları parolası: 123

.zip Örnek.1.zip (Dosya Boyutu: 1,06 MB | İndirme Sayısı: 14)
Cevapla
#2
sayın kenan827,

bahsettiğiniz talebinize yönelik çözüm talebinde bulunmadan önce,yapılan inceleme neticesinde;

aşağıda bağlantısı verilen konunuzdaki 2. ve 5. mesajlarında açıklaması yapılan hususların bu konunuzdaki eklediğiniz örnek için de geçerli olduğu görülmüştür.

ListBox Sorunu

bu nedenle,hem kendinize alışkanlık sağlayıp bu ya da bundan sonraki konularınızda ekleyeceğiniz uygulamalar için bu hususlara riayet edip bu doğrultuda oluşturmalarda bulunmaya ve bundan dolayı da kendinizi bu şekilde geliştirmeye ve deneyim kazanmaya yönlendiriniz ve hem de katılımcılara kolaylık ve zaman kazandırmayı sağlamak adına gereken hassasiyeti göstermeye önem vererek özen gösteriniz.

son olarak,SADECE tavsiye niteliğinde olması adına,
uygulamanızı yapılan bu hususlara dair tekrar düzenlemek sureti ile oluşturduktan ve hata mesajları almayacak hale
getirdikten sonra konunuza düzeltilmiş olarak tekrar dahil ediniz.ayrıca,parasal değerler için format dönüşümleri için

Kod:
Format("123.4", "#,##0.00")
Deneme sonucu dönüş değeri: '123.40'

Format("1234.5", "Currency")
Deneme sonucu dönüş değeri: '1,234.50'

şeklinde de kullanılabilir.fakat,eğer sizin kodlarınızda metin veri türü değeri ile sayı veri türü değeri çakışması söz konusu ise,tür uyuşmazlığından dolayı hata veriyor olabilir.bu nedenle,kodları kontrol etmenizde fayda var kanısındayım.bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
Hocam önerilerinizi önemsemiyormuşum gibi algılamayın. İnanı ki kodların tek kelimesinden anlamıyorum. Siz hataların kaynaklandı bölümleri o kadar güzel anlatıyorsunuz ki keşke biraz kodlardan anlasaydım en azında anlattıklarınızı yapmaya çalışsaydım. O nedenle sizin gibi değerli Ustadların yardımlarına çok ihtiyacımız var. Parasal değerler için anlattığınız formatı dosyama uygularsanız çok sevinirim. Programda düzeltilmesi gereken bölümler olduğunu yazmışsınız bu hataları düzeltebilirmisiniz desem herhalde çok şey istemiş olurum. Saygılarımla iyi çalışmalar.
Cevapla
#4
sayın kenan827,

bahsi yapılan düzenleme işleminden kast edilen;

mesajda bağlantısı verilen bir önceki konunuzun 5.mesajında anlatımı yapılarak vurgulanan hususlara yönelik yapılması gerekli işlemler ve bu işlemlerin eklenen örnek uygulamada yapıldığını beyan etmek olduğunu bir kez daha tekrarlamakta fayda var.

bu nedenle o mesajdaki örnekteki bu konunuzdaki örneğinizi de benzer kontrollerde bulunmak sureti ile düzeltmelisiniz.
bunu da,gerek 5.mesajda yazılı bilgileri tekrar okumak ve eklenen örnekte yapılan düzenlemeleri incelemek ile sağlayabilirsiniz.çünkü;her iki konunuzda ilk eklediğiniz örnek çalışmalarınızda benzer kodlar söz konusu olduğu için aynı hatalı kullanımlar geçerlidir.

bu nedenle de,kodları tek tek incelemek sureti ile düzenlemeye çaba gösteriniz.

böylece,bu çabanız ile;bundan sonrasında eğer aynı örnek çalışmanız üzerinde yeni eklemelerde veya geliştirmelerde bulunacak olduğunuzda,hemen hemen yine aynı kodları kullanma durumunuz söz konusu olacağı için,tek bir düzenlenmiş ve hatalardan tamamen mümkün mertebe arındırılmış hale getireceğiniz bir bütün kod kalıbını kullanarak,sonraki uygulamalarda da hem rahat bir kullanım elde edebilirsiniz hem de sorunların önüne geçerek direkt konularına neden olacak sorunlarınıza odaklanmış olacaksınız.bunu kendinize ne kadar çok alışkanlık edinip uygularsanız,o kadar tecrübe ve deneyim elde edersiniz.bunun sonucunda da,kodlama öğrenme konusunda da kendinize güveninizde gelecektir.bu da,sizin konularınıza daha bir ilgi göstermenize yol açacaktır.bilginize.

iyi çalışmalar,
saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#5
Hocam daha önce eklediğim konuda mesaj 5e eklediğiniz örnekte aşağıdaki kodlar hatalı olduğu için iptal etmişsiniz. Benim aslında bütün sorunum TextBox26 da. TextBox26 da FIYATI göstermesini istiyorum. Yani TextBox28/TextBox25 TextBox26 da FIYATI olarak görünmesini istiyorum. Aşağıdaki kodlar hatlı olduğuna göre nasıl bir kod eklemek lazım.

Private Sub TextBox25_Change()
Dim deg1, deg2
'İPTAL...deg1 = Replace(IIf(TextBox28 = "", 0, TextBox28), ".", ",")
'İPTAL...deg2 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
deg1 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
deg2 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
If TextBox28 <> "" And TextBox25 <> "" Then
'İPTAL...TextBox26 = Format(Replace(CDbl(deg1) / CDbl(deg2), ".", ","), "#,##0.00")
Else
TextBox26 = ""
End If
End Sub
Private Sub TextBox28_Change()
Dim deg1, deg2
'İPTAL...deg1 = Replace(IIf(TextBox28 = "", 0, TextBox28), ".", ",")
'İPTAL...deg2 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
deg1 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
deg2 = Replace(IIf(TextBox25 = "", 0, TextBox25), ".", ",")
If TextBox28 <> "" And TextBox25 <> "" Then
'İPTAL...TextBox26 = Format(Replace(CDbl(deg1) / CDbl(deg2), ".", ","), "#,##0.00")
Else
TextBox26 = ""
End If
End Sub
Son Düzenleme: 08/05/2015, 21:35, Düzenleyen: kenan827.
Cevapla
#6
Arkadaşlar biliyorum yardım etmek zorunda değilsiniz. Bu sitede çok uzman arkadaşın olduğunu da biliyorum. Benim istediğim yardım tahmin ediyorum çoğunuz için çok basit bir işlem. Bu konuda yardımlarınızı bekliyorum. Yardımlarınız için şimdiden teşekkürler.
Son Düzenleme: 09/05/2015, 01:57, Düzenleyen: kenan827.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da