давно уже довелось научиться работаТь
пример работы по усб.
P.S в архиве изменение лайфтаймера на произвольное значение и изменение продукт кода через usb интерфейс. ну и чтение инфо хммм. А чего значит "расширенный лайфтаймер"? С точностью до наносекунд что-ли?
тело в PM и так хранит количество секунд, а на морде по war0anty показывает только часы и минуты
типа
Сообщение от 48721.pm
[88]
0=00000000000000000000000000000000000000000000000000000000000000005CC51A00
Код:
Option Explicit
Private Sub Command1_Click()
Dim lifetimer As String
Dim pm() As Long
ReDim pm(88)
pm(88) = &H1AC55C
lifetimer = _
(pm(88) \ 3600) & " hours " & _
((pm(88) Mod 3600) \ 60) & " minutes " '& _
(pm(88) Mod 60) & " seconds"
MsgBox lifetimer
End Sub
почему в обратном порядке байты в 88 блоке записаны - объяснять, думаю, никому не нужно. В BB5 вроде порядок прямой - что есть странно