Archief - [PROG][VB.NET] Simpel calculator vraagje

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.

X1RON

Legacy Member
Hallo :)
Sinds een paar weken krijgen we vb.net bij ons op school.
Nu ben ik een beetje in de war met iets omdat we vanaf vorige week "Option explicit" en "option strict" op on moesten zetten. Als voorbeeldje heb ik een heel simpele calculator gemaakt die getal1 en getal2 optelt en de uitkomst komt in txtuitkomst

dit is mijn code:
Code:
Public Class Form1

    Private Sub btnbereken_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbereken.Click

        'variabelendeclaratie
        Dim snggetal1 As Single
        Dim snggetal2 As Single
        Dim snguitkomst As Single

        'invoer
        snggetal1 = CSng(txtgetal1.Text)
        snggetal2 = CSng(txtgetal2.Text)

        'verwerking
        snguitkomst = snggetal1 + snggetal2

        'uitvoer
        txtuitkomst.Text = CStr(txtuitkomst.Text)


    End Sub
End Class
De fout zit in de uitvoer neem ik aan, maar naar wat moet ik die txtuitkomst.Text dan converteren?

grtzz
filip

Yank

Legacy Member
Code:
txtuitkomst.Text = cstr(snguitkomst)
door de option strict dan

wat jij doet in je eigen code is een string maken van de tekst van textbox (die al een string is, dus niet echt zinvol denk ik) en die dan in de tekst van diezelfde textbox steken, alsof je (zonder de option strict dan) zou zeggen:
Code:
textbox1.text = textbox1.text

X1RON

Legacy Member
Yankee zei:
Code:
txtuitkomst.Text = cstr(snguitkomst)
door de option strict dan

wat jij doet in je eigen code is een string maken van de tekst van textbox (die al een string is, dus niet echt zinvol denk ik) en die dan in de tekst van diezelfde textbox steken, alsof je (zonder de option strict dan) zou zeggen:
Code:
textbox1.text = textbox1.text
ja ok, maar hoe moet het dan met option strict aan?

Hit Hard

Legacy Member
_-X!rOn-_ zei:
ja ok, maar hoe moet het dan met option strict aan?
Zoals het daar staat.

Vergelijk jouw uitvoer regel eens met die van Yankee:
Code:
txtuitkomst.Text = CStr(txtuitkomst.Text)
txtuitkomst.Text = CStr(snguitkomst)
In het eerste geval (wat jij gedaan hebt) zet je gewoon de inhoud van de textbox in de textbox, terwijl de inhoud van de variabele (snguitkomst) in de textbox moet komen. De 2e regel zou dus moeten werken, ook met de Strict option.

X1RON

Legacy Member
Hit Hard zei:
Zoals het daar staat.

Vergelijk jouw uitvoer regel eens met die van Yankee:
Code:
txtuitkomst.Text = CStr(txtuitkomst.Text)
txtuitkomst.Text = CStr(snguitkomst)
In het eerste geval (wat jij gedaan hebt) zet je gewoon de inhoud van de textbox in de textbox, terwijl de inhoud van de variabele (snguitkomst) in de textbox moet komen. De 2e regel zou dus moeten werken, ook met de Strict option.
ohja het werkt :) nu snap ik het eindelijk :) thx!
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan