Cara paling yang mudah pake SELECT CASE, ketika tombol di klik.

If Len(Trim(txtForm.Text)) = 0 Then
MsgBox "Nama Form belum diisi)
Exit sub
endif
Select case Ucase(txtForm.Text)
Case "FORM 1"
frm1.Show
Case "FORM 2"
frm2.Show

... dst
...
....
Case Else

End Select






2008/4/10 trankkinaz <[EMAIL PROTECTED]>:

>   Hello VB-lovers
>
> Salam kenal, member baru nieh.
> trus langsung nanya yah ^_^
> begini, aku punya 1 project dengan _+ _ 50 form, rencananya aku akan buat
> satu master form yang fungsinya untuk memanggil salah satu dari ke-50
> form tsb.
> cara 1: buat button untuk mewakili tiap form --> tapi cara ini gak keyen
> banget khan ;o(
> cara 2: pake component script control --> nah cara yang ini blm bisa
> juga (mentok bo)
> cara 3: tanya ke milist ... (he..hee)
>
> so please milisers mohon pencerahannya dunk gimana caranya?
> biar user tinggal ketik nama form truss pencet tombol buka, tyus kebuka
> dech form yg dimaksud...
>
> Tengkiu seblumnya..
>
> salam,
> Tetap Semangat!
>
>  
>


[Non-text portions of this message have been removed]

Kirim email ke