global.bas

一个新的通信协议

Attribute VB_Name = "global"
Option Explicit
Public Declare Function timeGetTime Lib "winmm.dll" () As Long
Public Type COMMDATA
    port As Long
    
    BaudRate As Integer
    Parity As Integer
    ByteSize As Integer
    StopBits As Integer
    
    ibaudrate As Integer
    iparity As Integer
    ibytesize As Integer
    istopbits As Integer
    
    Hw As Integer
    Sw As Integer
    Dtr As Integer
    Rts As Integer
End Type