[VB] aprire un form dinamicamente

[xegallo]

Originariamente inviato da Francesco_76
Come scusa??

dicamo che la label scelta contiene il nome del form

Esempio:

scelta = "form1"

adesso come faccio ad aprire il form1??

fai una
select case trim(lblScelta.caption)
e nei vari case metti i nomi dei tuoi form
in ogni case metti il nome + .show

esempio:

select case trim(lblScelta.caption)
   case form1.name
      form1.show
end select

oppure

fai un ciclo for
che controlla i nomi e li confronta con la label

esempio:

for i = 0 to forms.count - 1
   if form(i).name = lblscelta.caption
      form(i).show
      exit for
   end if
next i