Data exchange between module and form in VB.NET

Module ModuloConfig

    Sub MainConfig()
        ReadAllSettings() ' legge tutto il contenuto dell' app setting
     end sub  

    Sub ReadAllSettings() ' legge tutto l' appsetting
        Try
            Dim appSettings = ConfigurationManager.AppSettings

            If appSettings.Count = 0 Then
                Console.WriteLine("AppSettings is empty.") ' è vuoto
            Else
                For Each key As String In appSettings.AllKeys 'legge tutte le key
                    Console.WriteLine("Key: {0} Value: {1}", key, appSettings(key))

                Next
            End If
        Catch e As ConfigurationErrorsException
            Console.WriteLine("Error reading app settings")
        End Try
    End Sub
End Module