Archief - vb.net noob probleem

hallo, voor school moeten we opdracht maken maar er is één ding dat niet lukt. bij de uitvoer moet zowel de naam als het bedrag in een messagebox komen maar ik heb geen flauw idee hoe ik de naam en het bedrag moet weergeven van de naam die ik ingeef. ik weet dat het probleem ligt bij het gedeelte dat rood is aangeduid

dit is mijn code tot nu toe:
Public Class frmWeddes
Dim strNamen(4) As String
Dim intWedde(4) As Integer
Private Sub btnMaandWeddeInvoer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMaandWeddeInvoer.Click
Dim intTeller As Integer
For intTeller = 0 To 4
strNamen(intTeller) = InputBox("Geef de naam in")
intWedde(intTeller) = InputBox("Geef het maandwedde in")
Next
End Sub

Private Sub btnMaandWeddeUitvoer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMaandWeddeUitvoer.Click
InputBox("Van wie wil je de maandwedde kennen:")
MessageBox.Show("Maandwedde " & strNamen(4) & ": " & intWedde(4))
End Sub

mag een slotje op kheb het gevonden

Flatline zei:

mag een slotje op kheb het gevonden

Klik om te vergroten...

Zelfde opmerking als in de andere thread, maak uw thread compleet door het antwoord ook te posten a.u.b.

Public Class frmWeddes
Dim strNamen(4) As String
Dim strWedde(4) As String
Private Sub btnMaandWeddeInvoer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMaandWeddeInvoer.Click
Dim intTeller As Integer
For intTeller = 0 To 4
strNamen(intTeller) = InputBox("Geef de naam in")
strWedde(intTeller) = InputBox("Geef het maandwedde in")
Next
End Sub

Private Sub btnMaandWeddeUitvoer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMaandWeddeUitvoer.Click
Dim strVraag As String
strVraag = InputBox("Van wie wil je de maandwedde kennen:")
If strNamen(4) = strVraag Then
MessageBox.Show("Maandwedde " & strNamen(4) & ": " & strWedde(4))
ElseIf strNamen(3) = strVraag Then
MessageBox.Show("Maandwedde " & strNamen(3) & ": " & strWedde(3))
ElseIf strNamen(2) = strVraag Then
MessageBox.Show("Maandwedde " & strNamen(2) & ": " & strWedde(2))
ElseIf strNamen(1) = strVraag Then
MessageBox.Show("Maandwedde " & strNamen(1) & ": " & strWedde(1))
Else
MessageBox.Show("Deze naam is niet aanwezig in de matrix")
End If
End Sub
End Class

met dit werkt het, heb wel nog 1 vraagje. is er een mogelijkheid om maar 1 if te gebruiken ipv 4?

Uiteraard, in Java heb je zoiets als de switch/case structuur. Daarmee kan je dat perfect oplossen. Je zal dan even moet googelen naar de juiste syntax voor in Visual Basic. Zo ziet het eruit in Java:


Vòòr deze code liet ik de gebruiker een integergetal invoeren. Dus de switch structuur voorziet niet de invoer zelf, hij controleert enkel een variabele op verschillende mogelijke waarden. In dit geval is die variabele a.

Edit: 'k heb het even voor je opgezocht, kijk hier.

Dit is de syntax:


Een voorbeeld:


Ik vind Java veel logischer en plezanter om mee te werken, maar als ge voor school Visual Basic moet gebruiken hebt ge natuurlijk niet veel te kiezen...

Pudmeister zei:

Uiteraard, in Java heb je zoiets als de switch/case structuur. Daarmee kan je dat perfect oplossen. Je zal dan even moet googelen naar de juiste syntax voor in Visual Basic. Zo ziet het eruit in Java:

Code:

switch (a){//a is de variabele die gecontroleerd moet worden
	case (1): System.out.println("U gaf het getal 1 in");
	break;
	case (2): System.out.println("U gaf het getal 2 in");
	break;
	case (3): System.out.println("U gaf het getal 3 in");
	break;
	case (4): System.out.println("U gaf het getal 4 in");
	break;
	case (5): System.out.println("U gaf het getal 5 in");
	break;
	default: System.out.println("Het getal dat u opgaf lag niet van 1 tot en met 5");
	}

Vòòr deze code liet ik de gebruiker een integergetal invoeren. Dus de switch structuur voorziet niet de invoer zelf, hij controleert enkel een variabele op verschillende mogelijke waarden. In dit geval is die variabele a.

Edit: 'k heb het even voor je opgezocht, kijk hier.

Dit is de syntax:

Code:

Public Function Switch( _
    ByVal ParamArray VarExpr() As Object _
) As Object

Een voorbeeld:

Code:

Function matchLanguage(ByVal cityName As String) As String
    Return CStr(Microsoft.VisualBasic.Switch( _
        cityName = "London", "English", _
        cityName = "Rome", "Italian", _
        cityName = "Paris", "French"))
End Function

Ik vind Java veel logischer en plezanter om mee te werken, maar als ge voor school Visual Basic moet gebruiken hebt ge natuurlijk niet veel te kiezen...

Klik om te vergroten...

bedankt voor de hulp maar ik snap niet echt wat ik moet veranderen

De switch-code van VB is ongeveer gelijk aan die van Java hoor. Hier een voorbeeldje.

The following example uses a Select Case construction to write a line corresponding to the value of the variable number. The second Case statement contains the value that matches the current value of number, so the statement that writes "Between 6 and 8, inclusive" runs.


Select...Case Statement (Visual Basic)

Inderdaad dat is een veel duidelijker voorbeeld. Ik had mijn voorbeeld verkeerd gekozen, de switch function van Visual Basic werd bekeken ipv hetgeen wat je eigenlijk zocht. Jij had een statement nodig 2 verschillende begrippen die zeker niet verward mogen worden.