sinceramente non so a che cosa possa servire, ma, solo per prova
codice:Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged Dim c As ListBox = DirectCast(sender, ListBox) Dim index As Integer = c.SelectedIndex If index = -1 Then Return Dim item As String = c.SelectedItem.ToString If String.IsNullOrWhiteSpace(item) Then 'Label1.Text = "VUOTO" c.Items.RemoveAt(index) Else 'Label1.Text = "Non vuoto" End If End Sub

Rispondi quotando