我有以下代码
lstLanguage.Items.Add(CultureInfo.GetCultureInfo("en-US").NativeName)
lstLanguage.SelectedIndex = 0
当下面的代码运行时
Dim strLanguageCode As String = CType(lstLanguage.SelectedItem, CultureInfo).NativeName
它抛出一个异常
System.InvalidCastException:
Unable to cast object of type 'System.String' to type 'System.Globalization.CultureInfo'.
代码有什么问题