اطلاع از نام کاربری (UserName) در ویندوز

[www.pc3enter.tk]

سلام
من می خواستم بدانم چه گونه می توان از اکانتی در حال اجرا در ویندوز است مثل(farshad) روی وی بی 6 نشان دهد
یعنی اسم اکنتی که با ان وارد شدم نشان دهد
با تشکر.:متفکر:

[l4tr0d3ctism]

سلام
من می خواستم بدانم چه گونه می توان از اکانتی در حال اجرا در ویندوز است مثل(farshad) روی وی بی 6 نشان دهد
یعنی اسم اکنتی که با ان وارد شدم نشان دهد
با تشکر.:متفکر:



برای اینکار از api زیر استفاده کن


Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long




Private Sub Form_Load()

Dim username As String * 100
GetUserName username, 100
text1.Text = username
End Sub

[xxxxx_xxxxx]

MsgBox Environ("UserName")