Question

怎样把USB-4711A写成VB里面的控件，要做一个数据采集卡，想在VB里直接调用USB

Answer 1

新建activeX控件工程，添加vb控件，编写所要实现功能代码，并设置需要通信的属性，打包就可以了

追问

谢谢大侠，请问你知道为什么研华USB-4711A安装驱动后，插在电脑上没反应吗

追答

驱动安装后，计算机会分配给外设一个硬件资源，有的外设重新插上后会提示，有些不会，但可在设备管理器中发现硬件已被识别

Answer 2

Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Static i%
i = i + 1
If i = 30 Then
Form2.Show
Timer1.Enabled = False
End If
End Sub