✔ [VB2005] Wo ist der Fehler (einfache Rechnung)

[Eichhornleib]

        Dim k1 As String
        Dim k2 As String

        k1 = "ab"
        k2 = "yz"

        k1 = k1.Replace("ab", "1")
        ...
        k1 = k1.Replace("yz", "9")

        k2 = k2.Replace("ab", "1")
        ...
        k2 = k2.Replace("yz", "9")

        If (k2+10 / k1) * 5 <> "12345" Then
            MsgBox("Sie haben keinen gültigen Key angegeben!", MsgBoxStyle.Critical, "Fehler")
        End If

Es kommt immer ein Fehler bei der If Abfrage.
Liegt wohl an dem Rechnen...

 

[Norbert Eder]

a) Was für eine Fehler kommt?
b) Warum kein vollständiger Sourcecode? Ausserdem solltest du die Variablen auch setzen, damit man sich davon ein Bild machen kann.

 

[Eichhornleib]

Es kommt: InvalidCastExpection wurde nicht behandelt...
Ich habe es gelürzt weil dort wo ... nur andere replaces sind...
die variabeln wurden bei mir gesetzt... habe nur die angaben leer gelassen.

 

[Christian Kusmanow]

Wenn Du mit Strings rechnen willst, musst diese erst mal in den entsprechenden Datantyp konvertieren, damit überhaupt gerechnet werden kann. Und man muss auch einen Gleitkommazahlentyp bei einer Division verwenden, da sonst die dabei entstehenden Gleitkommazahlen einfach abgeschnitten werden würden, also dach der Division gar nicht verwertet werden.

string
	string1 = "ab",
	string2 = "yz";

string1 = string1.Replace("ab", "1");

string1 = string1.Replace("yz", "9");

string2 = string2.Replace("ab", "1");

string2 = string2.Replace("yz", "9");

int
	number1 = int.Parse( string1 ),
	number2 = int.Parse( string2 );

if ( ((double) number2 + 10 / (double) number1) * 5 != 12345 )
{
	
}
else{}

So wird ein Schuh draus.

//Edit: Was soll das Ganze überhapt werden?