2 Setting bij elkaar op tellen.

[Spy1]

Hallo, ik wil 2 setting bij elkaar optellen. Ik heb nu deze code in handen gekregen :

        Dim r As String = My.Settings.Fouten
        Dim r2 As String = My.Settings.Goed

        Dim test As String = r + r2

Maar als Fouten 1 is en Goed 2 is dan laat ie 12 zien, en dat moet niet. Hij moet plus elkaar doen. Hoe kan dit?

- Maikel van Haaren

 

[CoD_NL]

Hallo, ik wil 2 setting bij elkaar optellen. Ik heb nu deze code in handen gekregen :

        Dim r As String = My.Settings.Fouten
        Dim r2 As String = My.Settings.Goed

        Dim test As String = r + r2

Maar als Fouten 1 is en Goed 2 is dan laat ie 12 zien, en dat moet niet. Hij moet plus elkaar doen. Hoe kan dit?

- Maikel van Haaren

Je gebruikt het verkeerde type. (een string is niet bedoeld voor dit soort rekenwerk)

 

[Spy1]

Hoe moet ik het dan aanpakken?

 

[CoD_NL]

De input moet je omzetten naar een integer en daarna kun je de berekening doen.

 

[Spy1]

Uhmm... ja, als ik wist hoe ik dat moest veranderen. Zou ik het graag doen... maja...

 

[CoD_NL]

Uhmm... ja, als ik wist hoe ik dat moest veranderen. Zou ik het graag doen... maja...

Google ? (in VB6 was dit nog cint(); ik heb geen idee wat dit in VB.NET is)

 

[Spy1]

Heb je een goeie zoekterm voor me dan?

 

[CoD_NL]

'VB.NET' + 'convert string to integer ' ?

 

[Spy1]

Grrr.... het wil niet lukken...

 

[Jabber]

Waarom zet je het in de settings niet als integer?

 

[Spy1]

Als jij zegt hoe doe ik het graag...

 

[CoD_NL]

Als jij zegt hoe doe ik het graag...

haha... ik zou toch wel een boek kopen en/of leren hoe je met Google werkt.

        Dim r As String = My.Settings.Fouten
        Dim r2 As String = My.Settings.Goed

In dit geval zijn 'my.settings.fouten' en 'my.settings.goed' dus van het type string. Als je dit wijzigt in een integer dan kun je de berekening doen zoals je dat wilt.

 

[Spy1]

        Dim r As Integer = My.Settings.Fouten
        Dim r2 As Integer = My.Settings.Goed

        r+r2 =

Zo moet het niet, maar hoe moet het wel?

 

[Spy1]

Vraag opgelost

 

[madrofiel]

even voor de duidelijkheid wie nog meer hiermee zit

        Dim r As Integer = Integer.Parse(My.Settings.Fouten)
        Dim r2 As Integer = Integer.Parse(My.Settings.Goed)

 

[Spy1]

Ik heb

        Dim r As Integer = My.Settings.Fouten
        Dim r2 As Integer = My.Settings.Goed

        Dim test As String = r + r2

 

[lacosta vb]

Als je het helemaal goed wil doen:

Dim r As Integer = CInt(My.Settings.Fouten)
        Dim r2 As Integer = CInt(My.Settings.Goed)
        Dim som As Integer = r + r2
Dim test As String = CStr(som)

 

[CoD_NL]

Als je het helemaal goed wil doen:

Dim r As Integer = CInt(My.Settings.Fouten)
        Dim r2 As Integer = CInt(My.Settings.Goed)
        Dim som As Integer = r + r2
Dim test As String = CStr(som)

Dat kan natuurlijk korter

dim res as string = cstr(cint(my.settings.goed) + cint(my.settings.fouten))

Daarbij houd je het aantal goed/fout gegeven antwoord natuurlijk niet bij in een string als je het goed wilt doen. (my.settings.fouten/my.settings.goed)

edit: in sommige gevallen geeft 'cint' trouwens wel een ander resultaat dan je misschien zou verwachten. (is hier niet echt van toepassing)