AccessTr.neT
Ondalık Sayıda Virgülden Sonra İlk Basamağı Alma - Baskı Önizleme

+- 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ığı: Ondalık Sayıda Virgülden Sonra İlk Basamağı Alma (/konu-ondalik-sayida-virgulden-sonra-ilk-basamagi-alma.html)



Ondalık Sayıda Virgülden Sonra İlk Basamağı Alma - alemci - 28/01/2012

iyi günler benim yuzde1 adında bir değişkenim var bu değikenimin sonucu ondalık sayı olduğu zaman virgülden sonra ilk rakamı tutsun diğerlerini silsin

yuzde1 = 85.6 -> doğru (bu şekil yazmasını istiyorum)
yuzde1 = 85.6532 -> yanlış


Cvp: değiken tipi - ercansahin - 28/01/2012

Metin Kutusunun özelliklerinde bulunan Biçim = Standart ve Ondalık Basamaklar =1 olarak düzenleyin.

Örneksiz cevap ancak bu kadar.Img-grin


Cvp: değiken tipi - alemci - 28/01/2012

dediğiniz gibi denedim olmuyor
dim yuzde1 as double
dim i as integer
dim toplam as long
dim genel as long
yuzde1=0
toplam=0
genel=0
for i=0 to liste2.listcount
genel=genel+1
if liste2.column(2,i)= "Bursa" then
toplam =toplam+1
yuzde1=(toplam1*100)\genel
end if
next i
metin1.value=yuzde1


kodum bu buradaki yüzdeyi metin kutusuna Örnek 85,7 olarak yazdırmak istiyorum virgülden sonra 1 karakterden fazla olmasın


Cvp: değişken tipi - benremix - 04/02/2012

Lütfen örnek ekleyiniz.

Saygılar...


Cvp: Ondalık Sayıda Virgülden Sonra İlk Basamağı Alma - ozanakkaya - 05/02/2012

Eklediğin koda göre;

metin1.value=yuzde1 
yerine

metin1 = Left(yuzde1, InStr(1, yuzde1, ",") + 1)
yazman yeterli.



Cvp: Ondalık Sayıda Virgülden Sonra İlk Basamağı Alma - ozanakkaya - 15/02/2012

Arkadaşın geri döneceği yok, konu taşınmıştır.