vbterm.bas

eda9003串口程序编程源码

Attribute VB_Name = "Module1"
Option Explicit

Public Echo As Boolean        ' Echo On/Off flag.
Public CancelSend As Integer  ' Flag to stop sending a text file.
Public sum As Integer
Public modName As String
Public ModAddress As Integer
Public modindex As Integer
Public lvitem As ListItem
Public GeSHi As Integer
Public ShuJu(9, 6) As Single
Public N_CJ As Integer
Public ModAddress1(10) As String
Public ModCount As Integer
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)