高精度電壓表(24bit) VB源程序
Dim PortValue As Integer '端口號(hào)選擇1-4
Dim value As Double '當(dāng)前一次取值
Dim value2 As Double '要顯示的值
Dim valueSum As Double '和
Dim numCount As Double '算平均值是的計(jì)數(shù)個(gè)數(shù)
Dim func As Integer '功能號(hào)標(biāo)志1-4
Dim valueFlag As Integer