菜鸟问个挺菜的问题
老师让我做一个单点采集的程序,要用VB实现。我用的是20的采集卡,看了教程以后用LV启动单点采集数据,成功了。
然后我就把采集到的数据导出到DATA文件,再用VB调用。
所以最后我的程序是:VB采集的时候要启动VI转换成的EXE,然后再读取DATA文件,可是每次都要运行EXE,再关闭,每次采集总要跳出一下那个VI做的EXE,觉得很不方便,求救各位高手! 那就把采集程序也用vb来写就可以了
看下采集卡的programmermanual
一般来说都是调用dll,或者使用activex
这两种方式在vb和lv下几乎没有任何区别,都一样的快捷 但是CPUBBS20的采集卡给出的只有VI和CVI的例子,怎么查看programmermanual小弟也不是很懂,恳请各位大虾帮忙! 您好,请看光盘上面的DOC文件夹内的文档,是看CVI的,里面有相关的DLL的说明,您可以调用这些DLL就可以实现的!不过我也不会VB,呵呵!单点采集是比较简单,一个函数就可以实现的! 这里有VB高手么?
以下是我在通用模块中的代码
Public cpubbs_ad_result(3) As Double, cpubbs_write_statue As Long, cpubbs_read_statue As Long
Public Declare Function fk Lib "C:\Users\xxd\Desktop\cpubbs\cpubbs_usb20_ver1_dll.dll" Alias "cpubbs_ad_sample_1_point" (ByVal cpubbs_ad_result As Double, ByRef cpubbs_write_statue As Long, ByRef cpubbs_read_statue As Long) As Byte
FORM1里只有一个COMMAND控件和一个TEXTBOX
代码如下
Private Sub Command1_Click()
i = fk(cpubbs_ad_result(0), cpubbs_write_statue, cpubbs_read_statue)
Text1 = cpubbs_ad_result(0)
End Sub
每次运行,点击command1。。VB出错,停止工作。。
请各位大虾帮忙解答~~十万火急 如果停止工作的话,就证明你函数调用错误。可能是你声明的函数类型不对。如果你有该dll 的说明和dll文件,或许我可以帮你看一下
页:
[1]