Rs232串口通信专题范例,Vusual Basic,Mscomm,PCOMMPRO
源代码在线查看: form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 5310
ClientLeft = 60
ClientTop = 345
ClientWidth = 7785
LinkTopic = "Form1"
ScaleHeight = 5310
ScaleWidth = 7785
StartUpPosition = 3 '窗口缺省
Begin VB.Frame Frame2
Caption = "匡拒狠翴家Α"
BeginProperty Font
Name = "Arial Unicode MS"
Size = 12
Charset = 136
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 855
Left = 720
TabIndex = 10
Top = 1080
Width = 3255
Begin VB.OptionButton optMode
Caption = "莱氮狠"
BeginProperty Font
Name = "Arial Unicode MS"
Size = 12
Charset = 136
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 252
Index = 0
Left = 360
TabIndex = 12
Top = 360
Width = 1095
End
Begin VB.OptionButton optMode
Caption = "挤