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

oduzimanje,množenje,djelenje

[es] :: Visual Basic 6 :: oduzimanje,množenje,djelenje

[ Pregleda: 8598 | Odgovora: 10 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

system32
Hrvatska

Član broj: 49639
Poruke: 29
*.adsl.net.t-com.hr.



Profil

icon oduzimanje,množenje,djelenje12.04.2005. u 16:57 - pre 212 meseci
Malo glupo,ali mi treba za školu a baš to i ne znam
Treba mi kod za oduzimanje npr:Text3.text = Text1.text minus Text2.text
--------------- djelenje npr :Text3.text = Text1.text Podjeljeno s Text2.text
--------------- množenje npr:Text3.text = Text1.text pomnozeno s Text2.text
Hvala
 
Odgovor na temu

VRKY

Član broj: 21087
Poruke: 4690
*.adsl.net.t-com.hr.



+8 Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:07 - pre 212 meseci
Pa brate to ti je bar lako...

Code:

broj1 = Text1.text
broj2 = Text2.text
rez = broj1 + broj2
Text3.text = rez


Ovo sam pisao napamet stoga :)
Sad samo mijenjaj operacije...
 
Odgovor na temu

system32
Hrvatska

Član broj: 49639
Poruke: 29
*.adsl.net.t-com.hr.



Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:18 - pre 212 meseci
Hvala.Prvi sam srednje i tek smo počeli u VB-u.Još ako bi mi mogao reci kako korjenovati i kvadrirati bio bih prezadovoljan ali ne treba.npr:korjen text1,kvadrat text2
Još jedanput hvala
 
Odgovor na temu

system32
Hrvatska

Član broj: 49639
Poruke: 29
*.adsl.net.t-com.hr.



Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:29 - pre 212 meseci
Napišem
Text3.text = Text1.text ÷ Text2.text,i neće,ili probam text3.text = Text1.text × text2.text i opt ništa,šta je sad to?
 
Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1345
*.telekom.yu.



+104 Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:34 - pre 212 meseci
Sabiranje: +
Oduzimanje: -
Deljenje: /
Množenje: *
Kvadrat: ^ 2 ' ovo 2 možeš naravno da menjaš ako ti treba veći stepen
Koren: ^ (1/2) ' ovo 2 možeš naravno da menjaš ako ti treba 3,4 ... x-ti koren

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu
 
Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1345
*.com
Via: [es] mailing liste



+104 Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:35 - pre 212 meseci
Kvadrat je "^"

Code:

 
 broj1 = Text1.text
 
 rez = broj1 ^ 2
 
 Text3.text = rez
 
 


a koren je u principu isto to i kvadratiranje

Code:

  
  broj1 = Text1.text
  
  rez = broj1 ^ (1/2)
  
  Text3.text = rez
  
  

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu
 
Odgovor na temu

Zeromicin

Član broj: 31930
Poruke: 152
*.panet.co.yu.



Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 17:50 - pre 212 meseci
 Text1.text sadrzi podatke o stringu (tekstu) pa je potrebno konvertovati u brojcanu vrednost. funkcija za konverziju je Val(string) pa mozes sa pises: deljenje: Text1 = val(text2.text) / val(text3.text) mnozenje: Text1 = val(text2.text) *val(text3.text) itd... Umesto Text1.text mozes da pises Text1 pa dodela, posto se podrazumeva da dodela ide u text property. A za ostale operacije, ako ne znas engleski, uzmes lepo neki Sr-En recnik, pa lepo ukucas kako se na naski kaze funkcija, odes lepo u help VB-a i ukucas trazenu funkciju, i tamo imas opis funkcije, primere, etc. cu
 
Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859


Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 18:08 - pre 212 meseci
Uzmes naprimer:
da imas: txtBroj1, txtBroj2, txtSvega, cmdIzracunaj

Code:


Private sub cmdIzracunaj_Click()
On Error Resume Next

txtSvega = val(txtBroj1)+(txtBroj2) ' primjer za sabiranje
txtSvega = txtBroj1 / txtBroj2 ' primjer za djeljenje
txtSvega = txtBroj1 * txtBroj2 ' primjer za mnozenje
txtSvega = txtBroj1 - txtBroj2 ' primjer za oduzimanje

End Sub


Valjda ce ti pomoci. Pozdrav
A gde je moj moped ko da je u moravu propo!
Pero kojot genije!
 
Odgovor na temu

System alert

Član broj: 38984
Poruke: 49
*.beotel.net.



Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 18:18 - pre 212 meseci
Izracunavanje kvadratnog korena:

Code:
Text2.text = Sqr(text1.text)


System Alert
 
Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org


+828 Profil

icon Re: oduzimanje,množenje,djelenje12.04.2005. u 19:13 - pre 212 meseci
Po meni, najbolja solucija je napraviti funkcije za računske operacije.Recimo ovako, u modul:
Code:
Public Function Saberi(a As Single, b As Single)
Saberi = a + b
End Function
Public Function Oduzmi(a As Single, b As Single)
Oduzmi = a - b
End Function
Public Function Pomnozi(a As Single, b As Single)
Pomnozi = a * b
End Function
Public Function Podeli(a As Single, b As Single)
Podeli = a / b
End Function
Public Function Kvadriraj(a As Single)
Kvadriraj = a ^ 2
End Function

I onda ih pozivati bilo gde iz koda.Recimo, za sabiranje 2 i 3 kucamo
Code:
Dim a as Single
a = Saberi(2, 3)

Sličan je princip i za ostale računske radnje, a za kvadratni koren VB već ima ugrađenu funkciju Sqr.Recimo ako vam treba kvadratni koren za broj 25
Code:
Dim a As Single
a = Sqr(25)

Za ograničavanje decimala možete koristiti funkciju format.Recimo ograničenje za dve decimale
Code:
Dim a As Single
a = Format(Sqr(17), "#.##")

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti
 
Odgovor na temu

system32
Hrvatska

Član broj: 49639
Poruke: 29
*.adsl.net.t-com.hr.



Profil

icon Re: oduzimanje,množenje,djelenje13.04.2005. u 13:17 - pre 212 meseci
Hvala ljudi.
 
Odgovor na temu

[es] :: Visual Basic 6 :: oduzimanje,množenje,djelenje

[ Pregleda: 8598 | Odgovora: 10 ] > FB > Twit

Postavi temu Odgovori

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