Fai così, per la prova inserisci sulla Frm una Txt e poi copia nel modulo della Frm:
codice:
Option Explicit
Private Const NOMEFILEINI As String = "Config.ini"
Private Const NOMESEZIONE As String = "Main"
' Testo da modificare, ad esempio: "Percorso cartella DATI"
Private Const NOMEITEM As String = "Percorso cartella DATI"
Private Const MSG_IMPOSTAZIONIVUOTE As String = "(vuoto)"
'-------------------------------------------------------
Private Sub Form_Load()
    
    ' La Frm si avvia e
    ' carica le impostazioni salvate in precedenza nel config.ini:
    
    Dim strTesto As String
    'recupera info dal file ini:
    strTesto = INIRead(NOMEFILEINI, NOMESEZIONE, NOMEITEM)
    'controlla la risposta:
    If strTesto = vbNullString Then
        'è probabilmente la prima vola che si fa partire il prg:
        Text1.Text = MSG_IMPOSTAZIONIVUOTE
    Else
        'riporta le info trovate:
        Text1.Text = strTesto
    End If

End Sub
'-------------------------------------------------------
Private Sub Form_Unload(Cancel As Integer)

    ' il form viene chiuso - vengono salvate le info
    ' inserite in text1.text sul file config.ini:

    If Text1.Text <> MSG_IMPOSTAZIONIVUOTE Then
        'ok: sono state fatte delle variazioni: le scrive su config.ini
        INIWrite NOMEFILEINI, NOMESEZIONE, NOMEITEM, Text1.Text
    Else
        'sollecito se non è stato fatto nulla:
        If MsgBox("Modifica prima il testo nella casella...", vbInformation + vbOKOnly, "Aspetta") Then
        End If
        'non permette la chiusura della frm:
        Cancel = True
    End If
End Sub