If btnBereken.Text = "Bereken" Then

            MessageBox.Show("Bronspanning : " & decbron & Environment.NewLine & "Led spanning : " & decledv & Environment.NewLine & "led stroom in A : " & decleds & Environment.NewLine & "aantal leds : " & decleda & Environment.NewLine & Environment.NewLine & "Voorschakelweerstand : " & strvoorschakelweerstand)

        Else

            MessageBox.Show("Source voltage : " & decbron & Environment.NewLine & "Led Voltage : " & decledv & Environment.NewLine & "led Current in A : " & decleds & Environment.NewLine & "amount of leds : " & decleda & Environment.NewLine & Environment.NewLine & "needed resistor : " & strvoorschakelweerstand)

 

        End If