两个vb程序如何联系？

有两个vb程序：1.exe 和 2.exe
在1.exe的form1中有一个控件timer1
timer1.interval=1000
在2.exe的form1中有一个控件command1
现在要通过command1_click使得timer1.interval=500
请问command1的代码怎么写？
谢谢啦~

实现这个功能很简单的啊，在2.exe中：

private sub command1_click()

open "c:\Msg.dat" for output as freefile()

print #1, "500"

close

end sub

然后在1.exe种添加一个TIMER控件TIMER2

timer2.interval=1

private sub timer2_timer()

open "c:\msg.dat" for input as #1

line input #1, a

timer1.inteval=val(a)

end sub
怎么样，简单吧。这是VB6.0中使得多个运行在同一个计算机上的EXE服务器和多线程进程间进行同步的最简单最常用的一种方法了，呵呵。

有两种方法：　一、用2.exe把数字写进注册表里，然后1.exe读取注册表的值，再用这个值设置timer1．注册表的操作　函数GetSetting(appname, section, key[, default]): 检索注册表设置值。　 语句SaveSetting appname，section，key，: 保存或创建注册表设置值。 　函数GetAllSettings(appname, section): 返回一个包含多项注册表设置值的数组。 　语句DeleteSetting appname, section[, key]: 删除注册表设置值。 　二、用winsork控件，连接交换数据

Private Sub Command1_Click() Form2.Timer1.Interval = 500 End Sub

如果已经生成为程序了，那这个应该无法用VB做到、

如果还在编程阶段

可以看看这段代码

工程1的代码

Private Sub Command1_Click() Unload Me ‘关掉我 form2.Show ’开启工程2 End Sub

工程2

Private Sub Form_Load() timer1.Interval = 500 End Sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息