Example I wish to open port rs232

Private Declare Function OpenPort_PR Lib "DevicePORT" (ByVal lpPort_Name As String, ByVal dwSpeed As Long, ByRef lpHandle As Long) As Boolean
Dim hRF As Long
If OpenPort_PR ("Com1:", 115200, hRF) Then Code "(MSG, Port OPEN!)"
mach3 writes error:
Error on line 3 - Error in loading DLL

Whether it is possible to work in general with dll in vb scripts? If yes that as
It correctly to do?