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

No hay comentarios.:

Publicar un comentario

Related Posts Plugin for WordPress, Blogger...

Facebook

www.gambas-es.org

www.gambas-es.org
Si quieres que tu curva de aprendizaje sea rápida, regístrate en este gran foro en español.