VB 注册表操作的难题

来源：百度知道 编辑：UC知道 时间：2024/05/09 03:23:39
我用多很多的模块， 都同时遇到一个问题， 给注册表中的某一个键赋值得时候，如果写入的是中文，则只能显示中文的一般。例如：给一个名为“Test”的键赋值“操作系统”，则写入注册表的只有“操作”两个字

请问这是怎么回事？

Public Function WriteRegValue(ByVal KeyName As String, Caption As String) As Integer
Set Reg = CreateObject("Wscript.Shell")
Reg.RegWrite KeyName, Caption
If Reg.RegRead(KeyName) = Caption Then WriteRegValue = 1
End Function

一个函数,就可以写注册表了~~

写入的字节是4吧?