Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kalkulator. Error pri deljenju sa nulom

[es] :: Visual Basic 6 :: Kalkulator. Error pri deljenju sa nulom

[ Pregleda: 567 | Odgovora: 19 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Crazy shadow
Milos Milic
Negotin

Član broj: 74894
Poruke: 173
79.101.139.*

Sajt: www.fgstudio.zxq.net


Profil

icon Kalkulator. Error pri deljenju sa nulom09.01.2008. u 15:47

Napravio sam jednostavan kalkulator.Ali imam problem pri deljenju sa nuom stalno mi izlazi eror.
Pokusao sam da ga resim tako sto sam stavio svoju poruku da ne moze da se deli sa nulom.
Ali nisam uspeo da izbegnem taj eror.
Dali ima neko ideju kako to da zaobidjem.
Evo pogledajte projekat.
Crazy shadow
Prikačeni fajlovi
09.01.2008. u 15:47 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
*.dynamic.adsl.itsisp.net.

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom09.01.2008. u 16:07
samo dodaj Exit Sub posle msgbox-a
Code:

If b = 0 Then
   MsgBox ("ne moze da se deli sa nulom!!"), , "Obavestenje"
   exit sub
End If

Čovekova dostignuća prevazilaze njegovu maštu.
09.01.2008. u 16:07 

Crazy shadow
Milos Milic
Negotin

Član broj: 74894
Poruke: 173
79.101.139.*

Sajt: www.fgstudio.zxq.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom09.01.2008. u 16:27
Kako mogu jos da ogranicim da nemogu da unosim slova.Kad unesem slova on ih racuna kao nulu.
Crazy shadow
09.01.2008. u 16:27 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
*.dynamic.adsl.itsisp.net.

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom09.01.2008. u 17:34
pretrazi forum bilo je o tome vise puta...
Čovekova dostignuća prevazilaze njegovu maštu.
09.01.2008. u 17:34 

steve585
Stevan Stanić
Peskovec

Član broj: 131815
Poruke: 166
*.xnet.hr.



Profil

icon Re: Kalkulator. Error pri deljenju sa nulom09.01.2008. u 19:45
Evo primjer za unos brojeva

Code:

Private Sub txtBroj_KeyPress(KeyAscii As Integer)
strValid = "0123456789"
If KeyAscii > 26 Then
If InStr(strValid, Chr(KeyAscii)) = 0 Then
 KeyAscii = 0
End If
End If
End Sub
09.01.2008. u 19:45 

Crazy shadow
Milos Milic
Negotin

Član broj: 74894
Poruke: 173
79.101.139.*

Sajt: www.fgstudio.zxq.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom09.01.2008. u 23:43
@steve585
jel bi mogo malo da mi objasnis ovaj kod.Od skori ucim VB pa ne razumem bas ovo sto si mi dao.
Jel bi mogo prakticno da mi pokazes neki prost primer?
Unapred hvala.
Crazy shadow
09.01.2008. u 23:43 

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 558
195.252.105.*

Sajt: www.eurora3d.com


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 12:39
Evo ti objasnjenje za kod koji je postavio @ @steve585
Inace kod je odlican i jednostavan.
Subrutina se izvrsava kad se pritisne taster na tastaturi.
Prvo je deklarisan string "0123456789" u kojem su svi znakovi koje dozvoljavamo.
InStr fn proverava dali neki substring postoji u stringu i vraca poziciju ili nulu ako ne postoji.
KeyAscii je Ascii vrednost pritisnutog tastera. (npr A=65) a Chr pretvara taj broj u znak (Chr(65)="A")
Code:

InStr(strValid, Chr(KeyAscii)) = 0 Then KeyAscii = 0

Ova linija znaci "Ako pritisnuti taster nije jedan od 0,1,2,3,4,5,6,7,8,9 onda ponisti akciju"
Kada se KeyAscii postavi na 0 onda se nista ne desava (kao da nije ni pritisnut taster)

Code:

If KeyAscii > 26 Then

Proveravamo samo za KeyAscii vece od 26
Pozdrav
char $[12] = "0D3 aroruE0";char* $$ = &$[10];
while(*(--$$)!='0')
cout << (char)*$$;
10.01.2008. u 12:39 

Crazy shadow
Milos Milic
Negotin

Član broj: 74894
Poruke: 173
79.101.139.*

Sajt: www.fgstudio.zxq.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 13:44
Hvala.
Sad razumem.
Crazy shadow
10.01.2008. u 13:44 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
77.46.147.*

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 15:28
samo sto taj kod ne dozvoljava upis decimalnih brojeva, al dobro, da ne trazimo dlaku u jajetu :)
Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 15:28 

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 558
91.148.114.*

Sajt: www.eurora3d.com


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 16:28
Citat:
Aleksandar Ružičić: samo sto taj kod ne dozvoljava upis decimalnih brojeva, al dobro, da ne trazimo dlaku u jajetu


