VB.NET 获取数据有关问题

VB.NET 获取数据问题
有个问题请教下大神们，我要获取@@后面的数据，我下面的方法不知道错在什么地方了，通过打印日志出来，获取的结果为空，还请大神们帮忙看下我的这个方法，谢谢
Public Function getwkQ(ByVal wkno As String) As String
        WriteLog("getwkQ wkno" & wkno)
        Try
            Dim k As Integer
            Dim stmpValue() As String
            For k = 0 To UBound(skillwk)
                WriteLog("getwkQ 技能组对应工号" & skillwk(k))
                stmpValue = Split(skillwk(k), "==")
                'WriteLog("stmpValue(0)=" & stmpValue(0))
                'WriteLog("skillwk" & "skillwk".ToUpper)
                If CStr(stmpValue(0)) = "skillwk".ToUpper Then
                    WriteLog("getwkQ stmpValue(1)=" & stmpValue(1).Split("@@")(1))
                    If (stmpValue(1).Split("@@")(1)) = wkno Then
                        'WriteLog("getwkQ 技能组stmpValue=" & stmpValue(1))
                        'WriteLog("getwkQ stmpValue(1)=" & stmpValue(1).Split("@@")(0))
                        Return stmpValue(1).Split("@@")(0)
                    End If
                End If
            Next k
        Catch ex As Exception
            WriteLog("技能组对应工号")
        End Try

        Return ""
    End Function

图片如下：

------解决思路----------------------
split的分隔符应该是字符而不是字符串。
stmpValue(1).Split("@@")(1)改成stmpValue(1).Split("@@")(2)试试
------解决思路----------------------
= "skillwk".ToUpper 我也是醉了

vbnet>  Strings.Split 方法