VB串口的一个电子称的项目

Microsoft Comm Control 6.0中）。具体程序如下：控件简称：MSC Dim Out(12) As Byte '接收var中的值 Dim var As Variant '接收MSC.input中的数值 Dim nRece As Integer '计算MSC.inputbuffer的个数 Dim i As Integer, j As Integer '随即变量，计算循环