首页 > 其他 > 详细

VB 字符串转换为UTF-8

时间:2018-02-02 00:09:20      阅读:332      评论:0      收藏:0      [点我收藏+]

dim e as object

Set?e=CreateObject("MSScriptControl.ScriptControl")
e.Language?=?"javascript"
dim d as stringd=?e.Eval("encodeURI(‘微软计算机‘)") ‘运行javascript脚本的函数
MsgBox?d
MsgBox?e.Eval("decodeURI(‘"?&?d??&?"‘)")

VB 字符串转换为UTF-8

原文:https://www.cnblogs.com/Elcser/p/8401752.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!