ник: ra4hrz
Так, всё-таки, в каком месте программы воткнуть мне этот кусочек:
Private Declare Function Inp Lib "C:\WINDOWS\system32\inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Dim statusint As Variant
statusint = Inp(889)
If statusint = 95 Then RF = RF + StepNet
Call To_TRX
Что-то ошибку то и дело выдаёт.