Dim ckh As String = e.Form.Controls("ComboBox1").value
Dim tb As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim s As Integer
s = UHFApiV10.NetConnect(hPort,"192.168.1.200",100)
If s = 0 Then
tb.Text += vbcrlf & "串口打开成功!串口句柄为:" & hCom
Else
tb.Text += vbcrlf & "串口打开失败"
End If
运行后提示
无法在 DLL“UHFApiV10.dll”中找到名为“NetConnect”的入口点。请问怎么回事
动态库文件名:UHFApiV10.DLL
1.函数
1-1. 读写器管理函数
NetConnect
函数描述
|
NetConnect (HANDLE &hPort,LPCTSTR
strReaderIP, int nTcpPort);
|
功能
|
通过指定的IP地址和端口,连接并初始化读写器
|
参数
|
|
返回值
|
返回值:0为成功。
|
应用实例
|
If(NetConnect (hcom,”192.168.1.200”,100)==0)
MessageBox("成功");
Else
MessageBox("失败");
|