科比的纪录片:请问VB怎么做校验和

来源:百度文库 编辑:中科新闻网 时间:2024/05/02 20:25:06
Dim s(0 To 12), i%
s0 = "S"
s1 = "C"
s2 = "T"
s3 = "03"
buf = s0 + s1 + s2 + s3
ufOutByte = StrConv(buf, vbFromUnicode)
buf = MSComm1.Input
MSComm1.Output = OutByte
帮我做个校验和,我实在是不会做谢谢了