Jump to content
jcbiker

checkBox.items = (Collection)

Recommended Posts

jcbiker

Boas,

Tenho uma checkbox à qual nas propriedades( items = (Collection)), adicionei 2 opcções. Agora não sei como posso saber qual destas opções está seleccionada e ou se esta alguma selecionada.

Alguem me pode ajudar??

Share this post


Link to post
Share on other sites
obamaself

não percebi.

mas podes criar uma checkbox para cada item.

e verificar qual é qe está seleccionado.

  If CheckBox1.Checked = True Then

End If

Para deixar só o utilizador selecionar uma podes por assim

neste codigo tem duas checkbox ( ver todos, ver não lidos)

  
  Private Sub vertodos_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles vertodos.CheckedChanged
        If vertodos.Checked = True Then
            vernao.Checked = False

        ElseIf vertodos.Checked = False Then
            vernao.Checked = True
            vertodos.Checked = False
        End If
    End Sub

    Private Sub vernao_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles vernao.CheckedChanged
        If vernao.Checked = True Then
            vertodos.Checked = False
        ElseIf vernao.Checked = False Then
            vertodos.Checked = True
            vernao.Checked = False
        End If
    End Sub

Share this post


Link to post
Share on other sites
ribeiro55

Penso que estás a confundir com qualquer coisa.

A classe CheckBox não possuí nenhuma propriedade "Items"


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Share this post


Link to post
Share on other sites
Andrepereira9

Não te estás a referir antes à classe CheckedListBox ?

Se si, podes fazer da seguinte maneira

Private Sub CheckedListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckedListBox1.SelectedIndexChanged
   For Each seleccionado As String In CheckedListBox1.CheckedItems
      MsgBox(seleccionado.ToString)
   Next
End Sub


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.