VB6 Calculator

[fazz12]

Just in case lang po me nangangailangan. VB6 calcu with source code.


update: yung calcu2 mejo rush pero me multiple input. unting kalikot na lang dun ayus na yun. patry na lang.

 

[Causing Glenn]

_pwede ba gawing , multiple inputs? i mean, sana pwede yung 5+5+5 , ? 15 answer

 

[fazz12]

_pwede ba gawing , multiple inputs? i mean, sana pwede yung 5+5+5 , ? 15 answer

ah sige wait lang

 

[Oz KnightWalker]

_pwede ba gawing , multiple inputs? i mean, sana pwede yung 5+5+5 , ? 15 answer

Glen..... Ikaw Ha

 

[Causing Glenn]

Glen..... Ikaw Ha

_hahah , ana lang

 

[fazz12]

_hahah , ana lang

patry na lang boss yung calcu2

 

[Causing Glenn]

patry na lang boss yung calcu2

error dito
************************
Private Sub Command15_Click()
Display.Text = CStr(sc.Eval(Display.Text))
End Sub
*************************
pwede pa.check ulit boss

 

[fazz12]

error dito
************************
Private Sub Command15_Click()
Display.Text = CStr(sc.Eval(Display.Text))
End Sub
*************************
pwede pa.check ulit boss

paki sunod na lang p yung instruction sa text file na sinama ko. may SS na din po sa loob nito. thanks.

 

[Causing Glenn]

paki sunod na lang p yung instruction sa text file na sinama ko. may SS na din po sa loob nito. thanks.

_salamat ulit, ayos na
.tanong ko lang, saan banda dun sa code kung paano ginawa yung operation?
.ano ibig sabihin nito " CStr(sc.Eval(Display.Text))"
.pasensya na beginner pa kasi ako sa vb

 

[fazz12]

_salamat ulit, ayos na
.tanong ko lang, saan banda dun sa code kung paano ginawa yung operation?
.ano ibig sabihin nito " CStr(sc.Eval(Display.Text))"
.pasensya na beginner pa kasi ako sa vb

ok. mejo lengthy to so her we go.
jan po mismo sa code na "CStr(sc.Eval(Display.Text))" ginawa yung operation, after mo iclick yung =.
sc.Eval(Display.Text) - it means ievaluate anuman yung laman ng string na nasa Display.Text / iperform anumang operation ang nakalagay. It means kung may + na nakalagay don sa textbox, iadd, kung -, isubtract, etc.
yung CStr() naman, it means gawing string yung nakalagay sa loob ng "()", which is yun ngang "sc.Eval(Display.Text)". kailangan gawing string ang data type nun para maging compatible sa .Text property ng Display.

 

[Causing Glenn]

ok. mejo lengthy to so her we go.
jan po mismo sa code na "CStr(sc.Eval(Display.Text))" ginawa yung operation, after mo iclick yung =.
sc.Eval(Display.Text) - it means ievaluate anuman yung laman ng string na nasa Display.Text / iperform anumang operation ang nakalagay. It means kung may + na nakalagay don sa textbox, iadd, kung -, isubtract, etc.
yung CStr() naman, it means gawing string yung nakalagay sa loob ng "()", which is yun ngang "sc.Eval(Display.Text)". kailangan gawing string ang data type nun para maging compatible sa .Text property ng Display.

_so di pala manual coding operation ang ginamit dito, hahah
.ayos din pala.

 

[airnel]

paki sunod na lang p yung instruction sa text file na sinama ko. may SS na din po sa loob nito. thanks.

nice share boss :y: gamitin natin ito