Multiplizieren mit strings

[Benni125]

Dieser code soll herraus finden, ob ein benutzer in ein stringgadget ein * eingegeben hat. wenn das der fall ist, soll der code die zahl die vor dem '*' steht mit der zahl multiplizieren die dahinter steht... aber ich hab das gefühl, die abfrage funktioniert nicht richtig. hier der code:

Code: Alles auswählen

If FindString(text$,"*",1)<>0
        pos=FindString(text$,"*",1)
        zahl1$=Left(text$,pos-1)
        zahl2$=Right(text$,Len(text$)-pos+1)
        zahl=Val(zahl1$)*ValF(zahl2$)
        text$=StrF(zahl)
      EndIf

[Kiffi]

1. Bitte einen aussagekräftigen Betreff wählen
2. Bitte Code-Tags verwenden
3. mit "Debug" kannst Du Dir den Inhalt der Variablen ausgeben lassen

beispielsweise:

Code: Alles auswählen

  Debug zahl1$
  Debug zahl2$

dann wirst Du schnell erkennen, wo der Fehler liegt.

4. Gehört das hier eher in das Anfänger-Forum

Grüße ... Kiffi

[Kaeru Gaman]

ins richtige unterforum verschieben mache ich.

dein erstes posting editiert du bitte selber in bezug auf aussagekräftigen titel und Code-Tags.
(dein posting hat einen edit-button, direkt neben "zitat")

[PureBasic4.0]

ich würde sagen, ersetze folgende Zeile:

Code: Alles auswählen

pos=FindString(text$,"*",1)

durch:

Code: Alles auswählen

pos=FindString(text$,"*",0)

[Kiffi]

ich würde sagen, [...]

Die bei FindString() anzugebende Position beginnt immer mit 1.

Ansonsten gilt immer noch mein Tipp:

Code: Alles auswählen

Debug zahl1$
Debug zahl2$

Grüße ... Kiffi

[AND51]

Warum benutzt du Left() und Right()? Geht doch einfacher mit StringField().

[50-Pfennig]

Warum lässt du dir zahl1$ als Integer ausgeben und zahl2$ als Float?

[Kaeru Gaman]

warum werden hier so viele zwischenfragen gestellt?


@Benni125

hast du inzwischen mal Kiffis Rat befolgt, und die erzeugten strings debuggt?

[AND51]

> warum werden hier so viele zwischenfragen gestellt?
Warum wollen wir alle nur helfen?


@ Topic: Und schon weiter gekommen?