CodeBus
www.codebus.net
Search
Sign in
Sign up
Hot Search :
Source
embeded
web
remote control
p2p
game
More...
Location :
Home
Search - vb-MSComm1
Main Category
SourceCode
Documents
Books
WEB Code
Develop Tools
Other resource
Search - vb-MSComm1 - List
[
Other resource
]
vb-MSComm1
DL : 1
安装绿色精简版vb在做串口操作会 控件 MSComm1 的类 MSCommLib.MSComm 不是一个已加载的控件类。 此为补丁
Date
: 2008-10-13
Size
: 165.71kb
User
:
得到
[
Communication
]
mscomm1
DL : 0
VC++ 和VB串并口开发技术工程应用实例导航》一书的配套源代码串口编程
Date
: 2008-10-13
Size
: 2.54kb
User
:
jmjt
[
Embeded-SCM Develop
]
zb_comm
DL : 0
vb与plc通信 vb 使用mscomm1 控件与三菱plc通信程序
Date
: 2008-10-13
Size
: 2.29kb
User
:
lbj
[
Communication
]
串口调试程序(VB)
DL : 0
Com口调试工具,里面有附有源码,如果有需要,可以作适当的改动。-Com debugging tool with a source inside, and if necessary, make appropriate changes.
Date
: 2025-07-07
Size
: 25kb
User
:
杨工
[
Software Engineering
]
vb-MSComm1
DL : 0
安装绿色精简版vb在做串口操作会 控件 MSComm1 的类 MSCommLib.MSComm 不是一个已加载的控件类。 此为补丁-Green Starter Edition installed vb serial port operation in the control to do MSComm1 class MSCommLib.MSComm is not a type of control has been loaded. This is the patch
Date
: 2025-07-07
Size
: 165kb
User
:
得到
[
Com Port
]
mscomm1
DL : 0
VC++ 和VB串并口开发技术工程应用实例导航》一书的配套源代码串口编程-VC++ And VB string parallel application development technology project navigation of a book on the source code matching the serial programming
Date
: 2025-07-07
Size
: 2kb
User
:
jmjt
[
Embeded-SCM Develop
]
zb_comm
DL : 0
vb与plc通信 vb 使用mscomm1 控件与三菱plc通信程序-vb and vb Communications plc control the use of MSComm1 communication program with Mitsubishi plc
Date
: 2025-07-07
Size
: 2kb
User
:
lbj
[
SCM
]
vb_plc
DL : 0
vb与plc通信 vb 使用mscomm1 控件与三菱plc通信程序-vb vb communicate with the plc using mscomm1 Mitsubishi plc controls and communication procedures
Date
: 2025-07-07
Size
: 2kb
User
:
wyzyyq
[
Communication
]
vb-chuankou
DL : 0
rivate Sub cmdSend_Click() Dim sj() As Byte Dim sj_Txt As String Dim i As Integer sj_Txt = "800A00113135323634389794" sj_Txt="00FFWW0D006501" & hex(deltapre*i/n+m_OldPre) & "42" Text1 = sj_Txt ReDim sj(Len(sj_Txt) / 2 - 1) For i = 0 To Len(sj_Txt) - 1 Step 2 sj(i / 2) = Val("&H" & Mid(sj_Txt, i + 1, 2)) Next MSComm1.Output = sj-rivate Sub cmdSend_Click () Dim sj () As Byte Dim sj_Txt As String Dim i As Integer sj_Txt = " 800A00113135323634389794" ' sj_Txt = " 00FFWW0D006501" & hex (deltapre* i/n+ m_OldPre) & " 42" Text1 = sj_Txt ReDim sj (Len (sj_Txt)/2- 1) For i = 0 To Len (sj_Txt)- 1 Step 2 sj (i/2) = Val (" & H" & Mid (sj_Txt, i+ 1, 2)) Next MSComm1. Output = sj
Date
: 2025-07-07
Size
: 1kb
User
:
穆
[
CSharp
]
serial-communication
DL : 0
VB实现pc与单片机串口通信任务 //利用vb实现pc与单片机串口通信任务 //编写程序代码 定义变量 Dim cnum As Integer 循环计数标志 Dim choosenum As Integer 选择指示灯号 串口初始化 在窗体的Load事件中加入下列代码对串口进行初始化 Private Sub Form_Load() MSComm1.CommPort=1 MSComm1.InputMode=1 MSComm1.RThreshold=1 MSComm1.SThreshold=1 MSComm1.Settings="4800,n,8,1" MSComm1.PortOpen=Ture choosenum=1 End Sub-VB serial communication with the microcontroller to achieve the task pc //Use pc with vb achieve single-chip serial communication tasks //Write program code Definition of variables Dim cnum As Integer loop count mark Dim choosenum As Integer Select Indicators Serial port initialization Add the following code in the form s Load event to initialize the serial port Private Sub Form_Load () MSComm1.CommPort = 1 MSComm1.InputMode = 1 MSComm1.RThreshold = 1 MSComm1.SThreshold = 1 MSComm1.Settings = "4800, n, 8,1" MSComm1.PortOpen = Ture choosenum = 1 End Sub
Date
: 2025-07-07
Size
: 2kb
User
:
朱光前
[
Windows Develop
]
vbchuankou
DL : 0
VB 串口程序描点画图,程序很小,只有几k,有VB6.0的可对源代码重新编译,运行测试图如截图示。源代码里的部分注释说明:选择com1 MSComm1.CommPort = 1 设置波特率为9.6kpbs,没有奇偶校验,8位数据位,1位结束位 MSComm1.Settings = "9600,N,8,1" 读取全部的输入缓冲区 Case comEvReceive 此处的代码可以进行当串口的接受缓冲区里有RThreshold个字符的处理-VB serial tracing point drawing program, the program is very small, only a few k, there VB6.0 can recompile the source code, run the test pattern as shown in screenshot. Part of the source code annotated: Select com1 MSComm1.CommPort = 1 Set the baud rate to 9.6kpbs, no parity, 8 data bits, 1 stop bit MSComm1.Settings = "9600, N, 8,1" Read all of the input buffer Case comEvReceive The code here can be accepted when the serial buffer has handled RThreshold characters
Date
: 2025-07-07
Size
: 2kb
User
:
wpudn16
CodeBus
is one of the largest source code repositories on the Internet!
Contact us :
1999-2046
CodeBus
All Rights Reserved.