代码搜索: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