Visual Basic - CONEXION CON SQL SERVER

Hola
Estoy empezando apenas con vb, alguien me podria decir como es la sintaxis de una conexion a una bd de sql server, así de como es la sintaxis para mandar llamar y ejecutar un stored procedure
MUCHAS GRACIAS!!!!

A nivel modulo definir coneccion
Public cnSQL As ADODB.Connection

Luego te conectas asi:

Set cnSQL = New ADODB.Connection
With cnSQL
.Provider = "SQLOLEDB"
.ConnectionString = _
"User Id=sa" & _
";Password=" & _
";Data Source=" & NombreServidor & _ 'Si es local usa ""
";Initial catalog=" & NombreBaseDatos 'Ejm Northwind
.Open
End With

Para llamar a un proc almacenado crea una rutina, asi:

Public Sub RecuperaBanco(COD_BANCO)
Set cmdRecupera = New ADODB.Command
With cmdRecupera
.ActiveConnection = cnSQL
.CommandType = adCmdStoredProc
.CommandText = "sp_GetOneInstance_Banco"
.Parameters.Append .CreateParameter("@COD_BANCO", adChar, adParamInput, 2)
.Parameters("@COD_BANCO").Value = COD_BANCO
.Parameters.Append .CreateParameter("@N_BANCO", adChar, adParamOutput, 20)
.Parameters.Append .CreateParameter("@RETURN", adInteger, adParamReturnValue)
.Execute 'Ejecuta el SQL-Procedure
End With
End Sub

luego la llamas asi:

Call RecuperaBanco(txtBanco)
If cmdRecupera.Parameters("@RETURN").Value = 0 Then
txtNBanco = Trim(cmdRecupera.Parameters("@N_BCO").Value)
Else
MsgBox "Banco no existe", vbExclamation, "Usuario"
txtNBanco = ""
txtNBanco.SetFocus
End If

Saludos desde Lima

MUCHAS GRACIAS RODOLFO, LO VOY A PROBAR
SOLO UNAS PREGUNTITAS
A NIVEL MODULO LE LLAMAS NIVEL GENERAL?
Y QUE SIGNIFICAN LAS " Y LOS & DE ACUERDO A QUE SE TIENEN QUE PONER, MUCHAS GRACIAS DE ANTEMANO.

Las comillas dobles ", te indican el comienzo y fin de una string y el ampersand &, es un codigo de operacion que significa concatenar.

Entonces, lo que se hace es concatenar (juntar) varias cadenas (string) para formar una sola cadena asi:

.ConnectionString = "User Id=sa" & ";Password=" & ";Data Source=" & NombreServidor & ";Initial catalog=" & NombreBaseDatos

El resultado es algo asi:
.ConnectionString = "User Id=sa;Password=;Data Source=SERVER;Initial catalog=NORTHWIND"

Si, nivel modulo es nivel general.

Saludos desde Lima