Lo unico qe neceistas en ADO es el String de conexión.
Dim cnn as New ADODB.Connection
cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Data Source=" & "PC1/CENTRAL" & " ;pwd=tuPassword"
cnn.Open
PC1/CENTRAL
Se entiende que PC1 es el nombre de la Pc en donde está instalado el Servidor SQL Server o MSDE
Central es el Nombre de la instancia de SQL o INSTANCENAME dado que en una misma Pc podés tener varios servicios SQL corriendo al mismo tiempo.