Вы можете явно добавить предикат, чтобы указать, что вы хотите выбрать узел, только если он содержит текст :
...mgns1:VALEUR_CS[normalize-space()]
Private Function FindCulture(ByVal Code As String) As Globalization.CultureInfo
Dim AllCultures As Globalization.CultureInfo() = Globalization.CultureInfo.GetCultures(Globalization.CultureTypes.AllCultures)
Return Array.Find(AllCultures, Function(s) s.TwoLetterISOLanguageName = Code)
End Function