README.md
December 4, 2022 ยท View on GitHub
Description
This code will disable your program after a certain number of runs of the program. more info: worm@thepentagon.com
More Info
Put in Form_Load statement. And this code is for 32-bit programming Only!
Don't put this code in while your testing and programming your program because it will then disable you from running your program. more info: worm@thepentagon.com
| Submitted On | |
| By | Worm |
| Level | Unknown |
| User Rating | 4.2 (165 globes from 39 users) |
| Compatibility | VB 4.0 (32-bit), VB 5.0, VB 6.0 |
| Category | Miscellaneous |
| World | Visual Basic |
| Archive File |
Source Code
'put in form_load
retvalue = GetSetting("A", "0", "Runcount")
Worm$ = Val(retvalue) + 1
SaveSetting "A", "0", "RunCount", Worm$
If Worm$ > 99 Then 'put one number lower then it says....you can only run the program 200 times.
MsgBox "This is the end of the trial run",16,"Sorry"
Unload me
End If