[Resolvido] abrir um Form pelo ListBox

[11closed 0]

e aew pessoal

eu queria saber se tem como eu abrir um form quando clicar em um resultado de uma pesquisa dentro de um listbox

 

ex

Private Sub Command1_Click()

List1.ListIndex = 3

 

End Sub

 

Private Sub Form_Load()

List1.AddItem "1"

List1.AddItem "2"

List1.AddItem "3"

List1.AddItem "4"

List1.AddItem "5"

List1.AddItem "6"

End Sub

 

Private Sub List1_Click()

MsgBox "List1_Click"

End Sub

quando eu clicar em list1 abrir um form

e se eu clicar em list2 abrir outro form

e assim por diante

 

me ajudem aew beleza

t+

[Claudio Neto 3]

e aew pessoal

eu queria saber se tem como eu abrir um form quando clicar em um resultado de uma pesquisa dentro de um listbox

 

ex

Private Sub Command1_Click()

List1.ListIndex = 3

 

End Sub

 

Private Sub Form_Load()

List1.AddItem "1"

List1.AddItem "2"

List1.AddItem "3"

List1.AddItem "4"

List1.AddItem "5"

List1.AddItem "6"

End Sub

 

Private Sub List1_Click()

MsgBox "List1_Click"

End Sub

quando eu clicar em list1 abrir um form

e se eu clicar em list2 abrir outro form

e assim por diante

 

me ajudem aew beleza

t+

 

Tenta assim:

 

CODE

private sub list1_click()

 

if list1.listindex = 0 then

form1.show

elseif list2.listindex = 1 then

form2.show

end if

 

end sub

[11closed 0]

sim assim de certo valeu pela ajuda