主题：修改注册表的某个值，为何代码就无法运行了？

有字符串，经加密后，存储在注册表中，

在命令窗口执行以下代码，

 

Dim reg As String = Registry.GetValue("HKEY_CURRENT_USER\Software\Mycode","reg","A")
Dim ms As String = Registry.GetValue("HKEY_CURRENT_USER\Software\Mycode","ms","A")
Dim code As String = DecryptText(reg,ms,ms)

If code > "" AndAlso code = ComputerId Then
  MessageBox.Show ("ok ")
Else
MessageBox.Show (" no ")
  Syscmd.Project.Exit()
End If

 

1.  在没有人为修改注册表中 reg 和 ms 的值的时候，代码运行正常

 

2.  在人为修改注册表中 reg 的值的时候（修改或是置零），代码运行正常

 

问题来了

 

3. 在人为修改注册表中 ms 的值的时候（修改或是置零），代码运行时出现这个提示，请教是什么原因啊？

 

 

 

此主题相关图片如下：32.jpg

http://www.foxtable.com/help/topics/2070.htm