PicoScope 7 Software
Available on Windows, Mac and Linux
Code: Select all
Option Explicit
Declare Function adc10_get_driver_version Lib "ADC1032.DLL" () As Integer
Declare Function adc10_open_unit Lib "ADC1032.DLL" (ByVal port As Integer, ByVal product As Integer) As Integer
Declare Function adc10_set_unit Lib "ADC1032.DLL" (ByVal port As Integer) As Integer
Declare Sub adc10_close_unit Lib "ADC1032.DLL" (ByVal port As Integer)
Declare Function adc10_get_unit_info Lib "ADC1032.DLL" (ByVal S As String, ByVal lth As Integer, ByVal line_no As Integer, ByVal port As Integer) As Integer
Declare Function adc10_get_value Lib "ADC1032.DLL" () As Integer
Declare Sub adc10_set_trigger Lib "ADC1032.DLL" (ByVal enabled As Integer, ByVal enable_auto As Integer, ByVal auto_ms As Integer, ByVal rising As Integer, ByVal threshold As Integer, ByVal delay As Integer)
Declare Function adc10_set_interval Lib "ADC1032.DLL" (ByVal us_for_block As Long, ByVal ideal_no_of_samples As Long) As Long
Declare Function adc10_get_values Lib "ADC1032.DLL" (values As Integer, ByVal no_of_values As Long) As Long
Declare Function adc10_get_times_and_values Lib "ADC1032.DLL" (times As Long, values As Integer, ByVal no_of_values As Long) As Long
Dim times(6000) As Long
Dim values(6000) As Integer
Dim S As String * 255
Dim i As Integer
Dim j As Integer
Public port As Integer
Public product As Integer
Public opened As Boolean
Anyone have anything to offer on this point? I still have not been able to resolve this issue, and it is causing me problems with some of my data capture needs.mrigger wrote:Hi again,
so obviously the problem I am experiencing has been around for quite a while. Is there no fix yet? after all this time? There must be a workaround for this other than having to close & reopen Excel.