Código:
Private Sub Form_Initialize() Label1.Caption = CInt(GetSetting(App.EXEName, "Key", "Tecla1", Label1.Caption)) End Sub
Código:
El caracter que contiene el label.caption es "/", con ese me da error, si lo cambio a un numero por ejemplo 1, no me da error :S Private Sub Form_Unload(Cancel As Integer) Call SaveSetting(App.EXEName, "Key", "Tecla1", Label1.Caption) End Sub