Allanando el camino a los iniciados en Gambas, porque programar en Gambas es un placer!!
miércoles, 25 de diciembre de 2013
Cargar/Guardar datos de un ListBox
' Gambas class file
Public Sub BtnAgregar_Click()
Dim ListaIndex As Integer
ListBox1.Add(TextBox1.Text, ListaIndex)
End
Public Sub btnGuardarLista_Click()
Dim JugadoresSon As String
JugadoresSon = ListBox1.List.Join("\n")
File.Save(User.Home & "/ListaPostapase", JugadoresSon)
btnCargarLista.Enabled = True
End
Public Sub BtnBorrarTodo_Click()
ListBox1.Clear
End
Public Sub btnCargarLista_Click()
ListBox1.List = Split(File.Load(User.Home & "/ListaPostapase"), "\n")
End
Suscribirse a:
Comentarios de la entrada (Atom)
No hay comentarios.:
Publicar un comentario