Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
11/04/2012 10:51
Konu Sahibi
kokotuna
Yorumlar
2
Okunma
1674
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

kokotuna

Aktif Üye
Kullanici Avatari
Aktif Üye
202
02/03/2012
10
Bolu
Ofis 2010
01/06/2017,09:32
Çözüldü 
Merhaba;
ekteki formda hesapla butonuyla hesap yapıyorum ancak bilgisayarın varsayılan ondalık ayracı virgül olduğu halde YASS değerini virgüllü girdiğimde sonucu yanlış veriyor, nokta olarak girdiğimde doğru sonucu veriyor. sorun nedir anlayamadım varsayılanı virgül olarak kullanmak için ne yapmam gerekiyor?

Ek Dosyalar
hesap.rar


Cevapla

Kur@l

AccessTR.Net
Kullanici Avatari
Uzman
2.032
05/11/2008
KONYA
Ofis 2010
Dün,17:58
Çözüldü 
Kodu aşağıdaki ile değiştirip doğru hesaplayıp hesaplamadığını bildirirseniz sevinirim.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Komut12_Click()
qem = Format((0.8) * (Nort) * ((B + 0.3) / B) * ((B + 0.3) / B) * (1 + (D / (3 * B))) / 10, "####.00")
End Sub

Private Sub Komut16_Click()
Me.YASS = Replace(YASS, ",", ".")
If Me.YASS < B Then
qem = (((0.8) * (Nort) * ((B + 0.3) / B) * ((B + 0.3) / B) * (1 + (D / (3 * B)))) / 10) * Cw
ElseIf B < YASS Then
qem = (0.8) * (Nort) * ((B + 0.3) / B) * ((B + 0.3) / B) * (1 + (D / (3 * B))) / 10
End If

End Sub


Private Sub YASS_AfterUpdate()
Me.YASS = Replace(YASS, ",", ".")
Cw = Format(0.5 + 0.5 * (YASS / (D + B)), "####.00")
End Sub


komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla

kokotuna

Aktif Üye
Kullanici Avatari
Aktif Üye
202
02/03/2012
10
Bolu
Ofis 2010
01/06/2017,09:32
Çözüldü 
teşekkürler arkadaşlar elinize sağlık


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Açılır Kutudaki Değeri Alma Sorunu derzulya 5 242 11/07/2017, 16:08 derzulya
Çözüldü Sorguda Detay Ve Sonuçların Rapora Alt Bilgi Olarak Aktarılması Sorunu cemre1970 4 253 09/06/2017, 08:23 cemre1970
Çözüldü Access Den Excel Çıktısı Alma Sorunu estapan 13 955 30/05/2017, 14:12 atoz112
Çözüldü Access Formda Numlock Sorunu cagatay1234 6 447 30/05/2017, 10:28 cagatay1234
Çözüldü Buton Ve Msgbox Sorunu onurgs59 9 573 25/05/2017, 20:42 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.