主题：[求助]企业微信 tostring

在企业微信中以下代码出现错误

Dim ul As String = "https://qyapi.weixin.qq.com/cgi-bin/department/create?access_token={0}"
Dim hc As New HttpClient(CExp(ul,Functions.Execute("GetQYAccessToken")))
Dim jo As New JObject
Dim r As Row=CurrentTable.Current
jo("name") = r("name")
jo("parentid") = r("parentid")
jo("order") =  r("order")
hc.Content = jo.ToString()
jo = JObject.Parse(hc.GetData)

错误应该出现在：

请问，怎样书写正确？