Lo que puedes hacer es que al momento de costruir la sentencia SQL agregas el contenido del label:
Código:
StenciaSql = "SELECT fecha_vencimiento, doc_tercero, ncheque, ncuenta," _
& "titular, monto, noperacion, DATEDIFF(day,fecha_vencimiento,GETDATE()) " _
& "AS & lb.Caption & "] FROM ...."
Recordset.Open SentenciaSql ....
Ahora si lo anterior no te funciona puedes hacer lo siguiente, talvez te parezca mucho más fácil:
Código:
Datagrid1.columns(1).caption = "Diferencia en días"
Pero en éste último caso creo que también tendrias que cambiar la propiedad width.
Saludes