How to set Global Declaration, or how to set sub main as the startup form

[bizzy_e23]

Dim con As New OleDb.OleDbConnection
Dim ds As New DataSet
Dim adapt As New OleDb.OleDbDataAdapter
Dim sql As String

i want to declare the following in a module and set a sub main() in the module and call form1.show,

but i cant set the submain as the startup form.