Visual Basic - Nombre Estación.

Hola, saludos a todos. Que el nuevo 2004 sea pleno en desarrollos, proyectos, salud, amistad y un mundo mejor.
Mi consulta es si alguien sabe como recuperar el nombre de la estación donde se está ejecutando la aplicación. Si alguién recuerda en clipper, hay una función (NetName), que retorna el nombre de la estación. ¿En VB existe algo parecido?. Espero sus observaciones, atte.

Larry Santibáñez F.

Fijate con esto:

Private Const MAX_COMPUTERNAME_LENGTH As Long = 31

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Sub Form_Load()
Dim dwLen As Long
Dim strString As String

dwLen = MAX_COMPUTERNAME_LENGTH + 1
strString = String(dwLen, "X")

GetComputerName strString, dwLen

strString = Left(strString, dwLen)
MsgBox strString
End Sub