como hago para que un contador cuando yo cierre la aplicacion no se borren los datos quiero que cuando lo cierre y abra queden los numeros contados lo que pasa es que lo tengo en un aplicacion que me esta contando la cantidad de veces que pulso y cuando lo cierro y lo vuelvo a abrir se me borra
Guardalos en el registro o en un fichero de texto y lo lees.. ;)
No se puedes hacer mil cosas, un saludo.
Puedes hacer esto
Option Explicit
Dim sNombreAplicacion As String, sSeccion As String, sDato As String, sClave As String
Dim Contador As Integer
Private Sub CmdGuardarDatos_Click()
'llamando a la rutina guardar datos... :P
GuardarDatos (Contador)
End Sub
Private Sub CmdLeerDatos_Click()
sDato = GetSetting(sNombreAplicacion, sSeccion, sClave)
If sDato <> "" Then MsgBox "Contador almacenado: " & sDato
End Sub
Private Sub GuardarDatos(Dato As String)
SaveSetting sNombreAplicacion, sSeccion, sClave, Dato
End Sub
Private Sub Form_Load()
'En ese sentido
sNombreAplicacion = App.EXEName
sSeccion = "Lo que sea"
sClave = "Contador"
'provisional
Contador = 6
End Sub
Hola,podes tambien guardar los datos de tu aplicacion en un fichero .ini,y despues lo cargas...
saludos.