请问各位，VB中能不能进行字符集的转换？
我的程序数据库是SQL SERVER英文服务器，我想在VB中向数据库的表中写入中文内容，请问有什么方法可以实现吗？谢谢了 ：） 问题点数：0、回复次数：7Top
1 楼luckyelf（碟中碟）回复于 2005-06-01 14:06:44 得分 0
提供一个解决方案:
1.数据库的字符集设置为支持unicode型（具体类型可以自己决定）。
2.在vb中将中文字符与unicode字符互换即可。
3.操作中应该注意使用双字节数进行操作。
4.
这个方法我也没有试过，以前做过字符集转换的工作，想来是可行的！
Top
2 楼ccxxiaoxia（笑看庭前花开花落）回复于 2005-06-01 14:24:38 得分 0
可不可以给出具体写法？我写不出来，不知道怎么转换 ：）Top
3 楼DooDu（杜霖:I want,I can(开关拉)）回复于 2005-06-01 14:47:34 得分 0
AscW 函数返回 Unicode 字符代码
ChrW 函数返回包含 Unicode 的 String
debug.print AscW("你")
debug.print ChrW("20320")Top
4 楼ccxxiaoxia（笑看庭前花开花落）回复于 2005-06-01 15:06:08 得分 0
不行呀，我用AscW("你")这种方法转换后是一个数字的串，写到数据库中不是中文，是这个数字串Top
5 楼sinos_sinos（挑战不是障碍 人生处处精彩）回复于 2005-06-01 16:03:08 得分 0
StrConv()
看看这个函数 基本能解决 以前我就本 字符处理烦死了
VB 是 unicode的 中文 字母 混合起来就麻烦
Top
6 楼sinos_sinos（挑战不是障碍 人生处处精彩）回复于 2005-06-01 16:09:13 得分 0
你向数据库里写的啊？
我当时是想 TAG里写的 因为空间有限 写TAG 时 要求汉字 2字节 字母 数字 一字节 但VB 是
unicode码 所以 都占两字节的 浪费有限的 TAG 空间
当时 用了 STRCONV（） 这个函数 转换 问题就解决了 省空间啊 呵呵
还有配合其他的函数要
自己摸索一下 呵呵Top
7 楼ccxxiaoxia（笑看庭前花开花落）回复于 2005-06-01 17:39:12 得分 0
搞不定呀，sinos_sinos,请再指点一下吧，我这样转换出来：
Dim ss As String
ss = "测试"
Dim ss1 As String
ss1 = StrConv(ss, vbUnicode)
Print ss
Print ss1
Dim sql As String
sql = "insert into tmp(aa) values ('" & ss1 & "')"
conn.Execute (sql)
其中打印出来的ss1是全乱，但是执行SQL语句出错
Top
