溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶(hù)服務(wù)條款》

VB.NET怎么調(diào)用Window API

發(fā)布時(shí)間:2021-12-01 16:00:24 來(lái)源:億速云 閱讀:252 作者:小新 欄目:編程語(yǔ)言

這篇文章主要介紹了VB.NET怎么調(diào)用Window API,具有一定借鑒價(jià)值,感興趣的朋友可以參考下,希望大家閱讀完這篇文章之后大有收獲,下面讓小編帶著大家一起了解一下。

VB.NET調(diào)用Window API的方法與 VB6中類(lèi)似,也是必須使用Declare語(yǔ)句聲明動(dòng)態(tài)連接庫(kù)(DLL)中外部程序的引用。下面做一個(gè)調(diào)用的實(shí)例, 調(diào)用 advapi32.dll中的 GetUserName 函數(shù) 來(lái)獲得 系統(tǒng)登錄的用戶(hù)名 。

  1. Imports System  

  2. Imports System.Text  

  3. Imports Microsoft.VisualBasic  

  4.  

  5. Public Class Form3Class Form3  

  6. Declare Function GetUsername()Function GetUsername Lib "advapi32.dll" Alias _  

  7. "GetUserNameA" (ByVal lpbuffer As String, ByRef nSize As Integer) _  

  8. As Integer  

  9.  

  10. Private Sub Button3_Click()Sub Button3_Click(ByVal sender As System.Object, 
    ByVal e As System.EventArgs) Handles Button3.Click  

  11. Dim RV As Integer  

  12. Dim UserName As String  

  13. Dim Buffer As String  

  14. Buffer = New String(CChar(" "), 25)  

  15. RV = GetUsername(Buffer, 25)  

  16. UserName = Microsoft.VisualBasic.Left(Buffer, InStr(Buffer, Chr(0)) - 1)  

  17. MsgBox(UserName)  

  18. End Sub  

  19. End Class  

當(dāng)然,DotNet FrameWork 2.0已經(jīng)提供了豐富的類(lèi)庫(kù)。我們可以不必VB.NET調(diào)用Window API就可以得到基本上所有的功能,尤其是當(dāng) 微軟 的 操作系統(tǒng)也已經(jīng) 架設(shè) 在 .net FrameWork 上之后。

感謝你能夠認(rèn)真閱讀完這篇文章,希望小編分享的“VB.NET怎么調(diào)用Window API”這篇文章對(duì)大家有幫助,同時(shí)也希望大家多多支持億速云,關(guān)注億速云行業(yè)資訊頻道,更多相關(guān)知識(shí)等著你來(lái)學(xué)習(xí)!

向AI問(wèn)一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI