你只获取接口的每个 obj_name 和speed 值的话,你完全没必要当json来处里,你可以直接截取字符串就可以了。用substring函数
成都创新互联专注为客户提供全方位的互联网综合服务,包含不限于成都网站建设、网站建设、杜集网络推广、小程序开发、杜集网络营销、杜集企业策划、杜集品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;成都创新互联为所有大学生创业者提供杜集建站搭建服务,24小时服务热线:028-86922220,官方网址:www.cdcxhl.com
这个跟反序列化毫无关系。
分隔字符串就用 Split(),没什么难度。
先如下程序集
Imports System.Web.Script.Serialization
Function StringToObject(content As String) As Object
Dim jss As New JavaScriptSerializer()
Return jss.DeserializeObject(content)
End Function
Dim test1 As Dictionary(Of String, Object) = StringToObject("{
" Chr(34) "objects" Chr(34) ": {
" Chr(34) "minecraft/sounds/entity/rabbit/attack2.ogg" Chr(34) ": {
" Chr(34) "hash" Chr(34) ": " Chr(34) "4b90ff3a9b1486642bc0f15da0045d83a91df82e" Chr(34) ",
" Chr(34) "size" Chr(34) ": 7268
},
" Chr(34) "minecraft/sounds/entity/shulker/close5.ogg" Chr(34) ": {
" Chr(34) "hash" Chr(34) ": " Chr(34) "e555fcece121879fe0becbada9d01dea27ab153d" Chr(34) ",
" Chr(34) "size" Chr(34) ": 5376
},
" Chr(34) "minecraft/lang/ga_IE.lang" Chr(34) ": {
" Chr(34) "hash" Chr(34) ": " Chr(34) "a108f19142820b3573a658d40950ba3317b65c15" Chr(34) ",
" Chr(34) "size" Chr(34) ": 142847
},
" Chr(34) "minecraft/sounds/mob/horse/leather.ogg" Chr(34) ": {
" Chr(34) "hash" Chr(34) ": " Chr(34) "20abaa7d3b0baa105bc6023d5308f1e5d76acc41" Chr(34) ",
" Chr(34) "size" Chr(34) ": 11577
}}
}
")
Dim cc As Dictionary(Of String, Object) = DirectCast(test1.Values(0), Dictionary(Of String, Object))
Dim dd = cc.Values(0)("hash")
这样就可以遍历 hash值了
先用ADO.NET读取数据,然后赋值即可,这个很容易的, 如果你要和某个控件的值做比对,就可以先赋值给控件,然后做比对。。。 例如,你读取数据库中的一条记录,然后绑定到textbox上,和另外一个textbox里面的数字比较大校。