要锁定VB程序，您可以采取以下几种方法：
使用现成的软件狗或加密包
购买专业的软件保护和加锁工具，这些工具通常提供更高的安全性，并且使用起来相对简便。您只需将软件狗插入计算机的USB端口，程序便会自动识别并进行加锁。当需要解锁时，插入软件狗的对应解锁器即可。
读取硬盘驱动器的序列号
通过调用Windows API函数`GetVolumeInformation`来获取硬盘驱动器的序列号，并将其秘密保存。在程序启动时，检查当前硬盘序列号是否与保存的序列号匹配，如果不匹配则拒绝运行。这种方法需要一定的编程知识，并且可能涉及到系统安全性的问题。
使用API函数限制鼠标移动
利用VB中的API函数`ClipCursor`来限制鼠标的移动范围。通过定义一个矩形区域，并将鼠标指针限制在该区域内，可以实现对鼠标移动的锁定。这种方法适用于需要限制用户操作范围的场景。
锁定窗体上的控件
在VB中，可以通过设置控件的“锁定”属性来防止用户移动或编辑。这可以通过右击控件并选择“锁定按钮”命令来实现。被锁定的控件将无法移动或编辑，直到解锁。
利用USB设备锁定计算机
编写一个VB程序，使其在检测到USB设备（如U盘）插入时自动锁定计算机。程序可以在系统托盘处显示图标，并提供一系列功能，如选择磁盘、设置随系统启动、关机、注销和重启计算机等。这种方法需要使用USB设备的识别和系统钩子技术。
根据您的具体需求，可以选择最适合的方法来实现VB程序的锁定。如果需要更高的安全性和易用性，建议使用现成的软件狗或加密包。如果需要更多的自定义和控制，可以考虑使用API函数或USB设备锁定方法。