Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Неизвестно -

Visual Basic .NET - Система

Все примеры / Система

Как получить имя пользователя? (с использованием API)

Автор: Неизвестно | добавлено: 05.03.2010, 20:03 | просмотров: 1499 (1+) | комментариев: 0 | рейтинг: *x0
Пример получения имени текущего пользователя в системе при помощи API-функции - GetUserName.

Код

Declare Function GetUserName Lib "advapi32.dll" Alias _
     "GetUserNameA" (ByVal lpBuffer As String, _
     ByRef nSize As Integer) As Integer

 Public Function GetUserName() As String
  Dim iReturn As Integer
  Dim userName As String
  userName = New String(CChar(" "), 50)
  iReturn = GetUserName(userName, 50)
  GetUserName = userName.Substring(0, userName.IndexOf(Chr(0)))
 End Function

 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  MsgBox(GetUserName())
 End Sub
Об авторе

Неизвестно

Нет информации об авторе...
Неизвестно
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики