Visual Basic - SQL SERVER ...?

De antemano muchas gracias por su ayuda...

Jamás habìa trabajado con SQL SERVER y quisiera desarrollar con este producto. Actualmente sé algo de SQL de Oracle, por ejemplo entrar con el usuario scott/tiger ó system/manager...
Pero con este SQL SERVER, no sé ní conectarme...alguien me podría ayudar con estos principios.

Primero defino la conexión a la base de datos en un módulo
Global VGConn As ADODB.Connection

y los Recoset se definen como

Dim RS as Adodb.Recordset

Con esta función te conectas a la base de datos sql
Nota. Cambía VGServer por el servidor de la base de datos sql, vgbase por el nombre de la base, vguser y vgpassword por el nombre de usuario la contraseña para conectarse.

Function AbrirConexionADO(Conexion As ADODB.Connection) As String
On Error GoTo Fin
Set Conexion = New ADODB.Connection
Conexion.Provider = "SQLOLEDB"

Conexion.ConnectionString = "Data Source = " & _
VGServer & "; Initial Catalog = " & VGBase & _
"; User ID= " & VGUser & "; Password = " & VGPassword
Conexion.ConnectionTimeout = 0
Conexion.Open
AbrirConexionADO = ""
Exit Function

Fin:
AbrirConexionADO = Err.Number & " " & Err.Description
Err.Clear
End Function

Con esta otra cargar un recordset

Function ConectarRS(RS As ADODB.Recordset, SQL As String, Optional SoloLectura As Boolean)
Set RS = New ADODB.Recordset
RS.CursorLocation = adUseClient
If SoloLectura Then
RS.Open SQL, VGConn, adOpenDynamic, adLockReadOnly, adCmdText
Else
RS.Open SQL, VGConn, adOpenDynamic, adLockOptimistic, adCmdText
End If
End Function

Afogutu