www.pudn.com > E516_Stepper-motor-control-program.zip > Module1.vb, change:2015-04-04,size:553b


´╗┐Module Module1 
    Public Declare Function CH375OpenDevice Lib "CH375DLL.DLL" (ByVal iIndex As Integer) As Integer 
    Public Declare Sub CH375CloseDevice Lib "CH375DLL.DLL" (ByVal iIndex As Integer) 
    Public Declare Function CH375Writedata Lib "CH375DLL.DLL" Alias "CH375WriteData" (ByVal iIndex As Integer, ByRef iBuffer As Byte, ByRef ioLength As Integer) As Boolean     
    Public Sub Shutter_open() 
        CH375Writedata(0, 138, 1) 
    End Sub 
    Public Sub Shutter_close() 
        CH375Writedata(0, 10, 1) 
    End Sub 
End Module