首先新建一個類庫項目,把你的代碼以類(需要實例)或模塊(靜態(tài))的形式封裝好,生成過后在輸出目錄(bin/debug或bin/release)里面會有個項目名.dll文件,就是它了。
成都創(chuàng)新互聯(lián)主營靖西網(wǎng)站建設的網(wǎng)絡公司,主營網(wǎng)站建設方案,app軟件開發(fā),靖西h5成都小程序開發(fā)搭建,靖西網(wǎng)站營銷推廣歡迎靖西等地區(qū)企業(yè)咨詢
在調(diào)用方項目里,右鍵解決方案資源管理器中的引用,添加引用,瀏覽到你的dll文件。接著到你的代碼中,代碼最上面寫:
Imports 項目名
然后調(diào)用這個類或模塊即可。
根據(jù)你的情況,可能用模塊封裝更適合一些。比如:
Public Module MatrixSolve
Public Function Solve(para1 As Double,para2 As Double) As Double
'一些代碼
Return result
End Function
End Module
調(diào)用起來只要這樣即可:
Dim num As Double = MatrixSolve.Solve(x,y)
注意模塊和函數(shù)的訪問級別都用Public,否則外面無法訪問。
vb自定義函數(shù)可選參數(shù)的設置方法及注意事項:
1、可選參數(shù)可用Optional關鍵字標示;
2、可選參數(shù)需賦予默認值;
3、如未賦予默認值,那么需要在函數(shù)里可以通過ismissing(b)來判斷該參數(shù)時候有值傳入?;
4、Optional參數(shù)(可選參數(shù))必須放在后面,即先必選參數(shù)再可選參數(shù)。
范例如下:
function?multi(a?as?integer,b?as?integer,optional?third)
rem?定義multi函數(shù),參數(shù)a、b為整形,參數(shù)third可可選參數(shù)
dim?n?as?integer?
n?=?a?*?b
if?not?ismissing?(third)?then??'判斷可選參數(shù)third是否有值傳入?
n?=?n?*?third
end?if
multi?=?n
end?function
private?sub?command1_click()
dim?a?as?integer,b?as?integer
dim?x?as?integer
a?=?2?:?b?=?3
x?=?multi?(a?,?b?,?2)
print?x
end?sub
在vb.net中定義staticextern函數(shù):用static聲明的局部變量。static是C++中常用的修飾符,它被用來控制變量的存貯方式和可見性。extern,C是使C++能夠調(diào)用C寫作的庫文件的一個手段。
refresh是vb的關鍵詞,你最好不要用這個名字作為你自定義函數(shù)的名字,當然,VB也允許你用Overrides關鍵詞重載這個方法。
很簡單,在end select前再多加一種情況case else return "XXXx",因為你只提供了0-9這10種情況
Public Function Zuhe(ByVal qa As String) As String
Select Case qa
Case "0"
Return "1"
Case "1"
Return "3"
Case "2"
Return "4"
Case "3"
Return "6"
Case "4"
Return "2"
Case "5"
Return "8"
Case "6"
Return "9"
Case "7"
Return "7"
Case "8"
Return "5"
Case "9"
Return "0"
Case else
Return "XXXX"
End Select
End Function