[VB.NET] Integer aus einer .ini koreckt aus lesen Visual Studio 2017

[ProDielerNR(1)]

Hallo mit einander ich habe ein problem
ich möchte gerne bei meinem kleinen project die zahl von einem label
was hoch gerechnet wird mit einem integer abspeichern und wieder auslesen
dies funktioniert jedoch nicht und ich weiß nicht genau warum.

Meine Deklaration

 Dim Punkte As Integer
Public WithEvents TP As New Label

Beim Anfang soll geschaut werden ob die datei mit der info exestiert
falls ja soll sie diese auslesen und die richtig zahl anzeigen,
wen sie nicht exestiert soll die zahl 0 verzeichnet werden

 If TP.Text = "Tode:" & " " & INI_ReadValueFromFile("Title", "Tode: ", "", ".\Death.ini").ToString Then
                Punkte = INI_ReadValueFromFile("Title", "Tode: ", "", ".\Death.ini").ToString
                TP.Text = "Tode:" & " " & Punkte
            Else
                TP.Text = "Tode:" & " " & "0"
                Me.TP.Font = New System.Drawing.Font("Arial", 15.0!,
System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point,
CType(0, Byte))
                Punkte = 0
            End If

wen man dann einen Punkt verzeichnet bekommen hatte soll es hier mit
die datei erstellt werden und gleichzeitig verzeichnet werden

INI_WriteValueToFile("Title", "Tode: ", Punkte, ".\Death.ini")

Im grunde geht es mir hierbei nur um das absichern und das auslesen
alles andere funktioniert tadellos

es wird auch abgesichert mit der neuen zahl die man im weiteren code verlauf bekommt nur das auslesen danach macht Schwierigkeiten :/

Closed Quest

[elmarcia]

Don't know INI_ReadValueFromFile parameters, im assuming
(<section>,<key>,<default if fail>,<filename>),
Then we add "0" as default value, this works as follow, if can't find ini file because isn't created yet, or the key doesn't exists, will return default value when reading.

if so, no if clause needed since u don't need to check, also make sure to convert to int your string if u need an integer

replace:

 If TP.Text = "Tode:" & " " & INI_ReadValueFromFile("Title", "Tode: ", "", ".\Death.ini").ToString Then
                Punkte = INI_ReadValueFromFile("Title", "Tode: ", "", ".\Death.ini").ToString
                TP.Text = "Tode:" & " " & Punkte
            Else
                TP.Text = "Tode:" & " " & "0"
                Me.TP.Font = New System.Drawing.Font("Arial", 15.0!,
System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point,
CType(0, Byte))
                Punkte = 0
            End If

with:

Punkte = Convert.toInt32(INI_ReadValueFromFile("Title", "Tode: ", "0", ".\Death.ini").ToString)
TP.Text = "Tode:" & " " & Punkte