Paso 4: El código: Add_click
hice el botón Agregar, haga clic en primer lugar por lo que sería capaz de añadir elementos antes de guardar mis direcciones
Coloque el código siguiente después de las dimensiones
Haga doble clic en el botón Agregar y agregue el código siguiente:
k = False
GF (0, i) = lastn. Texto
GF (1, i) = firstn. Texto
GF (2, i) = NUM. Texto
GF (3, i) = ADR. Texto
GF (4, i) = ciudad. Texto
GF (5, i) = st. Texto
GF (6, i) = zip. Texto
GF (7, i) = picor. SelectedItem
ListBox1.Items.Add (gf (0, i) & "~ ~" & gf (1, i) & "~ ~" & gf (2, i) & "~ ~" & gf (3, i) & "~ ~" & gf (4, i) & "~ ~" & gf (5, i) & "~ ~" & gf (6, i) & "~ ~" & gf (7, i))
i += 1
sort()