Question

VB 如何获取用户名

在VB里如何获取用户名。。。比如我现在的用户名是Administrator 我想让他自动获得，怎么养获得。。本人是菜鸟，希望能写出全部的代码，谢谢了。

Answer 1

dim strusername as string
strusername=Environ("USERNAME")
即可获取用户名 ，存放在字符型变量strusername中

Answer 2

Private Sub Command1_Click()
dim strusername as string
strusername=Environ("USERNAME")
msgbox strusername
End Sub

Answer 3

Dim CN As String
x = GetCName(CN) '计算机名
msgbox "用户名" & CN

Answer 4

Environ("USERNAME")

Answer 5

1楼正解