vb.net中如何解析Json数据？

vba 中解析json数据如下：

Sub VBA_Json()
    Dim JsonStr As String
    Dim SC As Object
    Dim AA, BB

    JsonStr = "{""desc"":""成功"",""dataa"":{""maxPage"":43522,""ppiUsername"":""谢文泽""}}"
    Set SC = CreateObject("ScriptControl")
        SC.Language = "JScript"

    Set AA = SC.Eval("eval(" & JsonStr & ")")
    Set BB = AA.dataa

    Debug.Print BB.maxPage      '打印 43522
    Debug.Print BB.ppiUsername  '打印 谢文泽
End Sub

现在在vb.net中，如何用Imports Microsoft.JScript解析上述json数据呢？
vsto版本是2012版本。