Bom dia Amigos
Estou a usar o código abaixo para desmarcar um item numa caixa de listagem.
A linha selecionada na caixa de Listagem desmarca, mas fica a circundada de pontos
Tem como tirar os pontinhos ?
Ver imagem
Private Sub Foco_GotFocus()
Dim I As Integer
For I = 0 To Me.lst_1.ListCount
Me.lst_1.Selected(I) = False
Next I
Obrigado
Estou a usar o código abaixo para desmarcar um item numa caixa de listagem.
A linha selecionada na caixa de Listagem desmarca, mas fica a circundada de pontos
Tem como tirar os pontinhos ?
Ver imagem
Private Sub Foco_GotFocus()
Dim I As Integer
For I = 0 To Me.lst_1.ListCount
Me.lst_1.Selected(I) = False
Next I
Obrigado