Creación del cuadro de diálogo

Para crear un cuadro de diálogo en VBA IDE

1. En el menú Insertar, pulse UserForm para abrir un nuevo formulario. Se muestran dos ventanas, un cuadro de herramientas y un formulario en blanco de usuario.
2. Seleccione y arrastre uno por uno los siguientes controles desde el cuadro de herramientas y sitúelos en el formulario de usuario. Tendrá que colocar dos botones de opción (

   

   ), tres etiquetas (

   

   ), tres cuadros de texto (

   

   ) y dos botones de comando (

   

   ), tal como se aprecia en el siguiente formulario:

   

3. Cierre el cuadro de herramientas.

Para establecer las propiedades de los controles de botón de opción

1. En el formulario de usuario, seleccione el control OptionButton1. En el menú Ver, pulse Ventana Propiedades y cambie las siguientes propiedades para OptionButton1:

   (Name) = gp_poly

   Caption = Polígono

   ControlTipText = Loseta en forma de polígono

   Accelerator = P

2. En el formulario de usuario, seleccione el control OptionButton2. En la ventana Propiedades, cambie las siguientes propiedades para OptionButton2:

   (Name) = gp_circ

   Caption = Círculo

   ControlTipText = Loseta en forma de círculo

   Accelerator = I

Para definir las propiedades de los controles de etiqueta

1. En el formulario de usuario, seleccione el control Label1. En la ventana Propiedades, cambie las siguientes propiedades para Label1:

   (Name) = label_trad

   Caption = Radio de las losetas

   TabStop = True

2. En el formulario de usuario, seleccione el control Label2. En la ventana Propiedades, cambie las siguientes propiedades para Label2:

   (Name) = label_tspac

   Caption = Espacio entre losetas

   TabStop = True

3. En el formulario de usuario, seleccione el control Label3. En la ventana Propiedades, cambie las siguientes propiedades para Label3:

   (Name) = label_tsides

   Caption = Número de caras

   TabStop = True

Para definir las propiedades de los controles del cuadro de texto

1. En el formulario de usuario, seleccione el control TextBox1. En la ventana Propiedades, cambie las siguientes propiedades para TextBox1:

   (Name) = gp_trad

2. En el formulario de usuario, seleccione el control TextBox2. En la ventana Propiedades, cambie las siguientes propiedades para TextBox2:

   (Name) = gp_tspac

3. En el formulario de usuario, seleccione el control TextBox3. En la ventana Propiedades, cambie las siguientes propiedades para TextBox3:

   (Name) = gp_tsides

Para establecer las propiedades de los controles de botón de comando y la ventana de formulario

1. En el formulario de usuario, seleccione el control CommandButton1. En la ventana Propiedades, cambie las siguientes propiedades para CommandButton1:

   (Name) = accept

   Caption = Aceptar

   ControlTipText = Acepta las opciones

   Accelerator = O

   Default = True

2. En el formulario de usuario, seleccione el control CommandButton2. En la ventana Propiedades, cambie las siguientes propiedades para CommandButton2:

   (Name) = cancel

   Caption = Cancelar

   ControlTipText = Cancela la operación

   Accelerator = C

3. Seleccione todo el formulario haciendo clic en el fondo del formulario, lejos de cualquier control. En la ventana Propiedades, cambie las siguientes propiedades para el formulario:

   (Name) = gpDialog

   Caption = Camino de jardín

   El formulario deberá ahora tener este aspecto:

   

4. Guarde su trabajo.