Modularização E Reuso

[Señor Smoke]

Preciso saber como faço para modularizar minha aplicação em VB.

Até agora eu estou criando um modulo e lá dentro eu declaro :

Public Con As New ADODB.Connection

Mas ainda estou com uns problemas, eu ainda tenho que colocar um botão e declarar todos os parametros de conexao com o banco sempre que eu uso um novo form.

Como eu faço pra só ter que colocar um unico botao de conexao e delcarar isso só uma vez, sendo assim utilizado por todos os forms:

Public Sub Command1_Click()

Con.Provider = "SQLOLEDB"

Con.Properties("Data Source").Value = "xxxxxxxx"

Con.Properties("Initial Catalog").Value = "xxxxxxx"

Con.Properties("Integrated Security").Value = "SSPI"

Con.Open

MsgBox " Conexao efetuada com sucesso ! "

End Sub

[]s

[Decio]

Declarado como Public em um módulo deveria funcionar.

Tenta assim:

Global CONN As ADODB.Connection