VB.NET 錯誤消息 - “Option Strict On 不允許從 'Object' 到 'String' 的隱式轉換”

Question

我的VB.NET程序有錯誤。 我嘗試了各種演員表等，但它不能解決問題 - 所以我很不情願地在這里發布它，看看是否有其他人有類似的問題。

錯誤信息

錯誤 1 Option Strict On 不允許從“對象”到“字符串”的隱式轉換。

代碼

Private DS As New DataSet ' Languages
Function TransTxt(ByVal Frm As String, ByVal Item As String) As String

    Dim language As String
    Select Case My.Settings.Language
        Case 0 : language = "en" ' English
        Case 1 : language = "fr" ' French
        Case 2 : language = "it" ' Italian
        Case 3 : language = "sp" ' spanish
        Case 4 : language = "pt" ' portuguese
        Case 5 : language = "de" ' german
        Case 6 : language = "du" ' dutch
        Case Else : language = "en" ' English
    End Select


    Try 'ONE of these rows is the error
        Dim DR() As DataRow = DS.Tables(Frm).Select("Tag = '" & Item & "'")
        Return DR(0).Item(language) 
        Catch ex As Exception 
          Return "- error -" & Item
    End Try 
End Sub

Answer 1

Return DR(0).Item(language)是我的猜測。

將CAST轉換為STRING類型或在最后使用Return DR(0).Item(language).ToString() 。