189 8069 5689
你好，给你几个地址，你自己去看看！~~￥……我想应该对你有帮助的。
创新互联建站是一家集网站建设,南岳企业网站建设,南岳品牌网站建设,网站定制,南岳网站建设报价,网络营销,网络优化,南岳网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
#需要先安装pipywin32模块
class PythonUtilities:
_public_methods_=['SplitString']
_reg_progid_='PythonDemos.Utilities'
# 使用"print (pythoncom.CreateGuid())" 得到一个自己的clsid，不要用下面这个！！
_reg_clsid_='{5FCAC95E-653A-484C-8568-A02D5E0256E8}'
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)
下面是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
完成后在cmd中使用（py_name是上面python文件的名称）
python py_name.py --unregister
vb跟python之间没有一个可交互的桥梁，所以是不能实现混合编程的。不过VS2019已经完美支持python，也许Python跟VB.net混合编程会成为可能。
vb中调用SHELL用法
一. 调用系统“创建快捷方式”向导
是否为VB不支持创建快捷方式而于着急呢？虽然 您可以调用vb5stkit．Dll中的fCreateShellLink函 数，但它是为安装程序设计的，快捷方式的默认路径 总是从当前用户的“＼Start Menu＼Programs”开始，也 就是说，如果您的Windows95装在C盘上，您无法通过 fCreateShellLink函数把快捷方式创建到D盘上去。
现在，给大家介绍一种极为方便、巧妙的方法： 用Shell语句调用系统“创建快捷方式”向导。
新建一个项目，在窗体上放一个按钮，双击此按 钮，加入以下代码：
Private Sub Command1_Click()
Open App.Path ＆ "\temp.lnk" For Output As #1
Close #1 '以上两句在程序所在目录建立一 个临时文件
Shell "Rundll32.exe AppWiz.Cpl，NewLinkHere
"＆ App.Path ＆ "\temp.lnk"
End Sub
使用命令行参数
文件test.py
import sys
print "脚本名：", sys.argv[0]
VB中设置为从Sub Main启动（而不是Form1）
Sub main()
MsgBox Command$
End Sub
编译为vb.exe
python给vb传参数
os.system("vb.exe 123")
vb给python传参数
Shell "python.exe test.py -q"