El Microsoft Visual Basic 6 ( VB6 ) lenguaje de programación le permite leer el valor de una tecla disponible en el registro de Windows. Utilice los controles de formulario VB6 y la interfaz de programación de aplicaciones de Windows para recuperar datos de sistemas solicitados, tales como el nombre del equipo . Mediante la lectura de la ruta de la carpeta y el nombre del equipo en el GetValue y los controles de VB6 ValueName en el formulario Web , puede especificar un nombre de equipo desde el registro de Windows para el procesamiento de una aplicación de usuario . Instrucciones
1
clic en "Inicio" y haga clic en " Microsoft Visual Basic 6. "
2 Haga clic en " Archivo", seleccione "Open ", a continuación, haga doble clic en el archivo de Visual Basic en la que desea agregar la función de recuperar el nombre del equipo desde el registro de Windows
3
Añada el siguiente código al principio de su programa: .
< p> Private función declare GetComputerName Lib " kernel32 " Alias
" GetComputerNameA " ( ByVal lpBuffer As String , nSize As Long ) As
largo
Función ComputerName () As String
strComputerName As String Dim
lngSize Dim As Long Dim
lngRetval As Long
strComputerName = espacio ( 255 )
lngSize = 255
lngRetval = GetComputerName ( strComputerName , lngSize )
ComputerName = MID $ ( strComputerName , 1 , lngSize )
End Function
4
Haga clic en " archivo", seleccione " Guardar " y, a continuación, haga clic en " OK" para agregar la función de recuperación de un nombre de equipo para el programa.