我有一筆資料~~要從第二個字到最後一個字都要xor,那要如何設定變數呢?
我的程式如下
GPRMC = "$GPRMC,160000,A,"
lines = Len(GPRMC)
For i = 1 To lines
a(i) = Hex(Asc(Mid(GPRMC, i, 1)))
Next i
For i = 2 To lines
sendg = sendg Xor a(i)
Next i
Print sendg' sendg為檢查碼
程式這樣寫對嗎~
文章標籤
全站熱搜
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(1) 人氣(18)