Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("NombreAPP.Resource1", GetType(My.Resources.Resource1).Assembly)
Dim resourceMan As ResourceManager = temp
Dim cultInfo As New CultureInfo(1)
For Each entry As System.Collections.DictionaryEntry In resourceMan.GetResourceSet(cultInfo, True, True)
Dim cadIni As String = entry.Key
next
Carlos Javier Martín Cano
