日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
VB.NETDllimport特性內(nèi)容概述

VB.NET的出現(xiàn),為我們帶來了很多新穎的特性。在很大程度上增加了開發(fā)人員的編程效率。在這里我們就一起來體驗它的一些特性優(yōu)點。我們可以使用Declare語句調(diào)用外部DLL中的過程。但VB.NET給我們提供了另外一種更加先進的----- VB.NET Dllimport特性。

如:

 
 
 
  1. Imports System.Runtime.
    InteropServices  
  2. < DllImport("user32")> _  
  3. Function Findwindow(ByVal 
    lpClassName As String, ByVal 
    lpWindowName As String) As Integer  
  4. End Function  
  5. < DllImport("user32")> _  
  6. Function MoveWindow(ByVal hWnd
     As String, ByVal x As Integer, 
    ByVal y As Integer, ByVal nWidth 
    As Integer, ByVal nHeight As 
    Integer, ByVal bRepaint As Integer) 
    As Integer  
  7. End Function  
  8. Sub Test()  
  9. Dim hWnd As Integer = Findwindow
    (Nothing, "Untitled-Nodepad")  
  10. If hWnd < > 0 Then MoveWindow
    (hWnd, 0, 0, 600, 300, 1)  
  11. End Sub 

這樣就可以不任何代碼實現(xiàn)便可以調(diào)用外部的Dll,即使我們改變方法名為FindwindowA,也可以順利的實現(xiàn)調(diào)用,因為使用Dllimport特性編譯器可以自動追蹤實際的過程以及方法!#t#

另外,VB.NET Dllimport特性支持幾種可選的參數(shù),來精確定義調(diào)用外部過程的方式,以及外部過程的返回值方式.

CharSet 參數(shù):用于說明字符串傳遞給外部過程的方式,可以是CharSet.Ansi(默認(rèn)),CharSet.Unicode.CharSet.Auto.

ExactSpelling參數(shù):用于指定方法名是否和DLL中的名稱完全一致,默認(rèn)值為True.

EntryPoint參數(shù):用于指定DLL中的實際函數(shù)名稱.

CallingConvention參數(shù):為入口點指定調(diào)用的約定,值有WinApi(默認(rèn)值),CDecl,FastCallStdCall和ThisCall.

SetLastError參數(shù):判斷被調(diào)用函數(shù)是否設(shè)置了最近一次Win32錯誤代碼,如果設(shè)置為True則可以通過Err.LastDllError方法或Marshal.GetLastWin32Error方法讀取這些代碼.

PreServeSig參數(shù):為一個Boolean值,如果為True ,則將告訴編譯器,方法不應(yīng)被轉(zhuǎn)換為一個返回HRESULT值函數(shù).

下面使用VB.NET Dllimport特性來調(diào)用myFunction.dll中的名為friend(friend為VB保留名稱)的方法.Dllimport特性帶有Unicode字符串,并影響Win32錯誤代碼:

 
 
 
  1. < DllImport("myFunction.dll", 
    EntryPoint:="Friend", CharSet
    CharSet:=CharSet.Unicode, 
    SetLastError:=True)> _  
  2. Function MakeFriends(ByVal sl 
    As String, ByVal s2 As String) 
    As Integer  
  3. End Function 

網(wǎng)站欄目:VB.NETDllimport特性內(nèi)容概述
當(dāng)前URL:http://m.5511xx.com/article/ccccopg.html