Forum » Programiranje » [VB6] Težava pri seštevanju vrednosti. NUJNO
[VB6] Težava pri seštevanju vrednosti. NUJNO

MihaFirst ::
Pozdravljeni!
V programu, ki ga programiram, potrebujem okence za ceno vseh artiklov skupaj in za DDV delež tega vsega skupaj.
Prvi poskus je bil to:
text3.text = text3.text + Text2.Text + "€"
text4.text = text3.text / 100 * 8.5 + "€"
text2.text je okence za ceno enega artikla, ki se kasneje resetira.
Problem je v tem, da se mi v text3.text, ki ima privzeto vrednost "0" rezultat ne sešteva na tak način: 0+5+5 = 10 ampak na način 0+5+5=055.
Kasneje sem spremenil stvar s tem da sem najavil vrednosti Skupaj in DDV takole:
Skupaj = Skupaj + Text2.Text + "€"
DDV = Skupaj / 100 * 8.5 + "€"
Text3.Text = Skupaj
Text4.Text = DDV
Spet ne dela seštevek cen, tokrat pa mi ne dela niti izračun DDV-ja.
Kako torej rešit težavo?
LP
V programu, ki ga programiram, potrebujem okence za ceno vseh artiklov skupaj in za DDV delež tega vsega skupaj.
Prvi poskus je bil to:
text3.text = text3.text + Text2.Text + "€"
text4.text = text3.text / 100 * 8.5 + "€"
text2.text je okence za ceno enega artikla, ki se kasneje resetira.
Problem je v tem, da se mi v text3.text, ki ima privzeto vrednost "0" rezultat ne sešteva na tak način: 0+5+5 = 10 ampak na način 0+5+5=055.
Kasneje sem spremenil stvar s tem da sem najavil vrednosti Skupaj in DDV takole:
Skupaj = Skupaj + Text2.Text + "€"
DDV = Skupaj / 100 * 8.5 + "€"
Text3.Text = Skupaj
Text4.Text = DDV
Spet ne dela seštevek cen, tokrat pa mi ne dela niti izračun DDV-ja.
Kako torej rešit težavo?
LP

luli ::
Poskusi nekaj v stilu
text3.text = Cstr((val(text3.text) + val(Text2.Text))) + "€"
Nisem siguren!
text3.text = Cstr((val(text3.text) + val(Text2.Text))) + "€"
Nisem siguren!
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | VB6 poljuben stringOddelek: Programiranje | 902 (783) | primzx |
» | Kalkulator-problemOddelek: Programiranje | 1425 (1358) | Tutankhamun |
» | visual basic-seštevanjeOddelek: Programiranje | 922 (864) | Red_Mamba |
» | VB in kk dobit Ip od račnalnikaOddelek: Programiranje | 1270 (1104) | alesrosina |
» | Visual Basic HELPOddelek: Programiranje | 1253 (1125) | GaPe |