class= " lineNumbers "
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
|
class=
функция UnTick " class= " id= " codeSnippet794400 Public (p32) если (IsNumeric, то (p32)) После этого
UnTick = p32
Еще
черточка = InStr (p32, «-»)
Px_length = Len (p32)
intPx = о (p32, черточка - 1)
intTicks = право (p32, Px_length - черточка)
Если (InStr (intTicks, «+")) после этого
добавочно = InStr (intTicks, «+")
tk_length = Len (intTicks)
subticks = о (intTicks, плюс - 1)
UnTick = intPx + subticks * (1/32) + 0.5/32
Еще
Если (InStr, то (intTicks, «: ")) после этого
двоеточие = InStr (intTicks, «: ")
tk_length = Len (intTicks)
subticks = о (intTicks, двоеточие - 1)
eigths = право (intTicks, tk_length - двоеточие)
UnTick = intPx + subticks * (1/32) + eigths * (1/8) * (1/32) еще
UnTick = intPx + intTicks * (1/32)
Закончитесь если
Закончитесь если
Закончитесь если
Закончите функцию
|