vb针对json的解析处理

[ondate2]

有没有大神给点思路,目前解析很麻烦

[泡泡龙]

解析json可以用htmlfile组件

[舉杯邀明月]

[奋斗一生的程序员]

VB6可以处理JSON技术，再一次印证VB6万岁万岁万万岁！

[奋斗一生的程序员]

引用 2 楼 zhao4zhong1 的回复:

您是老朋友了。您是中国复兴时期VB6程序员的中流砥柱

[笨狗先飞]

当年？ 也才四年前？ 那时候还玩泥巴？

[赵4老师]

引用 17 楼 bakw 的回复:

当年？ 也才四年前？ 那时候还玩泥巴？

当年是1999年好不啦！

[赵4老师]

用VB6完全可以写一个Docker！

[奋斗一生的程序员]

引用 19 楼 zhao4zhong1 的回复:

用VB6完全可以写一个Docker！

大侠，关于JSONukjg，请问下面的怎么办？

{"time_used": 1203,
"thresholds": {"1e-3": 62.327, "1e-5": 73.975, "1e-4": 69.101},
"confidence": 90.662,
"request_id": "1498464734,bfc27199-17f8-437c-86f5-290a0816d0c3"}

With ScriptControl1
    .Reset
    .Language = "javascript"
    .AddCode "var json = " & strFaceJSON & ";" 
    '获取三个参数的值
    txtConfidence = .Eval("json.confidence")
    txtTimeUsed = .Eval("json.time_used") 
    txtRequest_id = .Eval("json.request_id")

    'thresholds或1e-3，1e-5，1e-4如何获取？
    '
    txtTemp = .Eval("thresholds") '只返回  [object object] 真是愁人 真是愁人 真是愁人
End Sub

[奋斗一生的程序员]

引用 19 楼 zhao4zhong1 的回复:

用VB6完全可以写一个Docker！

麻烦大侠回复前面问题，我开新帖给你送分。http://bbs.csdn.net/topics/392185377

[笨狗先飞]

分还是给我吧，赵老师不缺那几分了

[奋斗一生的程序员]

引用 22 楼 bakw 的回复:

分还是给我吧，赵老师不缺那几分了

虽然君子不夺人所爱，但是你下手真快，就送予你了。

[笨狗先飞]

用赵老师那个方法可能取不出来，那个命名有不合规则的

[赵4老师]

引用 14 楼 jlmugua 的回复:

[quote=引用 2 楼 zhao4zhong1 的回复:]

您是老朋友了。您是中国复兴时期VB6程序员的中流砥柱[/quote] 我当年的VB6作品，仅供欣赏和膜拜： http://bbs.3dmgame.com/thread-4126911-1-1.html

[赵4老师]

引用 15 楼 zhao4zhong1 的回复:

[quote=引用 14 楼 jlmugua 的回复:] [quote=引用 2 楼 zhao4zhong1 的回复:]

您是老朋友了。您是中国复兴时期VB6程序员的中流砥柱[/quote] 我当年的VB6作品，仅供欣赏和膜拜： http://bbs.3dmgame.com/thread-4126911-1-1.html[/quote] 竟然还能玩！http://www.xajh.me

[笨狗先飞]

引用 18 楼 zhao4zhong1 的回复:

[quote=引用 17 楼 bakw 的回复:] 当年？ 也才四年前？ 那时候还玩泥巴？

当年是1999年好不啦！[/quote] 99年我才第一次摸VB

[赵4老师]

引用 24 楼 bakw 的回复:

用赵老师那个方法可能取不出来，那个命名有不合规则的

那个是开源的吧，自己修改应该可以。

[赵4老师]

引用 25 楼 bakw 的回复:

[quote=引用 18 楼 zhao4zhong1 的回复:] [quote=引用 17 楼 bakw 的回复:] 当年？ 也才四年前？ 那时候还玩泥巴？

当年是1999年好不啦！[/quote] 99年我才第一次摸VB[/quote] 江山代有人才出， 一代新人换旧人。

[笨狗先飞]

引用 26 楼 zhao4zhong1 的回复:

[quote=引用 24 楼 bakw 的回复:] 用赵老师那个方法可能取不出来，那个命名有不合规则的

那个是开源的吧，自己修改应该可以。[/quote] 1e-3：这种命名格式不符合VB格式； 而且像left和Left，VB的IDE会强制大小写转换，但这个转换确是大小写敏感的； End、Open等保留字，无法使用。 哪怕是开源这些问题也不是太好处理。

[笨狗先飞]

引用 27 楼 zhao4zhong1 的回复:

[quote=引用 25 楼 bakw 的回复:] [quote=引用 18 楼 zhao4zhong1 的回复:] [quote=引用 17 楼 bakw 的回复:] 当年？ 也才四年前？ 那时候还玩泥巴？

当年是1999年好不啦！[/quote] 99年我才第一次摸VB[/quote] 江山代有人才出， 一代新人换旧人。[/quote] 混得不好，那么多年了，还只能在一线打杂，每天担心生计问题。。。。 无奈新人胜旧人

[赵4老师]

苦不苦，想想长征二万五； 累不累，想想革命老前辈。