Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Jeff Henrique

User do Windows 2000

Recommended Posts

da para fazer isso sem usar API do windows

 

só usar a variavel de ambiente

 

MsgBox Environ("USERNAME")

 

para conhecer todas variaveis faça assim:

 

  Dim EnvString As String
 Dim Indx As Byte
 Indx = 1
 Do
MsgBox Indx & " - " & EnvString
EnvString = Environ(Indx)
Indx = Indx + 1
 Loop Until EnvString = ""

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.