Visual C++??д??VB.Net?????DLL
???????????? ???????[ 2015/7/9 11:15:03 ] ???????????????
????5.????????????飬??????Mydll1.map????????????????????dll????????????????????
?????????????????????????????????????????????????ε????????????????????????????ū???????????
????6.??MyDll1.def?????????????
????LIBRARY
????EXPORTS
????Add = ?Add@@YGHHH@Z
????ShuChu = ?ShuChu@@YGXXZ
????7.??α?????????Ρ?
???????????????????VB.Net?????Mydll1.DLL?????????????????????????VB.Net????μ? inDebug ???????
????8. VB.Net????????????????£????幦?ò???????????
Private Declare Function Add Lib "MyDll1.dll" (ByVal a As Integer?? ByVal b As Integer) As Integer
Private Declare Sub ShuChu Lib "MyDll1.dll" ()
Sub Main()
Dim a1 As Integer
Dim S1 As DateTime?? S2 As DateTime
Dim T1 As TimeSpan?? T2 As TimeSpan
Dim i As Long = 1
Dim ulNum As Long = 50000
'============= ???ò?????????????? ===========================
S1 = Now
ShuChu()
S2 = Now
T1 = S2.Subtract(S1).Duration
'============= ??VB?????????ú???????????? ====================
S1 = Now
While (ulNum <> 0)
Console.WriteLine("The ulNum is:" & Str(i))
ulNum -= 1
i += 1
End While
S2 = Now
T2 = S2.Subtract(S1).Duration
Console.WriteLine(T1.TotalSeconds.ToString)
Console.WriteLine(T2.TotalSeconds.ToString)
'============== ????DLL ???Add????===========================
a1 = Add(21?? 34)
Console.WriteLine(a1.ToString)
Console.ReadLine()
End Sub
????9.???VB.Net???????/????/???CPU ?x86
????10.???????г????
??????????VB.Net????????н????????????????C++??????????Ч???????????VB.Net???????????????Ч??????????????
??????
???·???
??????????????????
2023/3/23 14:23:39???д?ò??????????
2023/3/22 16:17:39????????????????????Щ??
2022/6/14 16:14:27??????????????????????????
2021/10/18 15:37:44???????????????
2021/9/17 15:19:29???·???????·
2021/9/14 15:42:25?????????????
2021/5/28 17:25:47??????APP??????????
2021/5/8 17:01:11