相关疑难解决方法(0)

可能重复:
我在哪里可以获得所有国家/城市的列表以填充列表框？

我有一个两难的境地,我需要一份德语所有国家名单.我可以使用以下代码获取英语的这些信息,但我不知道如何为德语做到这一点.有任何想法吗？

 Dim countries As Generic.List(Of String) = New Generic.List(Of String)
     For Each ci As Globalization.CultureInfo In Globalization.CultureInfo.GetCultures(Globalization.CultureTypes.AllCultures And Globalization.CultureTypes.NeutralCultures)
         Dim ri As Globalization.RegionInfo = New Globalization.RegionInfo(ci.LCID)
         countries.Add(ri.EnglishName)
 Next ci

互联网上是否有可用的资源，我可以在其中找到 XML 格式的表情符号/unicodes 的完整列表，以便我可以将它们作为我项目的一部分来实现：

表情符号示例：

<key name="soccer_ball">?</key>
<key name="basket_ball"></key>

或者

表情符号 Unicode 示例：

<key name="soccer_ball">0x26bd</key>
<key name="basket_ball">0x1f3c0</key>

与这些类似，Facebook 应用程序中存在的所有表情符号，我想在我的项目中实现类似的东西，如果不是 XML 格式，那么可能是转换后的 JSON 或 CSV 格式。

我用谷歌搜索了很多，但还没有找到任何相关的来源。任何帮助将不胜感激。

干杯，
香港