Prego
Aprofitto della risposta per fare una precisazione:
Per brevità ho inserito il valore direttamente all'interno della funzione di assegnazione.
Questo normalmente non si fa specialmente se si deve, come nell'esempio, creare una nuova cartella, cosa che deve essere fatta all'apertura della classe (eventi Form_Open o _new).
Per chi come me è alle prime armi con le proprietà, suggerisco il vecchio sistema che è più comprensibile, inoltre era già possibile l'inizializzazione delle variabili associate (senza contare poi che basta scrivere prr e tabulare che fa tutto la IDE):
Property Read sPathDB As String
Private $sPathDB As String = User.Home &/ Application.Name
Public Sub Form_Open()
If Not Exist($sPathDB) Then Mkdir $sPathDB
End
Private Function sPathDB_Read() As String
Return $sPathDB
End