| Usuario |
Traducir funcion en VB to C++ |
mduarte
3 Mensaje(s)
|
| Enviado - 16/3/2003 |
| |
cómo puedo traducir la siguiente funcion en VB ?
Function DateToNumber(dOrig as Date) as Long
Dim HDate as date
HDate = DateSerial(1900,1,1) + TimeSerial(0,0,0)
DateToNumber = Abs(DateDiff("d",HDate,dOrig))
End Function
gracias,
Marcelo Duarte |
| |
|
hperezb
4 Mensaje(s) |
| Enviado - 19/4/2003 |
| |
long int DateToNumber(Date dOrig)
{
date HDate;
HDate=DateSerial(1900,1,1) + TimeSerial(0,0,0,);
return (Abs(DateDiff("d", HDate, dOrig)));
}
// long int, tipo de dato que devuelve la funcion
//date HDate, declara HDate como date
//me parece que en la tercera linea debes sobrecargar el operador + para la class con que trabajas.
//ultima linea devuelve el resultado.
no se mucho pero quiero colaborar, OK.
|
| |
|
|
|