VB 結(jié)合 Python

你好，給你幾個(gè)地址，你自己去看看！~~￥……我想應(yīng)該對(duì)你有幫助的。

創(chuàng)新互聯(lián)建站是一家集網(wǎng)站建設(shè),南岳企業(yè)網(wǎng)站建設(shè),南岳品牌網(wǎng)站建設(shè),網(wǎng)站定制,南岳網(wǎng)站建設(shè)報(bào)價(jià),網(wǎng)絡(luò)營(yíng)銷,網(wǎng)絡(luò)優(yōu)化,南岳網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競(jìng)爭(zhēng)力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時(shí)我們時(shí)刻保持專業(yè)、時(shí)尚、前沿，時(shí)刻以成就客戶成長(zhǎng)自我，堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。

怎樣將VB與python結(jié)合在一起

#需要先安裝pipywin32模塊

class PythonUtilities:

_public_methods_=['SplitString']

_reg_progid_='PythonDemos.Utilities'

# 使用"print (pythoncom.CreateGuid())" 得到一個(gè)自己的clsid，不要用下面這個(gè)??！

_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的相關(guān)代碼：

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混合編程

vb跟python之間沒(méi)有一個(gè)可交互的橋梁，所以是不能實(shí)現(xiàn)混合編程的。不過(guò)VS2019已經(jīng)完美支持python，也許Python跟VB.net混合編程會(huì)成為可能。

python中有沒(méi)有vb中shell類似調(diào)用外部程序函數(shù)

vb中調(diào)用SHELL用法

一. 調(diào)用系統(tǒng)“創(chuàng)建快捷方式”向?qū)?/p>

是否為VB不支持創(chuàng)建快捷方式而于著急呢？雖然 您可以調(diào)用vb5stkit．Dll中的fCreateShellLink函 數(shù)，但它是為安裝程序設(shè)計(jì)的，快捷方式的默認(rèn)路徑 總是從當(dāng)前用戶的“＼Start Menu＼Programs”開始，也 就是說(shuō)，如果您的Windows95裝在C盤上，您無(wú)法通過(guò) fCreateShellLink函數(shù)把快捷方式創(chuàng)建到D盤上去。

現(xiàn)在，給大家介紹一種極為方便、巧妙的方法： 用Shell語(yǔ)句調(diào)用系統(tǒng)“創(chuàng)建快捷方式”向?qū)А?/p>

新建一個(gè)項(xiàng)目，在窗體上放一個(gè)按鈕，雙擊此按 鈕，加入以下代碼：

Private Sub Command1_Click()

Open App.Path ＆ "\temp.lnk" For Output As #1

Close #1 '以上兩句在程序所在目錄建立一 個(gè)臨時(shí)文件

Shell "Rundll32.exe AppWiz.Cpl，NewLinkHere

"＆ App.Path ＆ "\temp.lnk"

End Sub

VB和python之間如何傳遞參數(shù)

使用命令行參數(shù)

文件test.py

import?sys

print?"腳本名：",?sys.argv[0]

VB中設(shè)置為從Sub Main啟動(dòng)（而不是Form1）

Sub?main()

MsgBox?Command$

End?Sub

編譯為vb.exe

python給vb傳參數(shù)

os.system("vb.exe?123")

vb給python傳參數(shù)

Shell?"python.exe?test.py?-q"