学习VB.NET时,你可能会遇到VB.NET调用Window API问题,这里将介绍VB.NET调用Window API问题的解决方法,在这里拿出来和大家分享一下。
VB.NET调用Window API的方法与 VB6中类似,也是必须使用Declare语句声明动态连接库(DLL)中外部程序的引用。下面做一个调用的实例, 调用 advapi32.dll中的 GetUserName 函数 来获得 系统登录的用户名 。
Imports System
Imports System.Text
Imports Microsoft.VisualBasic
Public Class Form3Class Form3
Declare Function GetUsername()Function GetUsername Lib "advapi32.dll" Alias _
"GetUserNameA" (ByVal lpbuffer As String, ByRef nSize As Integer) _
As Integer
Private Sub Button3_Click()Sub Button3_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles Button3.Click
Dim RV As Integer
Dim UserName As String
Dim Buffer As String
Buffer = New String(CChar(" "), 25)
RV = GetUsername(Buffer, 25)
UserName = Microsoft.VisualBasic.Left(Buffer, InStr(Buffer, Chr(0)) - 1)
MsgBox(UserName)
End Sub
End Class
- 1.
- 2.
- 3.
- 4.
- 5.
- 6.
- 7.
- 8.
- 9.
- 10.
- 11.
- 12.
- 13.
- 14.
- 15.
- 16.
- 17.
- 18.
- 19.
- 20.
当然,DotNet FrameWork 2.0已经提供了丰富的类库。我们可以不必VB.NET调用Window API就可以得到基本上所有的功能,尤其是当 微软 的 操作系统也已经 架设 在 .net FrameWork 上之后。
【编辑推荐】