In een applicatie geef ik d.m.v. een label (lblMelding) meldingen weer die de gebruiker aanwijzingen geeft bij het werken met de applicatie.
Nu wil ik in een subroutine alle meldingen declaren en deze vervolgens in verschillende functies aanroepen:
Als ik de melding aanroep met de meldingcode (bijv. m01 of m02) moet deze via de subroutine ingesteld worden op lblMelding.Text. Hoe doe ik dit?
Nu wil ik in een subroutine alle meldingen declaren en deze vervolgens in verschillende functies aanroepen:
code:
1
2
3
4
5
6
7
8
9
10
11
| 'Meldingen declareren
Sub Melding(ByVal sMelding As String)
Dim m01 As String = "Selecteer klant op klantnummer of naam.
Dim m02 As String = "Kies 'Selecteer' voor nieuwe selectie.
Dim m03 As String = "Geen klanten gevonden."
lblMelding.Text = ?
End Sub
'Melding aanroepen
Melding(m01) |
Als ik de melding aanroep met de meldingcode (bijv. m01 of m02) moet deze via de subroutine ingesteld worden op lblMelding.Text. Hoe doe ik dit?