Visual Basic Forum

alexanderjanjic · Newbie Anmeldedatum: 22.06.2008 Beiträge: 19

Public Class Form1
Dim Umrechner1 As Integer
Dim Umrechner2 As Integer

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Umrechner1 = TextBox1.Text * 1.5847
Umrechner2 = TextBox1.Text * 0.631

If ComboBox1.Items("Euro") & ComboBox2.Items("US Dollar") Then
TextBox2.Text = Umrechner1

End If
End Sub
End Class

Ist der Code das Problem liegt irgendwo in der roten Zeile. Des weis ich auch, nur weis ich nicht wie es Euro aus dem ComboBox auslesen soll.
Hoffe ihr könnt mir helfen.

Mfg

Regenwurm · Coder Anmeldedatum: 06.05.2008 Beiträge: 88

???

Probiere es mal mit Combobox1.Text & Combobox2.Text

Im übrigen ist deine Methode nicht wirklich die beste, vor allem wenn du noch andere Items in der Combobox hast.

Am besten ist, wenn du das wohl mit Select Case löst.

alexanderjanjic · Newbie Anmeldedatum: 22.06.2008 Beiträge: 19

Also Combobox.Text ging nicht dachte ich mir auch, aber könntest du ein Besipiel vllt geben mit Case also wie des aussehen würde ... Smile

Marduk · Überflieger Anmeldedatum: 16.04.2008 Beiträge: 374

Probiers mal mit Visual Basic: [code]ComboBox1.SelectedItem 'oder
ComboBox1.SelectedText 'oder SelectedValue[/code]

Visual Basic: [code]
Dim auswahl as string = ComboBox1.SelectedText

Select Case auswahl:
case "Euro":
Case "US-Dollar: 'Code

[/code]
so kann das ungefähr aussehen