Aunque Visual Basic 6 ( VB6 ) ha sido reemplazado por la serie Visual Basic.Net de paquetes de programación , VB6 todavía tiene un gran número de seguidores . Parte de la razón de esto es porque VB6 es más fácil de usar que sus . Contraparte Net y se ha ganado una amplia gama de útiles herramientas adicionales. Una de estas herramientas es el control FlexGrid , originaria de VideoSoft (VS ) . Este complemento proporciona potentes funciones de hoja de cálculo como para VB6 en un formato fácil de usar paquete . Una de las mejores características que provee el control de VS FlexGrid es la capacidad de ocultar columnas de datos . Instrucciones
1

Start VB6 y modificar el formulario de pre -creado ( ventana de la interfaz de usuario) a su gusto. Con el ratón y el panel de propiedades en la parte inferior derecha , puede cambiar todos los aspectos del formulario , como el tamaño , el título y los colores.
2

cargar el control FlexGrid VS . En el menú "Proyecto" , haga clic en " Componentes ". Aparecerá un cuadro de diálogo con varias pestañas . Elija la ficha "Controles" , y aparecerá una lista de varios productos " VideoSoft " , entre ellos uno para " VSFlexGrid . " Seleccionar este control (poner una marca en la casilla al lado) y pulse el botón " OK" . Ahora debería ver un nuevo icono en la tira de herramientas controles en el lado izquierdo.
3

Seleccione el nuevo icono y dibujar una cuadrícula adecuada en el formulario. En el panel inferior derecho , cambie el nombre de la red a " VS ". A continuación, haga clic en la cuadrícula y seleccione "Propiedades" en el menú emergente. Se le presentará un cuadro de diálogo con varias pestañas que contienen diferentes propiedades (por ejemplo , color) de la red . Cambiar cualquiera de estas propiedades a su gusto.
4

Para realizar pruebas, crear algunos encabezados de texto para cada columna de la cuadrícula. Esto se puede lograr haciendo doble clic en el formulario (en cualquier lugar , pero en la parrilla ) . Usted será llevado a una ventana de codificación donde se puede especificar la ejecución de código . El cursor debe aparecer dentro de la sección de subrutina apropiada. Dentro de este subprograma , escriba lo siguiente :

VS.Row = 0

VS.Col = 0

VS.Text = " Car"

VS . Col = 1

VS.Text = " Ship"

VS.Col = 2

VS.Text = "Airplane "
5

volver a la ventana de formulario y crear dos botones. Usted puede hacer esto mediante la selección de la " CommandButton " icono (se parece a un botón) en la franja de los controles en el lado izquierdo y luego dibujar los botones del formulario . Utilizando el panel de propiedades en la parte inferior derecha, cambiar el título de un botón para "Ocultar " y el otro a "Mostrar ".
6

doble clic en el botón etiquetado " Ocultar " y será llevado a una ventana de código con el cursor dentro de la subrutina apropiada. Escriba el siguiente código en dicha subrutina :

VS.ColHidden ( 1 ) = True

mismo modo , haga doble clic en el botón, " Show" y escriba el siguiente código en el nuevo subprograma :

VS.ColHidden ( 1 ) = False
7

prueba el programa pulsando el botón de reproducción (el triángulo que apunta hacia los lados ) de la barra horizontal superior . Esto debería abrir el formulario con la cuadrícula y los dos botones. Usted debe ver los tres primeros campos de la cuadrícula etiquetada como "Car ", " barco " y "Airplane " . Al pulsar el botón " Ocultar" , debería ver desaparecer la columna de la " nave " . Pulse el botón " Show" y debería ver la columna aparece de nuevo.