Hola que tal no utilizo Visual Basic desde la secu , y ahora lo estoy retomando por el trabajo.. asi que me doy de topes seguido tengo el siguiente código para saber el usuario que se ha conectado
Código:
Module Module2
Dim b As Form1
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Sub user()
'Obtener nombre de usuario
Dim sBuffer As String
Dim nSize As Long
Dim Ret As Long
Dim retun As String
sBuffer = Space(255)
nSize = Len(sBuffer)
Ret = GetUserName(sBuffer, nSize)
retun = (Left$(sBuffer, Len(sBuffer)))
b.Label1.Text = retun
End Sub
End Module
pero me marca un erro en esta línea : Ret = GetUserName(sBuffer, nSize)
error: Additional information: Object reference not set to an instance of an object.
la verdad no tengo ni idea de que pueda ser