Visual Basic - Conectar SQL Server 200 con Visual Basic 6

Hola a todos, necesito saber como conectar una base de datos de SQL Server con un formulario de Visual Basic 6. Gracias de antemano.

lo podrias hacer mediante dns o codigo
para el dns inicio herramientas administrativas das de alta un dns y listo solo enlasas tu form con un ado y listo para el codigo
Public ADOCONN As New ADODB.Connection 'CONEXION*************
Public Function conex()
ADOCONN.ConnectionString = " Provider=SQLOLEDB.1;Persist Security Info=False;User ID=SA;Initial Catalog=mibase;Data Source=servidor"
ADOCONN.Open
End Function
Public Function desconectar()
ADOCONN.Close
End Function