Python的方便不用说,VB6做GUI的简单程度更不用说。二者混合编程的需求一直非常旺盛,但我苦苦搜寻了很久,始终未找到合适的解决方案。
在很长一段时间内,我都是通过创建、读取、删除临时文件来在VB程序和Python程序间传递信息,麻烦,且低级。(如下)
比如下面是一个典型的处理流程
1. VB创建需要处理的文本please.txt,并调用Python
2. Python读取、处理文本,并将处理后的文本保存为ok.txt
3. VB在执行上面语句后进入死循环,等待ok.txt生成,完成后读取,继续流程
诸位请看,是不是非常符合麻烦、低级的描述?但没有更好的解决方案,只有如此。
—-激动人心的分界线—–
后来发现了一本书(python programming on win32,有兴趣的找来看),终于让我发现了解决方法。COM组件!
COM is a technology from Microsoft that allows objects to communicate without the need for either object to know any details about the other, even the language it’s implemented in.
看看本书某章节的总结:
We have seen examples of the various data types that can be passed back and forth between the two languages: numbers, strings, and arrays. The ability to pass multidimensional arrays allows you to move large amounts of data between the two languages without writing a lot of conversion code.
也不用说很多,不想看书的,看看下面这个我从书中摘抄的简短例子,就能知道该方法的核心之处。
在python里:
#需要先安装pipywin32模块
import pythoncom
class PythonUtilities:
_public_methods_=['SplitString']
_reg_progid_='PythonDemos.Utilities'
_reg_clsid_=pythoncom.CreateGuid()
def SplitString(self, val, item=None):
import string
if item !=None:
item=str(item)
val=str(val)
return val.split(item)
if __name__=='__main__':
print ('Registering COM server...')
import win32com.server.register
win32com.server.register.UseCommandLine(PythonUtilities)
以管理员身份执行上述代码。在注册成功后,COM组件会一直保留,不受开关机影响,因此可以在任意时候进行调用。最妙的是,你可以随时更新代码的函数部分,而无需重新注册,因此通常情况下,你只需要在注册时使用管理员权限。
在VB里:
Private Sub Form_Load()
Set PythonUtils = CreateObject("PythonDemos.Utilities")
response = PythonUtils.SplitString("Hello from VB")
For Each Item In response
MsgBox Item
Next
End Sub
上面说COM组件会一直保留,如果需要注销,可使用管理员权限执行命令行语句(py_name是上面python文件的名称)。
> python py_name.py --unregister
多余的不用说了,一试便知,这点代码足以解决诸多混合编程的难题。
该方法不仅适用于VB+Python,Office,Delphi,C++等等,均可使用。
注:针对评论说的python版本,上述案例使用的是64位python+vb6,没有问题。实测VBA同样可以。
我使用的Python版本