none
[VB.NET] Manipulando as abas de um TabControl. RRS feed

  • Pergunta

  • Bom dia/tarde/noite galera. Tenho um TabControl com 3 TabPages. Quando a TabPage 2 ou 3 estiverem selecionadas, um button que também esta nesse Form, devera ficar com a propriedade Visible = False, qual seria a melhor forma para fazer isso?

    Tentei dessa forma mas não deu certo:

    P.S.: Name do TabControl: TBCProduto | Name da TabPage 1: TBPInfPrincipal

       Private Sub TBCProduto_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TBCProduto.SelectedIndexChanged
            If TBPInfPrincipal.Select = False Then
                BTNLimpar.Visible = False
            Else
                BTNLimpar.Visible = True
            End If
        End Sub

    sexta-feira, 24 de abril de 2015 23:52

Respostas

  • confundi com c#

        Private Sub tbcProduto_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
            btnLimpar.Visible = (tbcProduto.SelectedTab Is tbcInfProduto)
        End Sub
    


    Natan

    sábado, 25 de abril de 2015 01:48

Todas as Respostas

  • tenta assim:

            private void TBCProduto_SelectedIndexChanged(object sender, EventArgs e)
            { 
    
                btnLimpar.Visible = (tbcProduto.SelectedTab == tbcInfPrincipal);
      
            }


    Natan

    sábado, 25 de abril de 2015 00:03
  • Não deu certo... Ele da erro de sintaxe por causa das chaves e mais dois erros no código em si... Tentei usar apenas o "BTNLimpar.Visible = (TBCProduto.SelectedTab == TBCInfPrincipal)" dentro da sintaxe que postei, mas também não da certo. Sou bem novato em programação, mas não entendi a lógica do seu código, teria como dar uma explicação rápida?
    sábado, 25 de abril de 2015 00:16
  • confundi com c#

        Private Sub tbcProduto_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
            btnLimpar.Visible = (tbcProduto.SelectedTab Is tbcInfProduto)
        End Sub
    


    Natan

    sábado, 25 de abril de 2015 01:48
  • Deu certo, muito obrigado. :)


    sábado, 25 de abril de 2015 02:07
  • esqueci a explicação:

    você deve informar se o objeto é visible = true / false

    o resultado da comparação entre dois objetos (objetoA is objetoB) também retorna true / false

    assim: objeto.visible = (objetoA is objetoB)

    Abraço!


    Natan

    sábado, 25 de abril de 2015 02:17