在VBA中使用JAVASCRIPT和VBSCRIPT(4)

End Sub

多重结构，树状显示，类似XML节点树，代码比XML简洁得多 Sub figjson3()

aa = \Chaoyang Road \

Set X = CreateObject(\ X.Language = \

s = \ X.AddCode s

Set y = X.Run(\

MsgBox y.myname MsgBox y.myaddress MsgBox y.myaddress.city

MsgBox y.myaddress.postcode End Sub

数组放入对象里 Sub figjson4()

aa = \\[{ \\\\\},{ \\\\\}, { \\\\\

Set X = CreateObject(\ X.Language = \

s = \ X.AddCode s

Set y = X.Run(\ MsgBox y.firstName MsgBox y.email End Sub

可用单引号代替2个双引号，简化写法，如例子一 Sub figjson()

aa = \

Set x = CreateObject(\ x.Language = \

s = \ x.AddCode s

Set y = x.CodeObject.j(aa)

MsgBox y.myname MsgBox y.myid End Sub

在EXCEL中的应用

如SHEET1 A1单元格为AA, B1单元格为BB

Sub figjson()

aa = \

Set x = CreateObject(\ x.Language = \

s = \ x.AddCode s

Set y = x.CodeObject.j(aa) MsgBox y.aa End Sub

传递数值值 Sub figjson()

Set x = CreateObject(\ x.Language = \

s = \ x.AddCode s

Set y = x.CodeObject.cc MsgBox y.a

End Sub

动态添加数据 Sub figjson()

Set x = CreateObject(\ x.Language = \

s = \电话']=8888;\

x.AddCode s

Set y = x.CodeObject.cc MsgBox y.电话 End Sub

数据动态变化 Sub figjson()

Set x = CreateObject(\ x.Language = \

s = \电话']=8888;\ x.AddCode s

Set y = x.CodeObject.cc MsgBox y.电话

s = \电话']=9999;\ x.AddCode s

MsgBox y.电话 End Sub

用变量来查询 Sub figjson()

Set x = CreateObject(\x.Language = \

s = \x.AddCode s

kk = \

y = x.eval(\ MsgBox y

kk = \

y = x.eval(\ MsgBox y

kk = \

y = x.eval(\ MsgBox y

End Sub

与VB比较，代码更加简洁明了，可作为小型数据库 Sub vb代码() Name = \

If Name = \

If Name = \

If Name = \MsgBox Address

Name = \

If Name = \

If Name = \

If Name = \MsgBox Address End Sub

Sub fjson代码()

Set x = CreateObject(\ x.Language = \

s = \ x.AddCode s

Name = \

Address = x.eval(\

MsgBox Address

Name = \

Address = x.eval(\

MsgBox Address

End Sub

类似数组，可增加和删除数据 Sub figjs()

Set x = CreateObject(\ x.Language = \

s = \

x.AddCode s

For i = 1 To 100

s = \

x.AddCode s Next

Address = x.eval(\

MsgBox Address

Address = x.eval(\

MsgBox Address

x.eval (\

Address = x.eval(\

MsgBox Address

End Sub

在VBA中使用JAVASCRIPT和VBSCRIPT（3）

phpjs是用js实现php同名函数，对PHP熟悉而对JS一般熟悉的人一定写过一些类似PHP函数的JS函数，PHP的函数应该是这个世界上最丰富的函数库了，因为它是由全世界

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库在VBA中使用JAVASCRIPT和VBSCRIPT(4)在线全文阅读。