Pos de igual forma que en el 2003.
Declara un SqlConnection.
Dim sqlcon as new SqlConnection("SERVER=.; Initial Catalog=BaseDatos; Integrated Security=SSPI;")
Private Sub ProbarConexion()
Try
sqlcon.Open()
sqlcon.Close()
MsgBox("Conexion exitosa")
Catch ex as Exception
MsgBox(ex.ToString())
End Try
End Sub
Si estas usando Sql 2005 Express posiblemente necesites descargar el MANAGEMENT TOOLS para SQL.
Espero te sirva.
