Visual Basic

[edmoor]

Laat dan je huidige code eens zien of plaats je project hier.

 

[troykz]

Laat dan je huidige code eens zien of plaats je project hier.

Public Class Form1
    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click

    End Sub

    Private Sub Label2_Click(sender As Object, e As EventArgs) Handles Label2.Click

    End Sub

    Private Sub txbGetal1_TextChanged(sender As Object, e As EventArgs) Handles txbGetal1.TextChanged
        Double getal1 = Double.Parse(txbGetal1.Text)

    End Sub

    Private Sub txbGetal2_TextChanged(sender As Object, e As EventArgs) Handles txbGetal2.TextChanged
        Double getal2 = Double.Parse(txbGetal2.Text)

    End Sub

    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        MessageBox.Show(Getal1 + getal2)
    End Sub
End Class

 

[edmoor]

Volgens mij heb je hier voldoende aan:

Public Class Form1
    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        MessageBox.Show(txbGetal1.Text + txbGetal2.Text)
    End Sub
End Class

 

[troykz]

hier het volledige project, werkt nog niet ;'(

 

[edmoor]

Omdat je al die andere Subs er nog in hebt staan.
Haal alles weg en plak dit er in:

Public Class Form1
    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        MessageBox.Show(CDbl(txbGetal1.Text) + CDbl(txbGetal2.Text))
    End Sub
End Class

 

[troykz]

Omdat je al die andere Subs er nog in hebt staan.
Haal alles weg en plak dit er in:

Public Class Form1
    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        MessageBox.Show(CDbl(txbGetal1.Text) + CDbl(txbGetal2.Text))
    End Sub
End Class

Ma dat is het juist, ik moet met die double werken.

 

[edmoor]

CDbl IS Double
Maar als je dat duidelijker wilt laten zien mag je het ook zo doen:

Public Class Form1
    Dim Getal1 As Double
    Dim Getal2 As Double

    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        Getal1 = txbGetal1.Text
        Getal2 = txbGetal2.Text
        MessageBox.Show(Getal1 + Getal2)
    End Sub
End Class

 

[troykz]

CDbl IS Double
Maar als je dat duidelijker wilt laten zien mag je het ook zo doen:

Public Class Form1
    Dim Getal1 As Double
    Dim Getal2 As Double

    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click
        Getal1 = txbGetal1.Text
        Getal2 = txbGetal2.Text
        MessageBox.Show(Getal1 + Getal2)
    End Sub
End Class

en 'parse' is niet nodig dan?.

 

[edmoor]

Nee, dat is voor heel andere doeleinden.

NB:
Gebruik niet de Quote knop als je direct op het voorgaande bericht reageert.

 

[troykz]

oke bedankt!

juist bij messagebox loopt er nog iets niet juist, hij moet namelijk een tekst weergeven met de naam van txbNaam.

Public Class Form1
    Dim Getal1 As Double
    Dim Getal2 As Double


    Private Sub btnBereken_Click(sender As Object, e As EventArgs) Handles btnBereken.Click

        Getal1 = txbGetal1.Text
        Getal2 = txbGetal2.Text

        MessageBox.Show("beste" + txbNaam.ToString() + ", de som van" + Getal1 + "en" + Getal2 + "is" + (Getal1 + Getal2))
    End Sub

End Class
End Class

geeft de fout: System.InvalidCastException: 'De conversie van tekenreeks besteSystem.Windows.Forms.TextBo naar type Double is ongeldig

 

[edmoor]

Maak er dit van:

MessageBox.Show("Beste " & txbNaam.Text & "," & vbCrLf & vbCrLf & "De som van " & Getal1 & " en " & Getal2 & " is: " & Getal1 + Getal2)

 

[troykz]

bedankt in de cursus stond + teken

 

[edmoor]

Het plus teken is om te rekenen.
Voor het aan elkaar plakken van tekst gebruik je het & teken.

 

[troykz]

bedankt alvast voor de vele hulp

hoe kan ik nu een usercontrol tonen, in form1 in een panel dit vanuit een menu?
of een form2 maar de bovenste balk verwijderen

 

[edmoor]

Wat bedoel je met "een panel"?

 

[troykz]

of een groupbox

 

[edmoor]

Dat soort dingen kan je allemaal in de Toolbox vinden.

 

[troykz]

ja deze heb ik toegevoegd aan Form1.
maar nu wil ik een usercontrol1 tonen in het panel(of groupbox) wanneer ik in het menu op een bepaald knopje druk.

 

[edmoor]

Geen idee wat je bedoelt met een usercontrol.
Daarnaast heeft je project maar 1 form die direct wordt geopend.
Tevens bevat deze geen menu.

 

[edmoor]

Inmiddels de UserControl bekeken.
Die heb ik nog nooit gebruikt maar er is genoeg info over te vinden, ook op Youtube.
Daar mag je dus zelf mee stoeien