请问应如何解决VBA里LenB文字和数字都是按两位计算？

K-Lucif · 发表于 2024-4-3 16:54

请教一下老师们，我在VBA里用lenb读取字符数时，无论是中文字还是普通数字都是按两个字节计算，这个问题应该怎么破？

shiruiqiang · 发表于 2024-4-3 17:03

len(字符)
这样试试

K-Lucif · 发表于 2024-4-3 17:10

shiruiqiang 发表于 2024-4-3 17:03
len(字符)
这样试试

Len是不分文字和数字都按一个字符算的，我是想用lenb区分文字和数字，但不知为什么VBA里的lenb把文字和数字都按两个字符计算了

perfect131 · 发表于 2024-4-3 17:14

K-Lucif 发表于 2024-4-3 17:10
Len是不分文字和数字都按一个字符算的，我是想用lenb区分文字和数字，但不知为什么VBA里的lenb把文字和数 ...

凡事先百度

vba lenb
lenb(strconv(str,vbfromunicode)）

tanglf188 · 发表于 2024-4-3 17:29

说明
LEN 返回文本字符串中的字符个数。

LENB 返回文本字符串中用于代表字符的字节数。

重要:

这些函数可能并不适用于所有语言。

只有在将 DBCS 语言设置为默认语言时，函数 LENB 才会将每个字符按 2 个字节计数。否则，函数 LENB 的行为与 LEN 相同，即将每个字符按 1 个字节计数。

支持 DBCS 的语言包括日语、中文（简体）、中文（繁体）以及朝鲜语。

语法
LEN(text)

LENB(text)

LEN 函数语法具有下列参数：

text 必需。要查找其长度的文本。空格将作为字符进行计数

K-Lucif · 发表于 2024-4-3 17:30

perfect131 发表于 2024-4-3 17:14
凡事先百度
vba lenb
lenb(strconv(str,vbfromunicode)）

不可以啊，不知是我的版本问题还是其它原因，这个参数转换出来的是两个问号

wanghan519 · 发表于 2024-4-3 17:38

本帖最后由 wanghan519 于 2024-4-3 17:40 编辑

K-Lucif 发表于 2024-4-3 17:30
不可以啊，不知是我的版本问题还是其它原因，这个参数转换出来的是两个问号

vba内部中文英文数字都是2比特的unicode，这句转换是把unicode转gbk，这时的字符串（或者说比特串）就不能用vba显示了，但这样就可以用lenb看出差别了，需要显示再转回unicode
可能理解的不到位，是个大概

K-Lucif · 发表于 2024-4-3 18:03

wanghan519 发表于 2024-4-3 17:38
vba内部中文英文数字都是2比特的unicode，这句转换是把unicode转gbk，这时的字符串（或者说比特串）就 ...

但文字也转换了，简单说就是，我想用VBA里的Len和LENB做到公式函数里用Len和Lenb一样的效果，但现在出来的效果是要不都计算成2字节，要不都计算成1字节

wanghan519 · 发表于 2024-4-3 18:09

K-Lucif 发表于 2024-4-3 18:03
但文字也转换了，简单说就是，我想用VBA里的Len和LENB做到公式函数里用Len和Lenb一样的效果，但现在出来 ...

转为gbk后，中文2字节，数字英文1字节

gwjkkkkk · 发表于 2024-4-3 18:21

学习了。。。

		自动登录	找回密码
密码			免费注册

[求助] 请问应如何解决VBA里LenB文字和数字都是按两位计算？

评分

评分