VB
串口通讯实例
作者
:
佚名 来源
:
不详 录入
:Admin
更新时间：
2008-7-27 14:00:02
点击数：
3
【字体：
】
VB
串口通讯实例
作者：
liwenzhao
高精度电压表
(24bit) VB
源程序
Dim PortValue As Integer '
端口号选择
1-4
Dim value As Double '
当前一次取值
Dim value2 As Double '
要显示的值
Dim valueSum As Double '
和
Dim numCount As Double '
算平均值是的计数个数
Dim func As Integer '
功能号标志
1-4
Dim valueFlag As Integer
Private Sub Check1_Click()
'
自动刷新 被选中则 刷新按钮无效
If Check1.value Then
Command1.Enabled = False
Else
Command1.Enabled = True
Command1.SetFocus
End If
End Sub
Private Sub Command1_Click()
'
显示
Call display
End Sub
剩余7页未读，继续阅读
资源评论
hongmofang20112011-12-06我感觉此程序是基本的串口常识介绍，实用性不强，可以作为入门级学习使用。
