'directory è il percorso del file ES. Dim directory As String = Application.StartupPath & "\File.ini"

TexBox1.Text = LeggiIni(directory, "DATA", "Anno", "", True)
TexBox2.Text = LeggiIni(directory, "DATA", "Mese", "", True)
TexBox3.Text = LeggiIni(directory, "DATA", "Giorno", "", True)