Saber el total de dias habiles entre 2 fechas y obtener la fecha final

Me solicitarón realizar un proceso donde al seleccionar una fecha inicial y agregar la cantidad de días a pagar debe aparece la fecha final tomando solo los días hábiles.

Por ejemplo, se tiene la fecha de hoy: 08/12/2016 y deseas pagar a 15 días, si tomáramos los días naturales la fecha de pago seria el 23/12/2016 pero como deseas que solo sean los días hábiles (Lunes a viernes) la fecha de pago deberá ser: 29/12/2016.

Para esto utilizamos el siguiente código:
      Dim v_diastotal as string ="15"

 

Los 120 días que aparecen en la fecha final solo es como referencia, al final sumo los 15 días de la variable dias + los días sábado y domingo de la variable días_syd.