Textbox ve Listview Format Hatası Hakkında

[ekankim]

Arkadaşlar merhaba ektede gönderdiğim çalışmamda, kendi bilgisayarımda sorunsuz bir şekilde çalıştığı halde bir başka bilgisayarda -Format- kodunda sorun yaşıyorum. Bir türlü çözemedim yardımcı olabilirseniz sevinirim.

Ayrıca değişkenlerde kendi bilgisayarımda sorun olmadığı halde bir başka bilgisayarda hata mesajı veriyor onu bir şekilde hallaettim Dim koduyla tanımlıyarak ama aklım yinede almadı hatayı niye benim bilgisayarımda vermiyordu da bir başka bilgisayarda tanımlamamı istedi.Benim için önemli olan şuanda Format problemi bu konu hakkında bana yardımcı olabilecek arkadaşlarım olursa çok sevinirim.

 

[mustafakoker]

Bildiğim kadarıyla Listwievde 10 adetten fazla ad item kuıllnılmıyor bununyerine rowsource kullanıp sayfadan çektirin

ListView1.View = lvwReport
With ListView1.ColumnHeaders
.Add , , "b", 0 '0
.Add , , "Sıra", 0, 0 '1
.Add , , "Dönem", 90, 0 '2
.Add , , "Sicil No", 75, 2 '3
.Add , , "İaşe Bedeli", 65, 2 '4
.Add , , "Gün Sayısı", 65, 2 '5
.Add , , "İ.Y.Çal.Gün", 70, 2 '6
.Add , , "Ödeyeceği Tutar", 90, 2 '7
.Add , , "Ödediği Tutar", 80, 2 '8
.Add , , "Bakiye Borç", 80, 2 '9
.Add , , "Bordro Gün", 0, 2 '10
.Add , , "İ.Y. Ödenen Gün", 0, 2 '11
.Add , , "Tarih ve No", 80, 2 '12
.Add , , "Açıklama", 100, 2 '13
.Add , , "Yıl", 0, 2 '14

ayrıca listwievinizi çalışmayan bilgisayarda userformunuzdan silin ve o bilgisayarda tekrar ekleyin
microsoft listwiev control versiyon (5,0) sp2 veya
microsoft listwiev control versiyon 6

 

[ekankim]

mustafakoker cavabın için sağol ama listvievde sorun yok. Herşey normal çalışıyor sadece format kodunda sorun veriyor. Format kodlarını sildiğim zaman hiçbir problem yok, program gayet güzel çalışıyor.Zaten verileri sayfadan almıyorum Access veri tabanından çekiyorum bu yüzden verdiğiniz komut burada geçmez. Dediğiniz konu farklı, istediğim o değildi.:frown:
demek istediğim;
TextBox12.Text = Format(0, "#,##0.00")
Lst.SubItems(6) = Format(RS.Fields("İSCALGÜNSAYISI"), "#,##0.00") gibi kodlarda bulunan -Format- hatası.

 

[ekankim]

Yardımcı olabilecek kimse yokmu..

 

[ekankim]

Bu konu bukadar zormu cevap verebilecek kimse yokmu arakadaşlar, acil yardıma ihtiyacım var.

 

[Korhan Ayhan]

Merhaba,

VBA.Format(......) şeklinde yazıp denermisiniz.

 

[ekankim]

Sayın Korhan Ayhan;
alternatif bir çözüm sunduğunuzdan dolayı teşekkür ederim, verdiğiniz kod hiç aklıma gelmedi hatırlattığınız için sağolun. Kendi bilgisayarımda sorun olmadığından yarın bu kodu sorun çıkartan bilgisayarda deneyeceğim, sonucunu forumdan tekrar geri bildirim yaparım.
Saygılarımla.

 

[ekankim]

Merhaba,

VBA.Format(......) şeklinde yazıp denermisiniz.

verdiğiniz kod işe yaradı, yardımınız için çok sağolun.
Ayrıca şunuda belirteyim bundan başka birkaç yerde daha hata verdi başlarına VBA. kodunu ekleyince onlarda ortadan kalktı çok çok teşekkür ederim...