ik zou een variabele moeten opslaan voor het sluiten om ze dan bij het openen terug in te lezen
ik kan het txt bestand aanmaken en de variabelen erin opslaan maar ik weet niet hoe ik ze terug moet inlezen, ik heb iets gelezen over readline ofzo?
kan iemand mij helpen?
Wat ook leuk is, is een ini file maken. Zet boven in de module het volgende:
Declare Function WritePrivateProfileString Lib "kernel32.dll" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Declare Function GetPrivateProfileString Lib "kernel32.dll" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Sub voorbeeld_ini_files()
'Schrijven en lezen naar ini files
Dim n As String * 255
Dim l As Long
'Inifile schrijven
l = WritePrivateProfileString("Hoofdgroep", "Subgroep", "Waarde", "d:\temp\test.ini")
'Inifile lezen
l = GetPrivateProfileString("Hoofdgroep", "Subgroep", "Default waarde bij onbekend", n, 255, "d:\temp\test.ini")
n = Left(n, l)
MsgBox n
End Sub
