MOVER LIST BOX
Como faço para mover uma list box pra o lado direito do formulario ??
por exemplo clico no botao entao list vai pra direitaa
sei q devo usar o TOP ou Left mais num sei como
alguem pode ajudar
por exemplo clico no botao entao list vai pra direitaa
sei q devo usar o TOP ou Left mais num sei como
alguem pode ajudar
é mais ou menos isso, só alterar o valor do Left para mais ou menos, dependendo do tamanho de seu form.
Private Sub Command1_Click()
List1.Left = 10000
End Sub
Private Sub Form_Load()
List1.Left = 300
End Sub
Boa sorte.
Private Sub Command1_Click()
List1.Left = 10000
End Sub
Private Sub Form_Load()
List1.Left = 300
End Sub
Boa sorte.
e se eu quiser q a list apareça novamente clicando no botaoo???
Bom GABYS no caso se você quer que ao clicar no botão a List va para a direita e após clicar no botão ele retornar para o local esquerdo, então:
[txt-color=#e80000]Dim Lugar As String
Private Sub Command1_Click()
If Lugar = [Ô]Esquerda[Ô] Then
List1.Left = 10000
Lugar = [Ô]Direita[Ô]
ElseIf Lugar = [Ô]Direita[Ô] Then
List1.Left = 300
Lugar = [Ô]Esquerda[Ô]
End If
End Sub
Private Sub Form_Load()
List1.Left = 300
Lugar = [Ô]Esquerda[Ô]
End Sub[/txt-color]
Boa sorte.
[txt-color=#e80000]Dim Lugar As String
Private Sub Command1_Click()
If Lugar = [Ô]Esquerda[Ô] Then
List1.Left = 10000
Lugar = [Ô]Direita[Ô]
ElseIf Lugar = [Ô]Direita[Ô] Then
List1.Left = 300
Lugar = [Ô]Esquerda[Ô]
End If
End Sub
Private Sub Form_Load()
List1.Left = 300
Lugar = [Ô]Esquerda[Ô]
End Sub[/txt-color]
Boa sorte.
Obrigado por tentar ajudar mais nem mexeu do lugar 
Amigo, este código funcionou perfeitamente.
Seria importante avaliar cada linha do código, especialmente o Form_Load.
Copie em um novo projeto este código, insira um botão (Command1) e um ListBox (List1).
Seria importante avaliar cada linha do código, especialmente o Form_Load.
Copie em um novo projeto este código, insira um botão (Command1) e um ListBox (List1).
Da uma olhada no arquivo.
Tópico encerrado , respostas não são mais permitidas