Paso 5: El código: Delete_click
después de agregar haga clic en agregar código en el código siguiente:
Private Sub delete_Click (ByVal sender como System.Object, ByVal e como System.EventArgs) manijas eliminar. Haga clic en
SD = ListBox1.SelectedIndex
Para q = sd a i - 2
Para l = 0 a 7
GF (l, q) = gf (l, q + 1)
Siguiente
Siguiente
Si i > 0 entonces i-= 1
ListBox1.Items.Remove(ListBox1.SelectedItem)
End Sub