Sub Main在vb里是干嘛的？！

说的简单一点，我们平时见到的启动对象多是窗体，一般默认是你设计程序的第一个窗体FORM1，程序打开后最先运行的代码也就是form1_load（）里的代码，但是有了sub main（），你就可以以一段代码作为程序的入口，这段代码的执行发生在所有窗体的打开之前。方法是建立一公有模块，里面写入sub main代码，然后右键工程属性，把启动对象设为sub main即可。例如下面一段代码：

Sub MAIN()
If App.PrevInstance = True Then
MsgBox "程序不允许运行多个实例。"
End
Else
Form1.Show
End If
End Sub
如果你想你的某个程序只能同时打开一个实例，那么可以用上面的sub main代码，通过这段代码验证，如果重复运行了，那么直接关闭，如果不是在进入第一个窗体。

一个过程，可设为启动对象，用法：
打开VB，点击“工程”，选择“工程1属性”，在出来的对话框中选择“启动对象”为Sub main，然后添加一个模块，在模块中写入：
sub main()
form1.show ‘或者别的代码
end sub
程序运行的时候从sub main开始

当使用多窗体的时候，或者无窗体的时候，则首先加载运行模块文件中的Sub Main.