Visual Basic - Diferencia de Dias

Que tal amigos, a ver si me ayudan con este problemilla, necesito hacer un calculo algo complicado aca les explico:
en una tabla tengo un rando de cobros por dias: ejemplo
desde el dia 1 al dia 10 un precio
desde el dia 11 al dia 20 otro precio
y si es mayor a 21 otro precio

en un formulario tengo que poner do campos fecha y sacar los dias de diferencia, e ir a al rango de cobro: supongamos que la diferencia es de 50 dias el cobro que se haria seria el siguiente:
Del dia 1 al dia 10 -> 50.00 x Dia
Del dia 11 al dia 20 ->100.00 x Dia
Del dia 21 a Mas ->150.00 x Dia
Es decir: como son 50 dias el calculo seria asi mas o menos
Por 10 dias 50 x 10=500.00
Del dia 11 al dia 20 100 x 9=900.00
A partir del dia 21 150 x 29=4350.00
mi total Seria 5750.00

alguien me puede ayudar en como hacer este calculo.

De ante mano gracias a todos.

Puedes usar esto:

Dim Dias as Long
Cobro as Long

Dias = DateValue("01/12/2010") - DateValue("01/01/2010")

if Dias<=10 then
Cobro = Dias * 50
else
Cobro = 500
Dias = Dias - 10
if Dias<=10 tehn
Cobro = Cobro + (Dias * 100)
else
Cobro = Cobro + 1000
Dias = Dias - 10
Cobro = Cobro + (Dias * 150)
end if
end if

Gracias por la respuesta Pepe, pero hay una variante, resulta que el cobro solo se hará si es mayor a diez dias, si es menor o igual a diez el cobro será cero, caso contrario el cobro sera como explique, aver si me das una manita en eso.

Sabes algo de vb?