Compartilhar via

Como: Emular um controle de Tri-estado do Visual Basic 6.0 em um aplicativo atualizado

  • Artigo

No Visual Basic 6.0, a Picture, DownPicture, e DisabledPicture as propriedades são usadas para exibir diferentes imagens baseadas no estado de um CheckBox, CommandButton, ou OptionButton controle. Por exemplo, quando um CheckBox controle é marcado, o DownPicture imagem será exibida; se o controle estiver desabilitado, o DisabledPicture imagem é exibida.

In Visual Basic 2008 Você pode obter o mesmo efeito usando um ImageList controle conforme descrito no exemplo a seguir.

Observação:

Primeiro, verifique seu aplicativo Visual Basic 6.0.Se a DownPicture e DisabledPicture propriedades não são conjunto no time de design ou time de execução, o comportamento deve ser o mesmo no Visual Basic 2008.
Observação:

As caixas de diálogo e comandos de menu que você vê podem diferir das descritas no Help, dependendo de suas configurações ativas ou de edição.Para alterar as configurações, escolher Importar e exportar configurações on the Ferramentas menu.Para obter mais informações, consulte Configurações do Visual Studio.

Adicionar um Controle ImageList

Siga estas etapas para modificar o aplicativo atualizado se o DownPicture ou DisabledPicture as propriedades são definidas.

Para emular um controle de três estados

  1. Determinar os nomes de arquivos e locais das imagens que foram atribuídas à Picture, DownPicture, e DisabledPicture propriedades e, se for necessário, copie-os para seu computador de desenvolvimento.

  2. From a Caixa de ferramentas, add an ImageList controle ao formulário.

  3. Na janela Properties, selecione a propriedade Images.

  4. No Editor de coleção de imagens, adicionar três imagens a ser usado para o Picture, o DownPicturee, em seguida, o DisabledPicture.

  5. Se qualquer uma das propriedades foram definidas em tempo de execução, remova o código.Se qualquer uma das propriedades conjunto em time de design, adicione o seguinte código à Load evento do formulário:

    ' Assign the first image (Picture) to the Image property.
CheckBox1.Image = ImageList1.Images(0)

  6. Para exibir o DownPicture imagem no time de execução, adicione o seguinte código para o CheckedChanged evento para o CheckBox controle.

    If CheckBox1.Checked = True Then
  ' Assign the second image (DownPicture) to the Image property.
  CheckBox1.Image = ImageList1.Images(1)
Else
  ' Assign the first image (Picture) to the Image property.
  CheckBox1.Image = ImageList1.Images(0)
End If

  7. Para exibir o DisabledPicture imagem no time de execução, adicione o seguinte código para o EnabledChanged evento para o CheckBox controle.

    If CheckBox1.Enabled = False Then
  ' Assign the third image (DisabledPicture) to the Image property.
  CheckBox1.Image = ImageList1.Images(2)
ElseIf CheckBox1.Checked = True Then
  ' Assign the second image (DownPicture) to the Image property
  CheckBox1.Image = ImageList1.Images(1)
Else
  ' Assign the first image (Picture)to the Image property
  CheckBox1.Image = ImageList1.Images(0)
End If

    Agora o aplicativo deve comporta-se exatamente como no Visual Basic 6.0.

Consulte também

Conceitos

Propriedade de estilo para usuários do Visual Basic 6.0

Controle CheckBox para usuários do Visual Basic 6.0

Controle CommandButton para Usuários do Visual Basic 6.0

Controle OptionButton para usuários do Visual Basic 6.0

Controle OptionButton para usuários do Visual Basic 6.0

Controles de usuário para usuários do Visual Basic 6.0