| 
             
              ソス@ソスソスVB6.0ソスナバソスCソスiソスソスソス`ソスソスソスナシソスソスソスAソスソスソスハ信ソスソスソスソスソスノゑソス
             
           | 
        
 ソスgソスbソスvソスyソス[ソスWソスソス
        ソスEC/C++
        ソスEDelphi
        ソスEVisual BasicソスソスソスSソスソス
        ソス@(VB2-VB6ソスソス.NETソスソスソスp)
        ソスEVisual Basic(VB2-VB6)
        ソスEVisual Basic .NET
        ソスEVisual C++
ソスEpapy's softwarelibrary
VB6.0ソスナバソスCソスiソスソスソス`ソスソスソスフデソス[ソス^ソスソスVソスソスソスAソスソスソスハ信ソスソスソスソスcソス[ソスソスソスソス成ソスソスソストゑソスソスワゑソスソスB
        ソスソスMソスfソス[ソス^ソスヘ、ソスソスハ的ソスソスSTX,ETXソスナはゑソスソスワれたソスfソス[ソス^ソスナはなゑソスソスAソスRソス}ソスソスソスhソスfソス[ソス^ソスニ包ソスソスソスソスソスfソス[ソス^(JIS)ソスソスソスソスソスンゑソスソスソスソス`ソスニなゑソスソストゑソスソスト、ソスRソス}ソスソスソスhソスfソス[ソス^ソスネ外ソスヘ包ソスソスソスソスソスfソス[ソス^ソスニゑソスソスト認ソスソスソスソスソスネゑソスソスソスホなゑソスワゑソスソスソスBソスワゑソスソスソスMソスfソス[ソス^ソスソス1800ソスoソスCソスgソスソスソスフデソス[ソス^ソスソスソスソスCソスノ暦ソスソスソストゑソスソスワゑソスソスB
        
        ソスツまゑソスA
        ソスRソス}ソスソスソスhソスfソス[ソス^1(01,02)
        ソスRソス}ソスソスソスhソスfソス[ソス^2(03,04)
        ソスソスソスソスソスソスfソス[ソス^(2129,212A)
        ソスソスソスソスソスソスソス鼾ソスA
        01 02 21 29 21 2A 03 04
        ソスニゑソスソスソスソス`ソスナデソス[ソス^ソスソスソスMソスソスソス驍アソスニになゑソスワゑソスソスB
        
        1ソスoソスCソスgソスソスソスツ趣ソスMソスソスソストデソス[ソス^ソスソスソスMソスソスソスヘゑソスソス゚ゑソスニ、ソスuソスXソス^ソスbソスNソスフ域がソスsソスソスソスソスソストゑソスソスワゑソスソスvソスニエソスソスソス[ソスソスソスoソスワゑソスソスBソスヌのようソスノ対会ソスソスソスソスソスホ、ソスソスソスソスノ趣ソスMソスナゑソスソスソスフゑソスソスソスソスソスソストゑソスソスソスソスソスソスソスソスB
        
        ソスネゑソスソスAソスソスMソスソスソスソスソスフソソス[ソスXソスヘ会ソスソスLソスノなゑソスワゑソスソスB
        public m_data() as byte
        public m_len as long
        
        Private Sub MSComm_OnComm()
        
         Dim byt() As Byte
        
         'ソスソスMソスfソス[ソス^ソスソスソスソスソスソスホ趣ソスMソスソスソスソス
         If MSComm.InBufferCount <> 0 Then
           Do
             byt = MSComm.Input
             For i = 0 To UBound(byt)
                m_data(m_len)= byt(i)
                m_len = m_len + 1
             Next
           Loop Until MSComm.InBufferCount = 0   
        
           'ソスソスMソスソスソスソスソスoソスCソスiソスソスソスfソス[ソス^ソスソスRソス}ソスソスソスhソスニ包ソスソスソスソスソスノ包ソスソスソスソスソスソス
           Callソス@RcvProc()
           m_len = 0
         endif
        end sub
        
        ソスvソスソスソスpソスeソスBソスソス
        InputLen=0
        InputMode=1
        ソスニなゑソスソストゑソスソスワゑソスソスBソスソスしソスソスソスソスソス閧「ソスvソスソスソスワゑソスソスB
ソスソスソスンまゑソスソスソスAソスレゑソスソスソスソス¥ソス[ソスXソスノ間違いソスソスソスソスソスソスワゑソスソスソスソスB
        
        (ソスソス)public m_data() as byte
        (ソスソス)public m_data(15000) as byte
        
        ソスソスしソスソスソスソスソス閧「ソスvソスソスソスワゑソスソスB
ソスソスソスソス黷ウソスワ。
        ソスソスソスフプソスソスソスgソスRソスソスソスソスソスニ鯉ソスソスソスソスネデソス[ソス^ソスフ終ソスソスソスヘ難ソスソスソスナゑソスソスワゑソスソスソスソスヒ。
        ソスワゑソスソスソスソスヤ的ソスノデソス[ソス^ソス[ソスソスソスrソスリれたソスニゑソスソスソスソスfソス[ソス^ソスフ終ソスソスソスニゑソスソス驍オソスソスソスネゑソスソスナゑソスソスヒ。
        ソスソスソスソスソスMSComm_OnComm()ソスフ抵ソスソスソスLoopソスソスさなゑソスソスナ、
        byteData() = MSComm1.Input
        If UBound(byteData) <= 0 Then
                'ソスfソス[ソス^ソス[ソスソスソスソスソスソス
                Exit Sub
        End If
        ソスニゑソスソスソスソス合ソスノ、ソスoソスCソスgソスzソスソスノ読み搾ソスソスンまゑソスソスB
        ソスソスソスソスソスソスソス黷セソスニ、ソスfソス[ソス^ソスフ途ソスソスソスワでゑソスソスソスソスヌみ搾ソスソスワなゑソスソスソスソスソスmソスソスワゑソスソスソスフで、
        ソスハ途ソスoソスCソスgソスzソスソスソスpソスモゑソスソストデソス[ソス^ソス足ゑソスソスソスソスンまゑソスソスB
        
        If UBound(byteTotalData) = 0 Then
                 'ソスPソスヤ最擾ソスソスフ擾ソスソスソス
                 ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData))
        Else
                 ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData) + 1)
        End If
        ソスソスソスソスネ具合ソスノ。
        
        >ソスuソスXソス^ソスbソスNソスフ域がソスsソスソスソスソスソストゑソスソスワゑソスソスvソスニエソスソスソス[ソスソスソスoソスワゑソス
        ソスハ擾ソスXソス^ソスbソスNソスIソス[ソスoソス[ソスtソスソスソス[ソスヘ出ソスワゑソスソスが、MSComm_OnComm()ソスフ抵ソスソスフどゑソスソスソスソスソス
         DoEventsソスソスソスソスソスソスソストゑソスソスワゑソスソスか?
ソス范エソス@ソスソスソスソスAソス答ゑソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスソスソスソスソスニわかソスソスネゑソスソスニゑソスソスがソスソスソスソスフで、ソスソスソスソスソストゑソスソスソスソスソスソスソスソスB
        
        >ソスソスソスソスソスソスソス黷セソスニ、ソスfソス[ソス^ソスフ途ソスソスソスワでゑソスソスソスソスヌみ搾ソスソスワなゑソスソスソスソスソスmソスソスワゑソスソスソスフで、
        >ソスハ途ソスoソスCソスgソスzソスソスソスpソスモゑソスソストデソス[ソス^ソス足ゑソスソスソスソスンまゑソスソスB
        
        ソスソスソスフ擾ソスソスソスソスソスソスソスソスソスソスソスソスフに、
        >>     For i = 0 To UBound(byt)
        >>        m_data(m_len)= byt(i)
        >>        m_len = m_len + 1
        >>     Next
        ソスニゑソスソストゑソスソスソスソスフでゑソスソスソスソスAソスソスソスソスソストゑソスソスソスソスソスソスソスソスソス
        
        >If UBound(byteTotalData) = 0 Then
        >         'ソスPソスヤ最擾ソスソスフ擾ソスソスソス
        >         ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData))
        >Else
        >         ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData) + 1)
        >End If
        ソスニゑソスソスソスホ、ソスfソス[ソス^ソスソスbyteTotalDataソスzソスソスノコソスsソス[ソスナゑソスソスソスフでゑソスソス蛯、ソスソス?
        #ソスRソスsソス[ソスpソスフエソスソスソスAソスソスソスpソスモゑソスソスソス驍セソスソスソスフようソスネ気ソスソスソスソスソスワゑソスソスB
        
        > DoEventsソスソスソスソスソスソスソストゑソスソスワゑソスソスか?
        ソスヘゑソスソスAソスソスソスソスソストゑソスソスワゑソスソスB
        ソスソスソス[ソスvソスソスソスソスソスフ趣ソスソスヤゑソスソスソスソスソスソスソスソストゑソスソスワゑソスソスト、ソスソスハゑソスソスナまゑソスフで難ソスソスソストゑソスソスワゑソスソスB
        ソスソスソス黷ェソスソスソスソスソスナゑソスソス蛯、ソスソス?
        
        ソス¥ソスソスソスあゑソスワゑソスソスが具ソスソスソスソストゑソスソスソスソスソスソスソスソスB
        ソスソスしソスソスソスソスソス閧「ソスソスソスワゑソスソスB
ソスfソス[ソス^ソスヘ包ソスソスハにコソスsソス[ソスナゑソスソスヒ。
           For n = 0 To UBound(byteData)
                    byteTotalData(lngPointer) = byteData(n)
                    lngPointer = lngPointer + 1
        ソス@Next
        lngPointerソスヘ趣ソスソスフ位置ソスソスロ趣ソスソスソスソスワゑソスソスフで、ソスOソスソスソス[ソスoソスソスソスソスソスAStaticソスナ宣言ソスソスソストゑソスソスソスソスソスソスソスソスB
        
        >ソスソスソス黷ェソスソスソスソスソスナゑソスソス蛯、ソスソス?
        ソスナゑソスソスB
        MSComm_OnCommソスフ抵ソスソスソスソス轤アソスフソスソス[ソス`ソスソスソスソスソスト帰ソスIソスノ会ソスソスxソスソスソストび出ソスソスソスソスワゑソスソスフで、
        ソスXソス^ソスbソスNソスフオソス[ソスoソス[ソスtソスソスソス[ソスソスソスソスソスソスソスワゑソスソスB
        ソスiソスソスソスロは再帰ソスナはなゑソスソスフでゑソスソスソスソスj
        ソスハ擾ソスOソスソスソス轤ゥソスソスソスソスソストゑソスソス驫ソス闕橸ソスンの抵ソスソスソスDoEventsソスソスソスソスソストはゑソスソスソスソスワゑソスソスソスB
ソスソスソスソスヘボソス[ソスソスソス[ソスgソスヘどのゑソスソス轤「ソスナゑソスソスソスソスH
        ソスソスソスソスソスソスニ趣ソスソスフ回答はゑソスソスソスソスソスソスソスソスナゑソスソスヒ。
        ソスソスソス黷カソス痰ソス示ゑソスソス黷スソスRソス[ソスhソスニ殆ソスヌ難ソスソスソスソスナゑソスソスヒ。
        VB.NETソスフ場合ソスヘマソスソスソス`ソスXソスソスソスbソスhソスネので厄ソスソスヘ厄ソスソスソスソスフでゑソスソスソスソスA
        VB6ソスフ場合ソスナ趣ソスMソスfソス[ソス^ソスソスソスソスソスソスソス鼾ソスヘ、ソスCソスxソスソスソスgソスナは厄ソスソスソス
        ソス|ソス[ソスソスソスソスソスOソスナデソス[ソス^ソスソスけ趣ソスソスソスソスソスソスソスソスソスソスソスソスソスナゑソスソスヒ。
ソスソスソスxソスソス答ゑソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        
        SettingソスF19200,n,8,1
        
        ソスニゑソスソストゑソスソスワゑソスソスB
        
        ソス¥ソスソスソスあゑソスワゑソスソスが、ソス|ソス[ソスソスソスソスソスOソスフデソス[ソス^ソスソスMソスソスソスソスソスソスソスソスソスニゑソスソスネゑソスソスフで、ソスソスソスソスソスソスソス謔ュソスかソスソスワゑソスソスソスB
        #ソス^ソスCソス}ソスナイソスxソスソスソスgソスソスソスソスソスソスソス驍スソスムにデソス[ソス^ソスソスソスMソスソスソスソスホゑソスソスソスソスフでゑソスソス蛯、ソスソス?
        
        ソスソスソスソスニゑソスソスソス黷ョソス轤「ソスフボソス[ソスソスソス[ソスgソスソスソスニ、ソスソスソスフままのゑソスソスソスソスナ托ソスソスvソスナゑソスソス蛯、ソスソスソスB
1800*8=14400ソスrソスbソスgソスナゑソスソスソスソスソス19200ソス{ソス[ソスソスソスニ趣ソスMソスヘ托ソスソスソスソスPソスbソスソスソスソスソスソスワゑソスソスソスソスヒ。
        ソス|ソス[ソスソスソスソスソスOソスヘ簡単ソスナゑソスソスソスソスAソスソスソスフままでゑソス驍アソスニゑソスlソスソスソスト鯉ソスソスワゑソスソス蛯、ソスB
        ソス謔クソスヌゑソスソスナ趣ソスソスヤゑソスソスソスソスソスソスソスソストゑソスソスソスフでゑソスソス蛯、ソスソスソスH
        DoEventsソスソスヌゑソスソスノ難ソスソスソストゑソスソスワゑソスソスソスソスH
        ソスfソス[ソス^ソスフコソスsソス[ソスヘゑソスソスソスネに趣ソスソスヤゑソスソスソスソスソスソス髀茨ソスソスソスニは思ソスソスソスネゑソスソスフでゑソスソスソスソスA
        ソスソスヘゑソスRcvProc()ソスナゑソスソスソスソスH
        
        ソスソスソスソスニゑソスソスソスソスxソス示ゑソスソス黷スソスRソス[ソスhソスソスヌゑソスソスソスソスソスニ、
        Do
        Loop Until MSComm.InBufferCount = 0  
        ソスソスソスフソスソス[ソスvソスヘゑソスソスソスソスソスソスソスソスナゑソスソスヒ、ソスソスソスフソスソス[ソスvソスソスソスソスソストゑソスソスワゑソスソスト、
        byt = MSComm.Input
        ソスフ前ソスナ十ソスソスソスソスMソスソスソスoソスソスソス骼橸ソスヤの(ソス}ソスVソスソスソスXソスyソスbソスNソスノゑソスソスソスワゑソスソスソスソスA1.5ソスbソスハゑソスソスネ)
        TimerソスソスソスソスソストゑソスソスソスTimerソスフ抵ソスソスソスCallソス@RcvProc()ソスソスソスソスソスソスソス轤「ソスソスソスソスソスナゑソスソス蛯、ソスソスソスB
        1.5ソスbソスハなゑソスoソスソスソスIソスノ、ソスメてる時ソスヤでゑソスソスソスヒ。
ソス范エソス@ソスソスソスソスAソスAソスhソスoソスCソスXソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        
        >ソス謔クソスヌゑソスソスナ趣ソスソスヤゑソスソスソスソスソスソスソスソストゑソスソスソスフでゑソスソス蛯、ソスソスソスH
        >DoEventsソスソスヌゑソスソスノ難ソスソスソストゑソスソスワゑソスソスソスソスH
        
        DoEventsソスソス
        Doソス`Loop
        ソスソスノ難ソスソスソストゑソスソスワゑソスソスソス(Loopソスフ抵ソスソスO)ソスB
        ソスソスソスヤゑソスソスソスソスソスソスソスソストゑソスソスソスフゑソスAソスソスソスフ擾ソスソスソスソスソスソスソスソスフようソスナゑソスソスB
        ソスネ前ソスフ我龍ソス@ソスソスソスソスフアソスhソスoソスCソスXソスソスソスソスAソスソスソスソスDoEventsソスソスヘゑソスソスソスソストゑソスソスワゑソスソスB
        ソスソスソスソスソスソスソスソスソス鼾ソスAソスソスハゑソスソスソスソスソスソスナまゑソスソストゑソスソスワゑソスソスワゑソスソスB
        
        ソスEソスソスソスソスソストゑソスソスワゑソスソスト申ソスソスソスソスネゑソスソスフでゑソスソスソスソスAソスソスソスソスソストゑソスソスソスソスソスソスソスソスソスソスソスソスソスソスニゑソスソスソスソスソスワゑソスソスB
        >ソスソスソスフソスソス[ソスvソスヘゑソスソスソスソスソスソスソスソスナゑソスソスヒ、ソスソスソスフソスソス[ソスvソスソスソスソスソストゑソスソスワゑソスソスト、
        ソスニゑソスソスソスワゑソスソスソスソスA
        
        ソスン抵ソスソスInputLen=0ソスニゑソスソストゑソスソスト、InBufferCountソスソス1500ソスニなゑソスソスソスソスニゑソスソストゑソス
        >byt = MSComm.Input
        ソスソスLInputソスナは、1ソスoソスCソスgソスソスソスツゑソスソスソスソスソスMソスナゑソスソスワゑソスソスソスB
        ソスoソスbソスtソス@ソスノゑソスソスワゑソスソストゑソスソスソスfソス[ソス^ソスSソストゑソスソスMソスナゑソスソスソスニ思ソスソスソストゑソスソスソスソスフでゑソスソスソス
        ソスソスMソスナゑソスソスネゑソスソスソスソス゚、DOソス`Loopソスナバソスbソスtソス@ソスノゑソスソスワゑソスソストゑソスソスソスfソス[ソス^ソスソス
        ソスSソスト趣ソスMソスソスソストゑソスソスソス
        >  'ソスソスMソスソスソスソスソスoソスCソスiソスソスソスfソス[ソス^ソスソスRソス}ソスソスソスhソスニ包ソスソスソスソスソスノ包ソスソスソスソスソスソス
        >   Callソス@RcvProc()
        ソスソスLソスヨ撰ソスソスソスヌんだ包ソスソスソスソスヌゑソスソスソスソスニ思ソスソスソスAソスソスソス[ソスvソスノゑソスソストゑソスソスワゑソスソスB
        
        Inputソスナバソスbソスtソス@ソスノゑソスソスワゑソスソストゑソスソスソスSソスfソス[ソス^ソスソスソスMソスソスソスソスノはどゑソスソスソスソスソスホゑソスソスソスソスフでゑソスソス蛯、ソスソス?InputLenソスフ設定だソスソスソスナはダソスソスソスナゑソスソス蛯、ソスソスソスB
MSComm1.RThreshold = 1 ソスニゑソスソスト趣ソスMソスソスソスソスニ、Inputソスoソスbソスtソス@ソスソス1ソスoソスCソスgソスネ擾ソス
        ソスfソス[ソス^ソスソスソスソスソスンゑソスソスソスソスOnCommソスCソスxソスソスソスgソスソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスソスフ趣ソスInputLen=0ソスニゑソスソスソスbyt() = MSComm.Inputソスソスsソスソスソスニゑソスソスフ趣ソスソスソス
        ソスoソスbソスtソス@ソスノ暦ソスソスワゑソスソストゑソスソスソスfソス[ソス^ソスソスソスSソスソスbyt()ソスノ読み搾ソスソスワゑソスワゑソスソスB
        ソスソスソスMソスfソス[ソス^ソスソスソス蛯ォソスソスソス鼾ソスヘ、ソスヌみ搾ソスソスン抵ソスソスノイソスxソスソスソスgソスソスソスNソスソスソスソスラに、
        ソスソスソスソスソスソスソスfソス[ソス^ソスソスソスSソストバソスbソスtソス@ソスノ暦ソスソスワゑソスソストゑソスソスソスけソスナはなゑソスソスA
        ソスfソス[ソス^ソスソスヌみ搾ソスソスだゑソスソスニ再度OnCommソスCソスxソスソスソスgソスソスソスソスソスソスソスソスソスワゑソスソスB
        ソスツまゑソス蛯ォソスソスソスfソス[ソス^ソスフ場合ソスヘ会ソスソスかゑソスOnCommソスCソスxソスソスソスgソスフ抵ソスソスナバソスbソスtソス@ソスソス
        ソスLソスソスfソス[ソス^ソスソスヌみ搾ソスソスソスナ、ソスソスソスソス足ゑソスソスソスソスソスナ茨ソスツのデソス[ソス^ソスノゑソスソスソス
        ソスKソスvソスソスソスソスソスソスワゑソスソスB
        ソスソスソス[ソスvソスソスさゑソスソスノ托ソスソスソスソスソスソスだデソス[ソス^
        public m_data() as byte
        ソスフ最鯉ソスフ2ソスoソスCソスgソスソスソスfソス[ソス^ソスソスソスIソスソスソス}ソス[ソスNソスフ 03,04ソスナ有ソス驍ゥソスロゑソスソスソス
        ソス`ソスFソスbソスNソスソスソスワゑソスソス蛯、ソスB
ソスソスMソスfソス[ソス^ソスフ厄ソスソスソスソスノ終ソスソスソスRソス[ソスhソスソスソスツゑソスソストゑソスソスソスネゑソスソスソス竄キソスソスソスナゑソスソスヒ。
        
        ソスソス(ソスニゑソスソスソスソスルど昔ではなゑソスソスソスソスソス)ソスAソスソスソスソスソスソスソスソスソス迹暦ソスMソスvソスソスソスRソス}ソスソスソスhソス送ゑソスソスト、ソスIソスソスソスRソス[ソスhソスフ厄ソスソスソスソスソスソスソスソスソスソスソスソスナ抵ソスフ趣ソスMソスfソス[ソス^ソスソスメゑソスソストゑソスソスソスソスソスソスニゑソスソスソスソスソスワゑソスソスB
        
        ソスメゑソスソスソスソスソスソスソスヤになゑソスソストゑソスソスソス^ソスCソス}ソス[ソスCソスxソスソスソスgソスAソスソスソスソスソスト、
        MSComm.InBufferCountソスソスソスソスソスフサソスCソスYソスノなゑソスソスソスソスソスソスMソスソスソスソスソスネので、
        ソスoソスbソスtソス@ソスフ抵ソスソスノはゑソスソスフまゑソスワの趣ソスMソスfソス[ソス^ソスソスソスソスソスソスソストゑソスソスワゑソスソスソスソスB
        
        ソスソスソスフとゑソスソスヘ托ソスソスソスヘ擾ソスソスソスノデソス[ソス^ソス送ゑソスソスソスソス閧オソストゑソスソスネゑソスソスソスソスソスソスソスソスA
        ソスoソスbソスtソス@ソスTソスCソスYソスソスソスソスMソスfソス[ソス^ソスTソスCソスYソスナゑソスソスソスソスソスソス轤アソスフ抵ソスソスxソスナゑソス¥ソスソスソスナゑソスソスソスソスB
        ソスソスソスソスソスヘ、ソスAソスソスソスソスソスソスソスソスソスネゑソスソストゑソスソスソスソスフで費ソスソスノシソスソスソスvソスソスソスB ソスソス( ソスKソス[^) 
        
        ソスソスソスHソスソスソスツまでゑソスInBufferCountソスソスソスソスソスソスフサソスCソスYソスノなゑソスネゑソスソスH
        ソスソスソスソスソスAソスfソス[ソス^ソスソスソスソスソスニゑソスソスソスソスソスソスニで、ソスoソスbソスtソス@ソスソスNソスソスソスAソスソスソストソスソスgソスソスソスCソスナゑソスソスヒ。
        ソスVソスソスソスAソスソスソスハ信ソスヘデソス[ソス^ソスソスソスソスソスソスソス|ソスソスソスト・ソスEソスEソスソスソスロに起ソスソスソス驍オソスヒ。
        19200ソス{ソス[ソスネゑソスソスソスvソスソスソスニ思ソスソスソスソスソスヌ・ソスEソスE
ソスソスソスソス
        ソスソスソス閧ゥソスソスフコソス}ソスソスソスhソスソスソスソスソスソスソスソスソスソスソスソスフ会ソスソスソスソスソスソスネゑソスソスフゑソス
        ソスソスソスフコソス}ソスソスソスhソスソスソスソスソスソスソストゑソスソスト搾ソスソスソスソストゑソスソスソスニゑソスソスソスソスbソスナゑソス?
        
        
        ソス范エソス@ソスソスソスソスフ鯉ソスソスソスソスソス謔、ソスノ、1ソスoソスCソスgソスソスMソスナはなゑソス
        ソスソスソスソスソスソスxソスoソスbソスtソス@ソスソスmソスロゑソスソストイソスxソスソスソスgソスソスソスソスソスPソスハで趣ソスMソスソスソスネゑソスソスソス
        ソスソスMソスソスソスソスソスfソス[ソス^ソスフコソス}ソスソスソスhソスソスソスヘゑソスソスト托ソスソスMソスニゑソスソスソスソスソスソス黷ェ
        ソスソスソスソスソスソスソスソスソスソスソスニ思ソスソスソスワゑソス
>ソスソスソス閧ゥソスソスフコソス}ソスソスソスhソスソスソスソスソスソスソスソスソスソスソスソスフ会ソスソスソスソスソスソスネゑソスソスフゑソス
        >ソスソスソスフコソス}ソスソスソスhソスソスソスソスソスソスソストゑソスソスト搾ソスソスソスソストゑソスソスソスニゑソスソスソスソスb
        ソスソスソスAソスソスソスソスネ話ソスナゑソスソスソスソスソスソスソスソスB
        ソスソスソスソスソスワでのとゑソスソスソスA1800ソスoソスCソスgソスソスソスフ趣ソスMソスfソス[ソス^ソスソスソスソスソスソスソスソスuソスソスソス齬ャソスソスソスvソスネのゑソスソスAソスソスソスソスソスfソス[ソス^ソスネのゑソスソスヘ記ソスレゑソスソスソスソスソスソスフで不ソスソスソスナゑソスソスB
        
        ソスuソスXソス^ソスbソスNソスフ域がソスsソスソスソスソスソストゑソスソスワゑソスソスvソスニゑソスソスソスソスgソスソスソスuソスソスソスヘ、ソス范エソス@ソスソスソスワゑソスソスソスソスmソスノ会ソスソスソスソスソスソストゑソスソスワゑソスソスB
        >>>ソスハ擾ソスXソス^ソスbソスNソスIソス[ソスoソス[ソスtソスソスソス[ソスヘ出ソスワゑソスソスが、MSComm_OnComm()ソスフ抵ソスソスフどゑソスソスソス
        >>>ソスソスDoEventsソスソスソスソスソスソスソストゑソスソスワゑソスソスか?
        >>ソスヘゑソスソスAソスソスソスソスソストゑソスソスワゑソスソスB
        >>ソスソスソス黷ェソスソスソスソスソスナゑソスソス蛯、ソスソス?
        >ソスナゑソスソスB
        
        
        ソスソスソスニは、OnCommソスCソスxソスソスソスgソスソスソスソスソスソスノソスソス[ソスvソスメゑソスソスナは固まゑソスソスソスソス痰「ソスワゑソスソスヒとゑソスソスソスソスソス閧ェソスcソスソスワゑソスソスソスソスiソスソスソスソスソスソスソスソスソス黷ェソスソスソスソスソスソスソスソスソスソスDoEventsソスソス}ソスソスソスソスソスソスソスけソスナ)ソスB
        ソスソスソスソスノ対ゑソスソスト我龍ソス@ソスソスソスワは包ソスソスソスソスソスソスOnCommソスCソスxソスソスソスgソスナデソス[ソス^ソスソスAソスソスソスソスソスソスホゑソスソスソスソスソスナねーソスフとゑソスソスソスソストゑソス示ゑソスソスソスワゑソスソスソスソスB
        ソスたソスソスソスヘ、ソスソスソスソスソスソスソスネゑソスAソスソスソスソスニ単ソスソスソスネコソス[ソスhソスナ趣ソスMソスナゑソスソスワゑソスソスソスニ鯉ソスソスソスソスソスソスソスソスソスソスナゑソスソスB
        
        ソスvソスヘゑソスソスフ機ソス¥ソスノどの抵ソスソスxソスフコソスXソスgソスソスソスヤソスソスソスヤゑソスソスソスソスソス驍ゥソスニ鯉ソスソスソスソスソスソスニゑソスソスニ思ソスソスソスワゑソスソスソスソスB
        ソスワゑソスソスAソスたソスソスソスフ場合ソスヘ、ソスRソスXソスgソスソスソスソスソスソス驍スソス゚に托ソスソスソスソスAソスNソスソスソスoソスeソスBソスbソスNソスネゑソスソスニゑソスソスソス驍アソスニゑソスソスソスXソスナゑソスソスソスソスEソスEソスE
        ソスソスソスソスヘ難ソスソスノアソスNソスソスソスoソスeソスBソスbソスNソスナはなゑソスソスナゑソスソスソスソスヌ。
ソスソスソスフ茨ソスヤ擾ソスソス゚の寝ソスレゑソスソスソスソスソスソスフコソスソスソスソスソスgソスソスソスソスソスソスソスソスニ搾ソスソスソスソスソスソスソスソスソストゑソスソスワゑソスソスワゑソスソスソスソスB
        ソスソスソス{ソスソスソスwソスソスソスwソスソスソスナゑソスソスソスソスソスソスソスソスソスソスヘ良ゑソスソスQソスワゑソスソスソスソスB
        ソスソスソスソスソスソスニ撰ソスソスソスソスソスソストみまゑソスソス蛯、ソスB
        ソス謔クソスソスソスソスソスソスfソス[ソス^ソスナゑソスソスソスソスAソスソス{ソスIソスノは包ソスソスソスソスfソス[ソス^ソスナ、ソスwソスbソス_ソス[ソスニフソスbソス^ソスノ包ソスソスソスソスRソス[ソスh
        ソスナは出ソスソスソスソスソスネゑソスソスA01,02ソスソス03,04ソスソスソスtソスソスソスAソスfソス[ソス^ソスソスソスヘ不ソスソスソス1800ソスoソスCソスgソスソスソスxソスAソスソスソスxソスソス19200ソス{ソス[ソスB
        ソスソスMソスソスソス@ソスヘゑソスソスソスソスツゑソスソスLソスソスワゑソスソスソスソスAソスソスヤ簡単ソスネ包ソスソス@ソスヘ、OnCommソスCソスxソスソスソスgソスナ趣ソスMソスソスソスソス
        ソスfソス[ソス^ソス足ゑソスソスソスソスソスナデソス[ソス^ソスフ最後が03,04ソスナゑソスソスソスソスソスソスソスfソス[ソス^ソスフ包ソスソスソスソスソスsソスソスソスソスソス@ソスB
        ソスソスソスフ場合OnCommソスCソスxソスソスソスgソスフ抵ソスソスソスソス迚スソスか費ソスソスソスソスソスフで、ソスソスソスソスソスソスハゑソスソスナまるこソスニゑソス
        ソスソスソスソスソスニ思ソスソスソス驍ェソスAソスソスソスソスソスハゑソスソスナまゑソス謔、ソスネゑソスAOnCommソスCソスxソスソスソスgソスソス‾ソス゚て、
        ソス|ソス[ソスソスソスソスソスOソスナデソス[ソス^ソスソス謫セソスソスソス驍アソスニになゑソスワゑソスソスB
        ソス示ゑソスソス黷スソスRソス[ソスhソスソス
         Do
        Loop Until MSComm.InBufferCount = 0
        ソスソスOnCommソスソスソスソスoソスノゑソスソスソスソス¥ソスソスソスネので、ソスソスソスソスハゑソスソスナまゑソス竄キソスソスソスlソスノ鯉ソスソスソスソスワゑソスソスB
        
        ソスgソスMソスソス ソスソスソスソスフ提示の包ソスソス@ソスソスOnCommソスナはデソス[ソス^ソスソスソス轤クソスソスOnCommソスCソスxソスソスソスgソスソスソス
        ソスソスMソスノ十ソスソスソスネタソスCソス}ソス[ソスソスソスソスソスソストタソスCソス}ソス[ソスソスナデソス[ソス^ソスソスソスソスソスソス@ソスソスLソスソスワゑソスソスB
        ソスソスソスフ包ソスソス@ソスソスソスニ、ソスfソス[ソス^ソスフ托ソスソスソスソスソスソスン擾ソスソスソスソスニ、ソスIソスソスソスmソスFソスソスソスソスソスソスネゑソスソスネゑソスワゑソスソスB
        ソスソスソスソスソスソスfソス[ソス^ソスソスソスソスソスソスソスMソスoソスbソスtソス@ソス長ゑソスソスン定すソスソスKソスvソスソスソスLソスソスA
        MSComm1.InBufferSize=1024 *2
        ソスネどとゑソスソストゑソスソスソスソスワゑソスソスB
        ソスソスソスソスソスソスソスソスソスフ包ソスソス@ソスヘボソス[ソスソスソス[ソスgソスソス}ソスVソスソスソスXソスyソスbソスNソスAソスfソス[ソス^ソスソスソスソスソスマゑソス驍スソスムにタソスCソス}ソスソス
        ソスン抵ソスソスマゑソスソスソスKソスvソスソスソスLソスソスAソスwソスKソス@ソス¥ソスソスソスソスtソスソスソスソスソスソスKソスvソスソスソスLソス驍スソス゚、ソスソスソスソスソスソスソスソス
        ソスソスソスGソスノなるきソス轤「ソスソスソスソスソスソスワゑソスソスB
        
        ソスVソスソスソスAソスソスソスハ信ソスフデソス[ソス^ソスソスソスソスソスノ関ゑソスソストは、DOSVソスフ擾ソスソスソスソスフコソスソスソスsソスソスソス[ソス^ソス[ソスナは難ソスソスソスソスソスOソスナゑソスソスソスソスソスソスA
        ソスNソスソスソスbソスNソスフ難ソスソスソスソスソスソスソスソスフ技ソスpソスソスソスiソスiソスニ進ソスソスソスソスソスソスソスソスンのコソスソスソスsソスソスソス[ソス^ソスナは全ソスソスソスSソスzソスソス
        ソスソスソスソスネゑソスソスニ思ソスソスソスワゑソスソスB
        
        ソスfソス[ソス^ソスフ托ソスソスMソスRソス}ソスソスソスhソスノ関ゑソスソストは、DSR/DTRソスナ撰ソスソスソスノ難ソスソスしソストゑソスソスワゑソスソスソスソスA
        OnCommソスCソスxソスソスソスgソスソスナデソス[ソス^ソスフ趣ソスMソスソス(byt = MSComm.Input)ソスfソス[ソス^ソスソスソスソスソスソスソスソス
        ソスソスソスソスソスソスソスIソスソスソスソスソスネゑソスソスソスソス_ソスナ、DoEventsソスノゑソス闔滂ソスソスOnCommソスCソスxソスソスソスgソスフ奇ソスソス闕橸ソスンゑソス
        ソスソスソスツゑソスソストゑソスソスソスラ、ソスソスソスソスソスソスソスフデソス[ソス^ソスソスロ趣ソスソスソスソスソスXソス^ソスbソスNソスナオソス[ソスoソス[ソスtソスソスソス[ソスソスソスNソスソスソスワゑソスソスソスソスB
        >ソスワゑソスソスソスMソスfソス[ソス^ソスソス1800ソスoソスCソスgソスソスソスフデソス[ソス^ソスソスソスソスCソスノ暦ソスソスソストゑソスソスワゑソスソスB
        ソスヘ、1800ソスoソスCソスgソスフデソス[ソス^ソスソスソスソスソスソスソス邇滂ソスノ暦ソスソスソストゑソスソスソスニ鯉ソスソスソスソスモ厄ソスソスナはなゑソスソスA
        ソスソスソスフ托ソスソスMソスソス1800ソスoソスCソスgソスフデソス[ソス^ソスソスソスソスソスソスソスソスニ鯉ソスソスソスソスソスソスニで、ソスハに抵ソスソスソスソスソスソスソスソスニでゑソス
        ソスソスソスソスソスニ思ソスソスソスワゑソスソスB
        ソスソスヘゑソスソスソス{ソスソスヘヘソスソスソスwソスソスソスナゑソスソスB
ソスFソスlソスAソスAソスhソスoソスCソスXソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスB
        ソス范エソス@ソスソスソスが具ソスソスソスソストゑソスソスソスソスソスソスソスソスソス
        >ソスソスヤ簡単ソスネ包ソスソス@ソスヘ、OnCommソスCソスxソスソスソスgソスナ趣ソスMソスソスソスソスソスfソス[ソス^ソス足ゑソスソスソスソスソスナデソス[ソス^ソスフ最後が03,04ソスナゑソスソスソスソスソスソスソスfソス[ソス^ソスフ包ソスソスソスソスソスsソスソスソスソスソス@ソスB
        ソスソスソスソスソストみゑソスソスニゑソスソスソスAソスソスMソスソスソス驍アソスニゑソスソスナゑソスソスワゑソスソスソスソスB
        ソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスB
        
        ソス¥ソスソスソスあゑソスワゑソスソスが、ソスナ鯉ソスノひとつ具ソスソスソスソストゑソスソスソスソスソスソスソスソスB
        ソス范エソス@ソスソスソスが具ソスソスソスソストゑソスソスソスソスソスソスソスソスソスソスソスソスLソスフゑソスソスソスソスソスソスうソスニゑソスソスソスニ、ソスRソスソスソスpソスCソスソスソスGソスソスソス[ソスソスソスoソストゑソスソスワゑソスソスワゑソスソスB
        
        >public byteTotalData() as byte
        >If UBound(byteTotalData) = 0 Then
        >         'ソスPソスヤ最擾ソスソスフ擾ソスソスソス
        >         ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData))
        >Else
        >         ReDim Preserve byteTotalData(UBound(byteTotalData) + UBound(byteData) + 1)
        >End If
        
        ソスヌゑソスソスソスソスヤ茨ソスソスソストゑソスソスソスフゑソスソスソスソスソスソストゑソスソスソスソスソスソスソスソスネゑソスソスナゑソスソス蛯、ソスソスソスBソスソスしソスソスソスソスソス閧「ソスvソスソスソスワゑソスソスB
FormソスソスソスxソスソスソスiSub ソスフ外ソスjソスソス
        Dim byteTotalData() As Byte ソス@ソス@'ソスoソスCソスgソスフデソス[ソス^ソス[
        ソスニゑソスソストゑソスソスソスソスソスソスソスソスB
ソス范エソス@ソスソスソスソスAソス答ゑソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスソスソスソスAソスソスソスsソスソスソスソスソス
        >If UBound(byteTotalData) = 0 Then
        ソスフ箇擾ソスソスナ「ソスCソスソスソスfソスbソスNソスXソスソスソスLソスソスソスヘ囲にゑソスソスソスワゑソスソスソスvソスニエソスソスソス[ソスソスソスoソスワゑソスソスソスソスB
        
        ソスソスソスフゑソスソス゚、ソスソスソスソスソスソスソスソスソスソス
        dim m_byteDataSize as long
        
        ReDim Preserve m_RxData(m_byteDataSize + UBound(byteData) + 1)
        m_byteDataSize = m_byteDataSize+1(ソスソスソスソスソスフ変撰ソスソスヘ包ソスソスソスソスマ奇ソスソスソスソスソスソスソスソスソスソスソスソスソスソス0ソスノゑソスソスソス)
        ソスノゑソスソス謔、ソスソスソスニ思ソスソスソスワゑソスソスBソスソスソスネゑソスソスナゑソスソス蛯、ソスソスソスB
>ソスソスソスネゑソスソスナゑソスソス蛯、ソスソスソスB
        ソスソスソスソスソスソスノゑソスソスソスtソスbソス^ソスナデソス[ソス^ソスフ終ソスソスソスソスソスソスソスソスソスソストゑソスソスソスフゑソス
        ソスソスソスソスナ厄ソスソスネゑソスソスナゑソスソスヒ。
ソス范エソス@ソスソスソスソスAソスソスソスフ皆ソスlソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスB
        ソスワゑソスソスかソスソスネゑソスソスソスソスニゑソスソスソスソスソスソスソスソスソスソスヘゑソスしソスソスソスソスソス閧「ソスvソスソスソスワゑソスソスB
ソスソスソスAソスニゑソスソスソスソスノ会ソスソスソスソスソストゑソスだゑソスソスヌ、ソスソスソスネ補完ソス`
        
        >ソスVソスソスソスAソスソスソスハ信ソスフデソス[ソス^ソスソスソスソスソスEソスEソスEソスソスソスソスソスEソスEソスEソスSソスzソスヘゑソスソスソスネゑソスソスニ思ソスソスソスワゑソスソスB
        ソスソス[ソスEソスEソスE
        ソスQソスNソスルど前ソスAソスpソス¥ソスRソスソスソスソスソスmソスフシソスソスソスAソスソスソスハ信ソスナ包ソスソスソスソスソスソスソスソスソスソスワゑソスソスソスソスト費ソスソスノ搾ソスソスソスワゑソスソスソスソスB
        115kソス{ソス[ソスソスソスソスソスソスソスフゑソス19200ソス{ソス[ソスワで会ソスソスソスソスソスソスソスルぼ費ソスソスソスソスソスソスネゑソスソスヘなゑソスソスソスソスソスフの、ソスソスソスxソスソスソスxソスソスソスソスソスソスソスフで鯉ソスソスヌはソソスPソスbソスgソスハ信ソスノ変更ソスソスソスワゑソスソスソスソスB
        ソスvソスソスソスgソスRソスソスソスAソスiソスソスソスCソスUソスナ電ソスソスソスソスト趣ソスソスソスソストゑソスソスソスソスフでゑソスソスソスソスAソスソスソスソスソスソスソスソスソスヘゑソスソスソスソスフの包ソスソスソスソスソスソスソスソスヘ費ソスソスソスソスソスソストゑソスソス轤クソス妙ソスノ思ソスソスソストまゑソスソスソスソスB
        ソスnソスソスソスhソスVソスFソスCソスNソスソスソスソスソスソスソスソスソスソスソスフゑソスソスネにゑソスソスヨ係ソスソスソスソスソスソスソスフゑソスソスネ・ソスEソスEソスソスソス驍ゥソスH
        ソスソスソスフとゑソスソスネ降ソスAソスVソスソスソスAソスソスソスハ信ソスノはサソスソスソス`ソスFソスbソスNソスニ再托ソスソス@ソス¥ソスヘ必ソス{ソスネのゑソスソスネと擾ソスソスソスソスTソスノなゑソスワゑソスソスソスソスB
        
        
        >ソスソスソスソスソスソスソスソスソスフ包ソスソス@ソスヘボソス[ソスソスソス[ソスgソスソス}ソスVソスソスソスXソスyソスbソスNソスAソスfソス[ソス^ソスソスソスソスソスマゑソス驍スソスムにタソスCソス}ソスソス
        >ソスン抵ソスソスマゑソスソスソスKソスvソスソスソスLソスソスAソスwソスKソス@ソス¥ソスソスソスソスtソスソスソスソスソスソスKソスvソスソスソスLソス驍スソスソス
        ソスたソスソスソスフ鯉ソスソスソスソストゑソスソスソスソスフは、ソス^ソスCソス}ソス[ソスRソスソスソスgソスソスソス[ソスソスソスソスgソスソスソストのイソスソスソス^ソス[ソスoソスソスソス^ソスCソス}ソスCソスxソスソスソスgソスノゑソスソスソスMソスfソス[ソス^ソスソスソスフ監趣ソスソスナゑソスソスB
        ソスuソスナ抵ソスfソス[ソス^ソスソスソスvソスネゑソスホ、ソスソスソス゚の趣ソスソスヤにゑソスソストゑソスソスソスソスホなにゑソスlソスソスソスネゑソスソストゑソスソスソスソスソスワゑソスソスB
        ソスソスソスRソスAソスuソスツ変デソス[ソス^ソスソスソスvソスナは厄ソスノ暦ソスソスソスソスワゑソスソスソスBソスSソス‾ソスネ会ソスソスナゑソスソスB
        
        
        ソスワゑソスソスAソスXソス^ソスソスソス_ソス[ソスhソスナはなゑソスソスナゑソスソス蛯、ソスソスソスヌ。
RS-232Cソスフハソス[ソスhソスEソスFソスAソスソスソスFIFOソスフ容ソスハゑソスソス蛯ォソスソスソスハのデソス[ソス^ソス[ソスソス
        ソスソスMソスソスソスソス鼾ソスヘフソスソスソス[ソスソスソスソスヘ必ソス{ソスナゑソスソスソスヒ。
        ソスハ擾ソスFIFOソスヘ切ゑソスフ良ゑソスソスoソスCソスgソスソスソスノなゑソスソストゑソスソスソスラ、ソスIソス[ソスoソス[ソスtソスソスソス[ソスソスソスソスニ包ソスソスソスソスソスソスソスソスソスソス
        ソスfソス[ソス^ソスソスソスソスソスノなゑソス鼾ソスソスソスソスソスソスソス謔、ソスナゑソスソスB
        
        >ソスuソスナ抵ソスfソス[ソス^ソスソスソスvソスネゑソスホ、ソスソスソス゚の趣ソスソスヤにゑソスソストゑソスソスソスソスホなにゑソスlソスソスソスネゑソスソストゑソスソスソスソスソスワゑソスソスB
        ソスuソスソスソス゚の趣ソスソスヤ」ソスソスソスかソスソスホゑソスソスソスナ良ゑソスソスフでゑソスソスソス.....