Taschenrechner erstellen in VB 6.0

[Biri]

sorry - aber das problem versteh ich nicht wirklich -würde mal vorschlagen:

pseudocode:
-----------

dim op as variant
dim erg as variant

op = ""
erg = 0

solange keine rechenoperationstaste gedrückt (+,-,*,/)
zahl einlesen
ende solange
op = <gedrückte taste für rechenoperation>

if (op == "+")
erg = erg + val(textfeld)
if (op == "-")
erg = erg - val(testfeld)
if (op = "C")
erg = 0
if (op = "sin")
erg = sin(erg)
...

textfeld = str(erg)

fg
-hannes