[Abu Ehab]

PHP كود :

Dim Price As New List(Of Integer)({120, 135})

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        TextBox1.Text = Price.Item(ComboBox1.SelectedIndex.ToString)
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ComboBox1.Items.AddRange({"IPhone", "LapTop"})
    End Sub