同一台电脑的两个软件数据通信是采用什么方式的?基于VB怎么实现通信,用到那些函数,越具体越好....

2025-05-03 13:01:23
推荐回答(4个)
回答1:

不需要通过这口那口,脱裤子放屁
进程间通信,可以用DDE
LinkPoke 方法示例
本示例建立一个 Microsoft Excel 的 DDE 链接,将一些值放置到一个新工作单的第一行的单元里,并按照这些值画图。LinkPoke 将画图需要的值发送到 Microsoft Excel 的工作单上。要检验此示例,计算机中必须装有 Microsoft Excel 而且要在 Autoexec.bat 文件的路径中声明。将本例代码粘贴到一个带缺省名 Text1 的 TextBox 控件的窗体的声明部分,然后按 F5 键并单击该窗体。

Private Sub Form_Click ()
Dim Cmd, I, Q, Row, Z ' 声明变量。
Q = Chr(34) ' 定义引用标记。
' 创建一个含有 Microsoft Excel 宏指令的字串。
Cmd = "[ACTIVATE(" & Q &"SHEET1" & Q & ")]"
Cmd = Cmd & "[SELECT(" & Q & "R1C1:R5C2" & Q & ")]"
Cmd = Cmd & "[NEW(2,1)][ARRANGE.ALL()]"
If Text1.LinkMode = vbNone Then
Z = Shell("Excel", 4) ' 启动Microsoft Excel。
Text1.LinkTopic = "Excel|Sheet1" ' 设置连接主题。
Text1.LinkItem = "R1C1" ' 设置连接项目。
Text1.LinkMode = vbLinkManual ' 设置连接模式。
End If
For I = 1 To 5
Row = I ' 定义行号。
Text1.LinkItem = "R" & Row & "C1" ' 设置连接项目。
Text1.Text = Chr(64 + I) ' 将值放置在 Text 中。
Text1.LinkPoke ' 将值放入单元。
Text1.LinkItem = "R" & Row & "C2" ' 设置连接项目。
Text1.Text = Row ' 将值放置在 Text 中。
Text1.LinkPoke ' 将值放入单元。
Next I
Text1.LinkExecute Cmd ' 执行 Microsoft Excel 命令。
On Error Resume Next
MsgBox "LinkPoke DDE demo with Microsoft Excel finished.", 64
End
End Sub

回答2:

串行通信 比较 容易实现

可以 用 虚拟串口 ! 推荐 vspd 软件

一次生成 2 个串口,一个软件 打开 一个,就可以 数据通信

需要 vspd 软件 可以 联系 我

回答3:

rs232的串口通信,vb中用mscomm控件很容易实现!你既然会vb,就不用那么具体了!查一下mscomm的pdf资料,

回答4:

同一个机器 的俩个软件通信 当然是进程间通信了。。。