Dim Tx As String, Txlen As Integer, Sum As Integer
Tx="*01C"
Txlen=Len(Tx)
Sum=0
For i=1 To Txlen
Sum=Sum+Asc(Mid(Tx,i,1))
Next i
Sum=((0-Sum)And 127) Or 64
Tx=Tx+Chr(Sum)+vbCrLf
TX的值是多少，謝謝
uj5u.com熱心網友回復：
*01Cr為嘛不自己運行一下？
uj5u.com熱心網友回復：
不是*01CrCRLF嗎Tx=Tx+Chr(Sum)+vbCrLf這句后面的vbCrLf是什么意思，不是專業寫VB的
uj5u.com熱心網友回復：
不是*01CrCRLF嗎
Tx=Tx+Chr(Sum)+vbCrLf這句后面的vbCrLf是什么意思，不是專業寫VB的
uj5u.com熱心網友回復：
加上一個換行符。uj5u.com熱心網友回復：
vbCrLf是Visual Basic中的一個字串常數，即“Chr(13) & Chr(10)”（回車符與換行符連接在一起），是換行的意思uj5u.com熱心網友回復：
結果就是：
"*01Cr" + 回車 + 換行符
vbCrLf 在 VB6中是一個字串常量，是“回車符+換行符”。
Tx = Tx + Chr(Sum) + vbCrLf 這兒的加號左右的引數都是字串型別的資料，
這個時候 + 運算子的作用就是字串連接操作，跟用 & 運算子的效果相同。。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/116779.html
標籤：VB基礎類