VB中如何取到带中文的字符串的字节数,并能从中截取? 如下字符串:sdfasf奥斯陆地方其字节数应为:16我想从第5个字节开始取6个字节,应为:sf奥斯应该如何写?我用MID取,结果是:sf奥斯陆地用MIDB取,结果是:fa 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用lenb函数会发现vb认为该字符串有22个字节长度,而不是16个;用len函数得到是11。Dim str1 As Stringstr1 = "sdfasf奥斯陆地方"'str1 = StrConv(str1, vbFromUnicode)Debug.Print LenB(str1)Debug.Print Len(str1)Debug.Print Mid(str1, 5, 4)Debug.Print MidB(str1, 9, 8)如果使用strconv函数进行转换(vbFromUnicode 128 将字符串由 Unicode 转换成缺省的系统代码页。 ),那么lenb会认为是16,但mid和midb会得到乱码。 【散分】听老歌,BEYOND的老歌 VB6.0还有多少生存的空间? 怎样用vb设置文件夹权限? 寻求思路:如何实现使用银行卡刷卡消费啊? 高分求助,如何读取文本文件中的数值,批量转换? VB 使用Inet控键问题,顶者有分 我的系统是Win2K,有什么API函数可以执行里面的"搜索计算机" 原来的这些串都是自己手写的,用vb怎么自动生成啊。 求助!谁有html help workshop的中文使用说明?给我 请问:怎样在pictureBox中直接显示一个自定义格式的图像文件? richtextbox问题(在线等) 如何读取DBF文件中作了删除标记的记录(最好用ADO)
用len函数得到是11。
Dim str1 As String
str1 = "sdfasf奥斯陆地方"
'str1 = StrConv(str1, vbFromUnicode)Debug.Print LenB(str1)
Debug.Print Len(str1)
Debug.Print Mid(str1, 5, 4)
Debug.Print MidB(str1, 9, 8)
如果使用strconv函数进行转换(vbFromUnicode 128 将字符串由 Unicode 转换成缺省的系统代码页。 ),那么lenb会认为是16,但mid和midb会得到乱码。