您当前的位置: 用下面的代码限制使用次数，编译没问题，但是不起作用，请问错在那？
- VB.NET code
Option Explicit
Private Sub Form_Load()
Dim lngRemainData As Long
lngRemainData = GetSetting("MyApp", "set", "times", 0)
If lngRemainData >= 3 Then
MsgBox "试用次数已满，如果您觉得本软件不错，请购买正版！", vbOKOnly, "XX软件工作室"
End
End If
MsgBox "现在剩下：" & 3 - lngRemainData & "试用次数，好好珍惜！"
lngRemainData = lngRemainData + 1
SaveSetting "MyApp", "set", "times", lngRemainData
End Sub
------解决方案--------------------
用VB6测试，代码没有问题。
检查注册表 HKEY_CURRENT_USER\Software\VB and VBA Program Settings\MyApp\set 是否正确设置。
------解决方案--------------------
把变量写到MY.SETTINGS中，安全，可靠，简单
------解决方案--------------------
将倒计时追加到EXE自身，每次启动时读取自身EXE结尾值。
------解决方案--------------------