05/03/13 14:43
fosforo
Ciao
Ho fatto questo script per fare dei calcoli di tempo. (da fotogrammi a ore-minuti-secondi)
L'ultima riga mi da errore
{"Conversion from string "06:" to type 'Double' is not valid."}
Function FramesToTimecode(ByVal x_) As Double
'x_ is the frames-value
' ------------------------ Formato PAL ------------
sm_ = Int(x_ / 25)
Ftg = x_ - sm_ * 25
Ora = Int(sm_ / 3600)
Min = Int((sm_ - Ora * 3600) / 60)
Sec = Int(sm_ - Ora * 3600 - Min * 60)
FramesToTimecode = Format(Ora, "00:"
'+ Format(Min, "00:"
'+ Format(Sec, "00:"
+ Format(Ftg, "00"
End Function
Grazie anticipatamente
Ultima modifica effettuata da fosforo 05/03/13 16:01
aaa