UC知道【高分】VB字节怎么连接？比如：字符可以用&连接，数字用＋连接【高手进】
来源：百度知道 编辑：UC知道 时间：2024/06/19 03:33:51
dim b() as byte
dim s as string
b="汉字哦"
s=b
print strconv(s,vbwide) '这里输出原汉字
print strconv(b,vbwide) '输出也是原汉字
问题：
比如我只想要其中的几个字，而不是全部的汉字，怎么弄？
print strconv(b(2)+b(3),vbwide) '这样肯定不行
应该怎么写？？？
大家理解错我的目的了，
mid(),left(),或者把要的字节读出来，再放一个字节数组，这些方法我都知道
我是想问用什么表示 chr(byte(1),byte(2))这样的一个汉字，也就是把这两个字节一起做为一个汉字
现在已知的方法是 chr("&h"+hex(byte(1))+hex(byte(2))) 但这样太麻烦，一次还只能一个汉字
有没有能连续表示N个字节而不用转为16进再用加号连接的方法？？
！
！
！
上面是举个例，再比如传输数据时 要连着传字符 "jjjjj" & b(3) & b(4) & VBcrlf
这里的b(3),b(4)是一个汉字，怎么连接？？？？？？？？？？？？？？？
dim s as string
b="汉字哦"
s=b
print strconv(s,vbwide) '这里输出原汉字
print strconv(b,vbwide) '输出也是原汉字
问题：
比如我只想要其中的几个字，而不是全部的汉字，怎么弄？
print strconv(b(2)+b(3),vbwide) '这样肯定不行
应该怎么写？？？
大家理解错我的目的了，
mid(),left(),或者把要的字节读出来，再放一个字节数组，这些方法我都知道
我是想问用什么表示 chr(byte(1),byte(2))这样的一个汉字，也就是把这两个字节一起做为一个汉字
现在已知的方法是 chr("&h"+hex(byte(1))+hex(byte(2))) 但这样太麻烦，一次还只能一个汉字
有没有能连续表示N个字节而不用转为16进再用加号连接的方法？？
！
！
！
上面是举个例，再比如传输数据时 要连着传字符 "jjjjj" & b(3) & b(4) & VBcrlf
这里的b(3),b(4)是一个汉字，怎么连接？？？？？？？？？？？？？？？
mid(b,n,1)，就是要第n个汉字
mid(b,n,m)，就是从第n个汉字开始，要m个汉字
明白你的意思了，用chrb(b(0))& chrb(b(1))试试
其实VB字处理函数已经十分强大了！你所需要的功能有一个函数可以解决的。
我编下一下代码可以解决你的问题。
dim b() as byte
dim s as string
b="汉字哦"
s=b
dim Temp as string
Temp=mid(s,从第几个开始（数值），要几个汉字（数值））
print strconv(Temp,vbwide)
StrConv函数
返回按指定类型转换的 Variant (String)。
语法
StrConv(string, conversion, LCID)
StrConv 函数的语法有下面的命名参数：
部分 说明
string 必要参数。要转换的字符串表达式。
conversion 必要参数。Integer。其值的和决定转换的类型。
LCID 可选的。如果与系统LocaleID不同，则为LocaleID（系统LocaleID为缺省值。）
设置值
conversion 参数的设置值为：
常数 值 说明
vbUpperCase 1 将字符串文字转成大写。
vbLowerCase 2 将字符串文字转成小写。
vbProperCase 3 将字符串中每个字的开头字母转成大写。
vbWide* 4* 将字符串中单字节字符转成双字节字符。
vbNarrow* 8* 将字符串中双字节字符转成单字节字符。
vbKatakana** 16** 将字符串中平假名字符转成片假名字符。
vbHiragana** 32** 将字符串中片假名字符转成平假名字符。
vbUnicode 64 根据系统的缺省码页将字符串转成 Un