主题：错误提示 求解

此主题相关图片如下：qq截图未命名.jpg

        If  dr.IsNull("图纸图号") = False Then
            Dim Str1 As String = dr("图纸图号")      
            If  Str1.Contains("ME016-ME-") Then
                Dim cc As String = str1.Remove(0,9)
                dr("清单编号") = cc
            End If
        End If

所有列都是字符型，代码那儿出现了错误？？