[es] - zarez u brojevima

sky_nex
Hrvatska

Član broj: 52675
Poruke: 6
195.29.122.*

Profil

^{23.03.2005. u 14:30 - pre 232 meseci}

Pokušavam zbrojiti unose koji se unesu u text1 i text2 Box i to mi sve ide uredu dok ne dođem do brojeva koji nisu cijeli.

Primjer :

Text1 = 5
Text2 = 5

rezultat koji dobijemText3 = 10 ; to je dobro

a kada napišem

Text1 = 5,5
Text2 = 5

rezultat koji dobijem Text3 = 10

Kada stavim umjesto zareza točku onda mi dobro zbroji, ja hoću da mi zbraja sa zarezom!?

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: zarez u brojevima

^{23.03.2005. u 14:48 - pre 232 meseci}

Text3.Text = Val(Text1.Text) + Val(Replace(Text2.Text, ",", "."))

Nebojsa Milanovic: Što se tiče Trumpa, smatram ga vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu.
Nebojsa Milanovic: Rusija ne laže, ne vodi osvajačke ratove
Nebojsa Milanovic: Trump je svetla tačka u USA blatu.

Odgovor na temu

Not now, John!

Član broj: 231
Poruke: 1318
*.teol.net.

+4 Profil

Re: zarez u brojevima

^{23.03.2005. u 16:03 - pre 232 meseci}

Windows računa da je zarez ono što ti je namješteno pod Regional Settings odnosno ono što dobiješ kada pritisneš "zarez" na numeričkoj tastaturi. Ne bi trebalo da to definišeš na nivou programa.

"I'd take the awe of understanding over the awe of ignorance any day."
- Douglas Adams

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: zarez u brojevima

^{23.03.2005. u 16:25 - pre 232 meseci}

Ovo ce raditi nezavisno od podesavanja. Samo ce u Text3 biti upisan rezultat kakav je po tim podesavanjima ali ce uvek dobiti sabrane brojeve.

Odgovor na temu

Not now, John!

Član broj: 231
Poruke: 1318
*.dialup.blic.net.

+4 Profil

Re: zarez u brojevima

^{23.03.2005. u 20:42 - pre 232 meseci}

Citat:

Shadowed: Ovo ce raditi nezavisno od podesavanja. Samo ce u Text3 biti upisan rezultat kakav je po tim podesavanjima ali ce uvek dobiti sabrane brojeve.

Ali kada prenese na neki drugi računar koji prikazuje brojeve kao "1.234.456,89" ili "1,234,456.89" neće raditi.

"I'd take the awe of understanding over the awe of ignorance any day."
- Douglas Adams

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: zarez u brojevima

^{24.03.2005. u 15:16 - pre 232 meseci}

Aha, ovo sa zarezom na drugim mestima mi nije palo na pamet. Onda bi mogao da uporedi InStrRev(Text1.Text, ",") i InStrRev(Text1.Text, ".") pa ako je ovaj prvi manji ili je drugi = 0 vrsi onu zamenu inace ne vrsi.

Odgovor na temu

sky_nex
Hrvatska

Član broj: 52675
Poruke: 6
195.29.122.*

Profil

Re: zarez u brojevima

^{25.03.2005. u 05:22 - pre 232 meseci}

Shadowed možeš li staviti cijeli primjer koda, jer nisam baš razumio ovo što si napisao!?

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: zarez u brojevima

^{25.03.2005. u 14:21 - pre 232 meseci}

Code:
If (InStrRev(Text1.Text, ",") < InStrRev(Text1.Text, ".")) Or (InStrRev(Text1.Text, ".") = 0) then _
Text3.Text = Val(Text1.Text) + Val(Replace(Text2.Text, ",", "."))

Odgovor na temu

quattor
Ljubisa Nikolic
Subotica

Član broj: 44020
Poruke: 130
*.suonline.net.

+10 Profil

Re: zarez u brojevima

^{25.03.2005. u 18:15 - pre 232 meseci}

Hmmm, zasto ne uradis to ovako, bar te nece boleti glava: Uzmes API f-ju GetLocaleInfo i vidis sta je u racunaru podeseno za decimale - zarez, da ne kazem zapeta, ili tacka. Onda korisniku dozvolis da unese samo taj znak i cifre od 0-9 i sve si resio, ukljucujuci i razne sasave unose. Jos ukoliko ubacis i f-ju IsNumeric...

Pozdrav...

Odgovor na temu

Not now, John!

Član broj: 231
Poruke: 1318
*.dialup.blic.net.

+4 Profil

Re: zarez u brojevima

^{25.03.2005. u 19:59 - pre 232 meseci}

Ja opet ponavljam. Nije uredu tjerati korisnika da brojeve upisuje na numeričkoj tastaturi, a zarez da ganja lijevo, kod razmaknice.

"I'd take the awe of understanding over the awe of ignorance any day."
- Douglas Adams

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: zarez u brojevima

^{25.03.2005. u 20:55 - pre 232 meseci}

@quattor. Sve je to OK. Ali sky_nex rece da hoce bas sa zarezom pa radimo na metodi da se bez obzira na podesavanje u Win-u koristi zarez. Znaci, pocetni uslov je bio koriscenje zareza.

Odgovor na temu

quattor
Ljubisa Nikolic
Subotica

Član broj: 44020
Poruke: 130
*.suonline.net.

+10 Profil

Re: zarez u brojevima

^{26.03.2005. u 07:21 - pre 232 meseci}

Momci, vi onda iskombinujte sve do sada receno. Sa GetLocaleInfo proveri sta je podeseno u Windowsu. Ako je zarez za decimale, onda je OK. Ako nije, onda zarez zameni sa tackom, kao sto je vec bilo postirano. Ako neces da trckaras do zareza kod razmaknice, napravi da se ukucana tacka na numerickoj tastaturi (vbKeyDecimal) automatski prevede u zarez. Naravno, nije sve tako jednostavno - ako je za decimale podesen zarez, ukucana tacka sa numericke tastature nije vise vbKeyDecimal, nego obicna tracka (keyascii=46). Nadam se da sam pomogao...

Pozdrav...

Odgovor na temu