Pa jeste ali posto je dobro zamisljen moze da se stavi
Code:

strValid = "0123456789."

ili
Code:

strValid = "0123456789,"

zavisno od jezickih podesavanja (a moze i strValid = "0123456789.,"


char $[12] = "0D3 aroruE0";char* $$ = &$[10];
while(*(--$$)!='0')
cout << (char)*$$;
10.01.2008. u 16:28 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
77.46.147.*

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 17:38
pa ne mozes jednostavno da dodas zarez (ili tacku) u strValid jer ce ti tako dozvoliti da recimo uneses 123.456.789.00.1 sto nije validno, moze umesto InStr i strValid moze da se koristi IsNumeric, tj ovaj deo:
Code:

If InStr(strValid, Chr(KeyAscii)) = 0 Then
 KeyAscii = 0
End If

moze da se zameni sa:
Code:

If Not IsNumeric(txtBroj.Text & Chr(KeyAscii)) Then
  KeyAscii = 0
End If

Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 17:38 

Shadowed
.NET developer

SuperModerator
Član broj: 649
Poruke: 8678
212.200.70.*

Sajt: www.diskusije.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 18:17
Ili nadj'te neki vec uradjeni regexp i.. htedoh reci nema glava da boli, al' tek onda pocinje :]
10.01.2008. u 18:17 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
77.46.147.*

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 18:23
dobro, ajde reci da .NET ima ugradjeni regexp a da vb6 nema, slobodno... :)
Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 18:23 

Shadowed
.NET developer

SuperModerator
Član broj: 649
Poruke: 8678
212.200.70.*

Sajt: www.diskusije.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 19:11
Ima, tj. postoji u Framework-u, ali nisam to hteo reci. Mislio sam da pronadje na netu gotovu klasu/stagod za VB6 i da je koristi za ovo a glavobolja kad krene mentalna gimnastika sa regexp-om.
10.01.2008. u 19:11 

steve585
Stevan Stanić
Peskovec

Član broj: 131815
Poruke: 166
*.xnet.hr.



Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 20:03
U skladu sa gore navedenim, ukoliko zelimo dozvoliti unos i decimalnih vrijednosti prvobitni kod bi trebalo doraditi, te bi dobili:

Code:

Private Sub txtBroj_KeyPress(KeyAscii As Integer)
strValid = "0123456789.,"
If KeyAscii > 26 Then
If Not IsNumeric(txtBroj.Text & Chr(KeyAscii)) Then
  KeyAscii = 0
End If
End If
End Sub


10 bodova
10.01.2008. u 20:03 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
77.46.147.*

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 20:22
Citat:
Shadowed: Ima, tj. postoji u Framework-u, ali nisam to hteo reci. Mislio sam da pronadje na netu gotovu klasu/stagod za VB6 i da je koristi za ovo a glavobolja kad krene mentalna gimnastika sa regexp-om.


pa ne vidim neku gimnastiku za ovakav regexp, trebalo bi nesto ovako da resi problem: /^[0-9]*(\.[0-9]+)?$/g

ili malo egzoticnije resenje: /^([0-9]*\.[0-9]+(e[+-]?[0-9]+)?)|([0-9]+e[+-]?[0-9]+)$/gi

inace ovaj drugi regexp koristim veoma cesto
Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 20:22 

Shadowed
.NET developer

SuperModerator
Član broj: 649
Poruke: 8678
212.200.70.*

Sajt: www.diskusije.net


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 20:35
A onom ko se prvi pu srece sa tim? I jos mu je VB prvi (jedini) jezik a ono polu-english pa kad vidi tu kriptiku :)
10.01.2008. u 20:35 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
77.46.147.*

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 20:45
pa dobro, upravu si. secam se svoje reakcije kad sam prvi put video neki regexp :)

al, eto meni teme za tutorijal ;)
Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 20:45 

steve585
Stevan Stanić
Peskovec

Član broj: 131815
Poruke: 166
*.xnet.hr.



Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 20:52
Nikad vidio nesto slicno. Kako ovo razmislja?
10.01.2008. u 20:52 

Aleksandar Ružičić
Developer, Haragei Creative Solutions
Beograd - Čačak

Moderator
Član broj: 26939
Poruke: 1781
*.dynamic.adsl.itsisp.net.

Jabber: krcko@haragei.com
Sajt: krcko.haragei.org


Profil

icon Re: Kalkulator. Error pri deljenju sa nulom10.01.2008. u 22:01
http://en.wikipedia.org/wiki/Regular_expression
http://www.regular-expressions.info/

Čovekova dostignuća prevazilaze njegovu maštu.
10.01.2008. u 22:01 

[es] :: Visual Basic 6 :: Kalkulator. Error pri deljenju sa nulom

[ Pregleda: 567 | Odgovora: 19 ]

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.