代码搜索:MsComm
找到约 6,570 项符合「MsComm」的源代码
代码结果 6,570
www.eeworm.com/read/478899/1348207
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 5625
ClientLeft = 60
www.eeworm.com/read/474188/1395378
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 8490
ClientLeft = 165
www.eeworm.com/read/221078/4835343
frm form1.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 4980
ClientLeft = 60
www.eeworm.com/read/221078/4835383
frm 串列輸出位元實驗.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 2490
ClientLeft = 60
www.eeworm.com/read/200379/5066040
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
www.eeworm.com/read/200379/5066521
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
www.eeworm.com/read/200379/5066549
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
www.eeworm.com/read/163726/5509414
frm 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
www.eeworm.com/read/163726/5509423
frm 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
www.eeworm.com/read/163726/5509431
frm mainform.frm
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Form1
Caption = "电脑端"
ClientHeight = 4020
ClientLeft = 45
Cl