如何读取注册表的REG_BINARY的值?

呵呵，不用 sample，你的代码有问题。
读 REG_BINARY 的值时，你需要串进去一个缓冲区（BUFFER）用来接收数据；并不是 RegQueryValueEx 帮你分配内存。我用如下代码，运行成功，结果正确：
Dim b(1000) As Byte
Dim n As Longn = 1000
sValueName = "..."
lret = RegQueryValueEx(hkey, sValueName, 0&, lType, b(0), n)当然，在实际应用中，Byte 数组的大小一般动态确定。