求助:USB接口数据采集卡的采集 点击:894 | 回复:0



nhr

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:10帖 | 13回
  • 年度积分:0
  • 历史总积分:96
  • 注册:2006年10月23日
发表于:2007-08-02 19:51:00
楼主
  下面给出该采集卡的DLL函数,请高手指点一下怎么可以把数据采进来显示在文本框里?
Declare Function USB_Init Lib "d:\vb测试\D12dll.dll" Alias "_USB_Init@0" () As Long   'USB初始化函数
Declare Function USB_Close Lib "d:\vb测试\D12dll.dll" Alias "_USB_Close@0" () As Long   '退出USB
Declare Function CJCanShuSend Lib "d:\vb测试\D12dll.dll" Alias "_CJCanShuSend@48" (ByVal m_AD_frequency As Long, ByVal m_AD_holding As Byte, ByVal m_AD_page As Byte, ByVal m_AD_send_data_type As Byte, ByVal m_AD_spring As Byte, ByVal m_AD_spring_type As Byte, ByVal m_AD_spring_voltage As Long, ByVal m_AD_start_channels As Byte, ByVal m_AD_time As Long, ByVal m_instrument_type As Byte, ByVal m_AD_end_channels As Byte, ByVal m_AD_filter As Long) As Long   '设置采集卡参数
Declare Function GetData Lib "d:\vb测试\D12dll.dll" Alias "_GetData@8" (pData As Integer, ByVal nCount As Long) As Long   
Declare Function GetCountData Lib "d:\vb测试\D12dll.dll" Alias "_GetCountData@8" (pData As Integer, ByVal nCount As Long) As Long
Declare Function CJStop Lib "d:\vb测试\D12dll.dll" Alias "_CJStop@0" () As Long
Declare Function Outport Lib "d:\vb测试\D12dll.dll" Alias "_Outport@4" (ByVal OutData As Byte) As Long
Declare Function Inport Lib "d:\vb测试\D12dll.dll" Alias "_Inport@4" (InData As Byte) As Long
Declare function Outport_data Lib "D12dll.dll" Alias "_Inport@4"(Byval OutData as Byte) as Long
declare Function Inport_data Lib "D12dll.dll" Alias "_Inport@4" (Byval InData as Byte) as Long
    我编了好多小程序,但是都没有把数据采进来,很急!
    不知道以上信息够不够,多谢指点!!!!


热门招聘
相关主题

官方公众号

智造工程师