请大神帮忙看一下程序什么意思，谢谢 - vb6.0吧

level 1

惠泽中华楼主

mscomm1.output="#011"&chr$(13)
do
doevent
buffer$=buffer$&mscomm1.input
loop until instr(buffer$,vbcr)
text2.text=mid$(buffer$,2)
buffer$=""
z2=val(text2.text)+273.15
td(x)=z2

2016年05月24日 12点05分 1