Embora o Visual Basic 6 ( VB6 ) foi substituída pela série Visual Basic.Net de pacotes de programação , VB6 ainda tem um grande número de seguidores . Parte da razão para isso é porque VB6 é mais fácil de usar do que seus . Contrapartida Net e tem atraído uma grande variedade de ferramentas add -on úteis. Uma dessas ferramentas é o controle FlexGrid , originalmente de VideoSoft ( VS ) . Este add-on oferece poderosas funcionalidades de planilha para VB6 em um pacote fácil de usar . Uma das características puras fornecidos pelo controle VS FlexGrid é a capacidade de ocultar colunas de dados. Instruções
1

Comece VB6 e modificar o formulário de pré- criado (janela de interface de usuário) ao seu gosto. Usando o mouse e painel de propriedades no lado inferior direito , você pode alterar todos os aspectos do formulário , como o tamanho, o título e as cores.
2

Carregue o controle VS FlexGrid . A partir do menu " Project", clique em " Componentes ". Você verá uma caixa de diálogo com várias guias. Escolha a aba " Controls " , e uma lista de vários produtos " VideoSoft " aparecerá , incluindo uma para " VSFlexGrid ". Selecione este controle ( colocar uma verificação na caixa ao lado) e pressione o botão "OK" . Você deve ver agora um novo ícone na faixa de ferramentas controles no lado esquerdo .
3

Selecione o novo ícone e desenhar uma grade adequado em seu formulário. No painel inferior direito , altere o nome da rede para "VS ". Em seguida, clique com o botão direito no grid e selecione "Propriedades " no menu pop-up. Você será presenteado com uma caixa de diálogo com várias guias contendo várias propriedades (por exemplo , cor) da grade. Altere qualquer uma destas propriedades ao seu gosto.
4

Para fins de teste, criar alguns cabeçalhos de texto para cada coluna na grade. Isso pode ser feito clicando duas vezes sobre o formulário ( em qualquer lugar , mas no grid ) . Você será levado para uma janela de codificação , onde você pode especificar o código a ser executado. O cursor deve aparecer dentro da seção de sub-rotina apropriada. Dentro desta sub-rotina , digite o seguinte :

VS.Row = 0

VS.Col = 0

VS.Text = "Carro"

VS . Col = 1

VS.Text = " Navio "

VS.Col = 2

VS.Text = " Airplane "
5

Volte para a janela do formulário e criar dois botões. Você pode fazer isso selecionando o ícone " CommandButton " (parecido com um botão) nos controles tira do lado esquerdo e , em seguida, desenhar os botões do formulário. Usando painel de propriedades no lado direito inferior , alterar a legenda de um botão para "Ocultar " e outro para " Show".
6

Dê um duplo clique no botão " Hide" e você será levado para uma janela de codificação com o cursor dentro da sub-rotina apropriada. Digite o seguinte código na sub-rotina que :

VS.ColHidden (1) = true

Da mesma forma, dê um duplo clique no botão " Show" e digite o código a seguir na nova sub-rotina :

VS.ColHidden (1) =
Falso
7

Teste o programa pressionando o botão play (o triângulo de lado apontando ) na barra de ferramentas superior horizontal . Isso deve abrir o formulário com a grade e os dois botões . Você deverá ver os três primeiros campos da grade rotulados como "Carro ", " navio " e " Avião " . Quando você pressiona o botão " Hide" , você deve ver a coluna " Navio " desaparecer. Pressione o botão " Show" e você deve ver a coluna de aparecer novamente.