lcStartTime GETWORDNUM( ALLTRIM( Thisform.text1.Value ), 1, '-') lcEndTime GETWORDNUM( ALLTRIM( Thisform.text1.Value ), 2, '-') lnEndHours = INT(VAL(GETWORDNUM(lcEndTime, 1, ':'))) lnStartHours = INT(VAL(GETWORDNUM(lcStartTime, 1, ':'))) lnEndMins = INT(VAL(GETWORDNUM(lcEndTime, 2, ':'))) lnStartMins = INT(VAL(GETWORDNUM(lcStartTime, 2, ':'))) lcDiff = PADL( lnEndHours - lnStartHours, 2, '0' ) + ':' + PADL( lnEndMins - lnStartMins, 2, '0' ) ?lcDiffMultiplying the result by 5 is left as a learning exercise for you <s>