Kako napraviti digitron koji sabira?

Kako napraviti digitron koji sabira? 19.03.2005. u 22:36 · pre 263 meseca #1

Posto sam totalni pocetnik u pisanju koda probao sam praviti najednostavniji
digitron koji sabira a kod glasi ovako Text3 = Text1 + Text2 i uvek umesto
da sabere u Text3 polju mi se upisu ta dva broja jedan do drugog.Probao sam
sa mnozenjem,deljenjem i oduzimanjem i koristio sam kod npr. za oduzimanje
Text3 = Text1 - Text2 i brojevi su oduzeti.Zasto se kod sabiranja ne saberu brojevi.
Napisite mi kod pa cu ga ja prouciti.

Re: Kako napraviti digitron koji sabira? 19.03.2005. u 22:55 · pre 263 meseca #2

Zato što se znak + tretira kao operand & što označava spajanje.Da bi to izbegao, kod sabiranja koristi Val.

Code:
Text3.Text = Val(Text1.Text) + Val(Text2.Text)

Potpis

-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

Re: Kako napraviti digitron koji sabira? 19.03.2005. u 23:02 · pre 263 meseca #3

Hvala

Re: Kako napraviti digitron koji sabira? 21.03.2005. u 12:00 · pre 263 meseca #4

He,he...A ja sam to do sada radio ovako:

Code:

Text3.Text = Text1.Text - - Text2.Text

Poz

Re: Kako napraviti digitron koji sabira? 23.03.2005. u 18:01 · pre 263 meseca #5

if operacija="+" then text1.text=cdbl(text1.text)+a
if operacija="-" then text1.text=a-cdbl(text1.text)

Re: Kako napraviti digitron koji sabira? 28.03.2005. u 08:49 · pre 262 meseca #6

Zasto jednostavno ne pozoves windows-ov calculator?

Re: Kako napraviti digitron koji sabira? 28.03.2005. u 14:19 · pre 262 meseca #7

ili ako imas neki slozeni izraz tipa 3+(8^(2/4)+2)*(2+(5-6)) mozes da koristis MS Script Control:
(prvo postavis referencu na Microsoft Scripting Control)

Code:

Sub Command1_Click()
Dim calc As New MSScriptControl.ScriptControl
calc.Language="VBScript"
MsgBox "Rezultat je: " & calc.Eval(Text1.Text)
End Sub

gde ti Text1 TextBox u koji je upisan taj slozeni izraz...

Potpis

rafforum.rs - Forum Računarskog Fakulteta

Re: Kako napraviti digitron koji sabira? 29.05.2012. u 22:17 · pre 175 meseci #8

Citat:

Aleksandar Ružičić: ili ako imas neki slozeni izraz tipa 3+(8^(2/4)+2)*(2+(5-6)) mozes da koristis MS Script Control:
(prvo postavis referencu na Microsoft Scripting Control)

Code:

Sub Command1_Click()
Dim calc As New MSScriptControl.ScriptControl
calc.Language="VBScript"
MsgBox "Rezultat je: " & calc.Eval(Text1.Text)
End Sub

gde ti Text1 TextBox u koji je upisan taj slozeni izraz...

Pozdrav, zanima me da li moze MS Script Control da se koristi u Delphiju 7? Ako moze, kako? Hvala unapred.

Forum kao aplikacija na telefonu

Srodne teme