一、引用dll ——— http://pan.baidu.com/s/1kVJwR2Z
二、反序列化json字符串
Dim readData As String = {"LV":1,"U1":1,"U2":2,"A1":0}
jsonResult = JsonConvert.DeserializeObject(readData)'用Newtonsoft.Json反序列json字符串
Dim sIndex As Integer = jsonResult("LV") '提取Json字符串中的“LV”值
三、序列化(未完待续。。。)