Как узнать логин юзера, под которым он работает за компьютером? - VB
Формулировка задачи:
Situacija:
Vklicaju komp
->Vvozhu login -'Vasia', password -'kuku'
->Zapuskaju programku VB
->Nachimaju na knopku v proge
->poluchaju soobshenije 'privet Vasia'
Kak eto sdelat'?
Решение задачи: «Как узнать логин юзера, под которым он работает за компьютером?»
textual
Листинг программы
Public Declare Function GetUserName Lib 'advapi32.dll' Alias 'GetUserNameA' (ByVal lpBuffer As String, nSize As Long) As Long Public Function UserName() Dim sBuffer As String sBuffer = Space(255) Call GetUserName(sBuffer, 255) UserName = Trim$(sBuffer) End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д