Ciao a tutti,
Devo creare una combobox con all'interno degli Items e assegnare un valore ad ognuno di essi, ed ogni volta che ne seleziono uno il valore del risultato cambia in base alle somme date dai vari elementi nelle combobox.Il codice è questo:
sono ore che mi scervello per questo problema banale...codice:Public Class Form 3 Dim Item1 as integer = 1 Dim item2 As Integer = 1 Dim result As Integer = 0 Dim proga As String Dim grafica3d As String Public Enum combolist ciao = 1 End Enum Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load proga = ComboBox1.Items.Add(combolist.ciao) If ComboBox1.SelectedIndex = proga Then MsgBox("Funziona?") End If end sub ''' il pulsante che controlla il risultato Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If result = 1 Then TextBox1.Text = "orrendo" End If If result = 2 Then TextBox1.Text = "discreto" End If If result = 3 Then TextBox1.Text = "carino" End If End Sub End class
EDIT: SCUSATE HO RISOLTO!! bastava spostare il codice nella formload del MsgBox nel campo della combobox!

Rispondi quotando