Ayuda con modulo

[hunabku]

Saludos tengo una aplicacion en VB6 con base de datos sql server 2000 y conexion ado, me funciona bien declaro mis variables en el formulario asi:

Dim cnn As ADODB.Connection
Dim cmdcomando As ADODB.Command
Dim rstorigen As ADODB.Recordset

y hago la conexion asi en el load del formulario:

Set cnn = New ADODB.Connection
Set cmdcomando = New ADODB.Command

cnn.ConnectionString "driver=SQLServer;server=DESAROLLO;uidprueba;pwd=p rueba;database=RECLUTAMIENTO"

cnn.CursorLocation = adUseClient
cnn.Open

y me funciona perfectamente pero quisiera que todas las variables meterlas en un modulo global para no declarar todo esto en cada formulario pero no he podido alguien me podria decir como puedo hacerlo