Visual Basic - ver en vb el nombre de pc

Amigos

Necestaria ver como recupero o tomo el nombre de la PC en la que estoy ejecutando el programa - o consultando o grabando desde ya muchicimas gracisa
raul

Hechale un vistazo a las funciones del API:

GetComputerName

y

SetComputerName

Un saludo

Muchas gracias entonces saber la maquina que uso seria de la siguinte forma :

Private Declare Function GetComputerName Lib "kernel32" Alias _
"GetComputerNameA" (ByVal sBuffer As String, lSize As Long) As Long

Private Sub Mi_maquina_Click()
Dim NombPC As String
Dim P As Long
P = NameOfPC(NombPC)
Text1.Text = NombPC
End Sub

Function NameOfPC(NombMaquina As String) As Long
Dim TamañoNomb As Long
Dim X As Long
NombMaquina = Space$(16)
TamañoNomb = Len(NombMaquina)
X = GetComputerName(NombMaquina, TamañoNomb)
End Function

He contestado a tu mail.

Un saludo