Práctica Calificada 2 S-9
Práctica Calificada 2 S-9
Práctica Calificada 2 S-9
Integrantes
Mansilla Camacho Elí Santiago
Soto Obregon Milagros Katherine
2021 – I
PRÁCTICA CALIFICADA 2 S-9
1. En el lado derecho se muestra una lista de productos, al hacer doble click en cualquiera de
ellos este debe pasar a la lista de productos comprados y borrarse de la lista productos y
viceversa.
Código
For i = 0 To ListBox1.SelectedItems.Count - 1
ListBox2.Items.Add(ListBox1.SelectedItems(i))
ListBox1.Items.Remove(ListBox1.SelectedItems(i))
Next
End Sub
End Class
Interfaz
Prueba
Código
If (ListBox1.SelectedIndex = 0) Then
TextBox1.Text = (ListBox1.SelectedIndex + 1) * 11
End If
If (ListBox1.SelectedIndex = 1) Then
TextBox1.Text = (ListBox1.SelectedIndex + 1) * 11
End If
If (ListBox1.SelectedIndex = 2) Then
TextBox1.Text = (ListBox1.SelectedIndex + 1) * 11
End If
If (ListBox1.SelectedIndex = 3) Then
TextBox1.Text = (ListBox1.SelectedIndex + 1) * 11
End If
If (ListBox1.SelectedIndex = 4) Then
TextBox1.Text = (ListBox1.SelectedIndex + 1) * 11
End If
End Sub
End Class
Interfaz
Prueba
3. Se muestra una lista de productos, después de hacer una selección múltiple, y hacer clic en
el botón (>>) deberán borrarse de la primera lista y pasarse a la segunda lista, y viceversa.
Código
If ListBox1.SelectedIndex = -1 Then
Else
End If
End Sub
Else
End If
End Sub
End Class
Interfaz