求VB高手，需要VB通过串口接收51单片机采集到的温度，并在VB上显示出来温度值，不需要曲线

仅供参考 Private Sub Form_Load() Dim i As Integer With MSComm1 If .CommPort 2 Then .CommPort = 2 '设置Com2为通信端口 .Settings = "9600,N,8,1" '设置通信端口参数 9600赫兹、无校验、8个数据位、1个停止位.（这里需要进一步说明的是：.Setting=”BBBB,P,D,S”。 '含义是：B：Baud Rate（波特率）；