Attribute VB_Name = "main"

'**********************************
' 基本設置
'**********************************

Public intPort As Integer       '串行口號
Public strSet As String         '協議設置
Public intTime As Integer       '發送時間間隔

'**********************************

'**********************************
'發送與接收標志
'**********************************

Public blnAutoSendFlag As Boolean   '發送標志
Public blnReceiveFlag As Boolean    '接收標志

'**********************************

'**********************************
'發送模塊
'**********************************

Public intOutMode As Integer    '發送模式
Public strSendText As String    '發送文本數據
Public bytSendByte() As Byte    '發送二進制數據

'*********************************
'顯示標志
'*********************************


Public intHexChk As Integer         '十六進制編碼標志
Public intAsciiChk As Integer       'ASCII碼標志
Public intAddressChk As Integer     '地址標志
Public intAdd48Chk As Integer       '4/8位地址標志

'**********************************