Cómo utilizar las funciones de VB para acceder al registro del sistema
Hay cuatro funciones de registro (comandos) en VB5.0 * * * Son SaveSetting, GetSetting, GetAllSettings y DeleteSetting. El siguiente es el uso detallado de las cuatro funciones: 1? Guarde la configuración nombre de la aplicación, sección, clave, establezca nombre de la aplicación el nombre de la aplicación o proyecto.
Parte del nombre del área de registro que guarda la configuración de la clave de registro.
Clave es el nombre de la clave de registro que se va a modificar.
Establezca el valor de configuración de la clave.
La función de SaveSetting es asignar valores a las claves de registro en el área de la aplicación especificada en el registro. Si el nombre de la aplicación, el nombre de la zona o la clave de registro especificados no existen, se crearán primero y luego se asignarán. Puede utilizar este comando para crear una clave de registro o modificar el valor de una clave de registro. Por ejemplo, la función de guardar y configurar los comandos myapp, option, MyValue y 1 es asignar el valor de la entrada MyValue en el área de opciones del programa TestApp a 1. Si myvalue no existe, cree la entrada primero y luego asígnelo a 1. 2? Obtener configuración (nombre de la aplicación, sección, clave [, predeterminado]) El nombre de la aplicación o proyecto.
Nombre del área de sección
Nombre de la clave de registro
El valor predeterminado de la clave predeterminada es un parámetro opcional.
La función de GetSetting es devolver el valor de configuración de la clave de registro del área especificada por la aplicación en el registro. Si algún parámetro de GetSetting no existe en el registro, o la clave no está asignada (es decir, = " "), se devuelve el valor especificado predeterminado. Por ejemplo, el código value = get settings("myapp", "Option" y "MyValue") puede obtener el valor de la entrada myvalue en el área de opciones del programa TestApp. 3? Getallsettings (nombre de la aplicación, sección) nombre de la aplicación El nombre de la aplicación o proyecto.
Nombre del área de la sección
La función GetAllSettings devuelve datos variantes, cuyo contenido es una matriz de cadenas bidimensional que contiene todas las configuraciones de claves de registro y sus valores correspondientes en el área especificada. Si el nombre de la aplicación o la sección especificada no existe, se devuelve una variable no inicializada. Por ejemplo, el comando MySettings = get all settings("myapp", "Option") puede obtener los nombres y valores de todas las claves de registro bajo esta opción y guardar los resultados en los datos variables de my settings. 4. Elimine la configuración nombreaplicación [, sección [, clave]] nombreaplicación El nombre de la aplicación o proyecto.
Parte del nombre del área donde se van a eliminar las configuraciones de la clave de registro. Parámetros opcionales.
La clave de registro que se va a eliminar, parámetro opcional.
El comando DeleteSetting elimina información de aplicaciones, áreas o claves de registro en el registro. Cuando solo se proporciona el parámetro nombre de aplicación, se eliminará toda la información sobre la aplicación especificada por nombre de aplicación; si se proporcionan los parámetros de nombre de aplicación y sección, se eliminará el área especificada por sección; si se proporcionan todos los parámetros, se eliminarán las configuraciones de clave de registro especificadas; eliminado. DeleteSetting no hará nada si la aplicación, zona o clave de registro especificada no existe.
Por ejemplo, eliminar la configuración "MyApp" eliminará toda la información guardada por la aplicación MyApp. 2. Ejemplo de programa
Aquí hay un ejemplo sencillo para ilustrar el uso de estas cuatro funciones.
Para un proyecto nuevo, coloque dos etiquetas en Form1, con los atributos de título como "Nombre" y "Empresa" dos cuadros de texto, txtName y txtCompany, con el atributo Texto establecido en nulo y tres botones de comando; respectivamente son cmdSave, cmdFind y cmdDelete, con los títulos configurados en Guardar, Ver y Eliminar respectivamente. El diseño del formulario se muestra en la Figura 1. Agregue el siguiente código a los tres botones de comando:
Private Sub cmdSave_Click()
Asigne el contenido de los dos cuadros de texto al nombre y la empresa, guárdelos en el área de usuario en myapp Set myapp, usuario, nombre, txtname guardar configuración MyApp, usuario, empresa y txt empresa msgbox. ¡Tu información ha sido guardada exitosamente! ″
Conector final
Private Sub cmdFind_Click()
Busque el nombre y la configuración de la empresa en el área de usuario en MyApp y muestre el cuadro de mensaje Su nombre es:&. getsetting ("miaplicación", "usuario", "nombre")& chr(13)& chr(10)& "Su empresa es:" & getsetting(.
Private Sub cmdDelete_Click()
Elimine el área de usuario en myapp y todas las claves de registro que contiene, como eliminar las configuraciones "MyApp" y "Usuario" final.
Ejecute el programa e ingrese el nombre en la ventana del gráfico. y el nombre de la empresa, luego presione el botón Guardar y luego presione Buscar. Puede ver que se muestran los resultados correctos (Figura 2), lo que indica que las operaciones de guardar y buscar se han realizado normalmente si presiona el botón "Buscar" antes de guardar o. después de eliminar, aparecerá el cuadro de diálogo en la Figura 3, indicando que la clave de registro que está buscando no existe. Usando las cuatro funciones (comandos) presentadas anteriormente, podemos acceder fácilmente al registro del sistema en código VB. VB solo puede funcionar en ubicaciones fijas en el registro del sistema, es decir, solo se pueden crear, modificar y eliminar en la configuración del programa \key_current_user\software\VB y VBA. Por supuesto, esta restricción no tiene nada que ver con las aplicaciones generales. , pero causará algunos inconvenientes a las aplicaciones más grandes. En este momento, es necesario utilizar las funciones API de Windows.