代码搜索:MsComm
找到约 6,570 项符合「MsComm」的源代码
代码结果 6,570
www.eeworm.com/read/163726/5509527
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3855
ClientLeft = 2250
www.eeworm.com/read/163726/5509550
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 4455
ClientLeft = 60
www.eeworm.com/read/163726/5509559
frm mainform.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 6030
ClientLeft = 2565
www.eeworm.com/read/163726/5509565
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 5595
ClientLeft = 60
www.eeworm.com/read/163726/5509568
frm mainform.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 6030
ClientLeft = 2565
www.eeworm.com/read/334463/3367945
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 4230
ClientLeft = 60
www.eeworm.com/read/334451/3368393
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 4230
ClientLeft = 60
www.eeworm.com/read/279750/4134241
frm frm_analyse_bas_niveau.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form frm_Analyse_Bas_Niveau
BorderStyle = 1 'Fixed Single
Caption = "Interface
www.eeworm.com/read/427426/1972032
frm pc&plc.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form PLCForm
Caption = "PC机与PLC串口通信"
ClientHeight = 2985
ClientLeft =
www.eeworm.com/read/412027/2178034
bas module1.bas
Attribute VB_Name = "Module1"
Rem 串行口初始化
Public Sub SCIinit(Msc1 As MSComm, ByVal COMx As Byte, ByVal SCIFormat As String)
If Msc1.PortOpen = True Then
Ms1.PortOpen = False
End If