ABRIR UM FORM COM UMA VARIAVEL TIPO STRING

MALA 11/06/2010 10:53:44
#344585
FUNCTION ABREFORM(NOMEFORM AS STRING) AS BOOLEAN



GOSTARIA DE PASSAR O NOME DO FORMULARIO PARA UMA FUNCAO E ABRIR O FORMULARIO.

AGRADEÇO DESDE JA A ATENÇÃO DE VCS.
JONATHANSTECKER 11/06/2010 11:33:12
#344591
Sub AbreForm(ByVal Formulario As Object)
Formulario.show()
End Sub
MALA 11/06/2010 11:38:03
#344594
vOU PASSAR UMA VARIAVEL TIPO STRING AMIGO
ASHKATCHUP 11/06/2010 11:38:11
#344595 Resposta escolhida
Da uma olhada aqui: http://www.daniweb.com/forums/post865790.html#post865790
MALA 11/06/2010 11:58:14
#344601
ficou dando um erro amigo neste codigo

Não foi possível carregar o tipo WindowsApplication1.MyNamespace.UNESTDIEDI do módulo (assembly) Transystem, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null.
MALA 11/06/2010 13:10:59
#344607
ESSE E CODIGO QUE EU PROCURAVA DEU CERTO ASSIM NO VB2005

Dim ProjectName As String = Reflection.Assembly.GetExecutingAssembly.GetName.Name
Try
Dim component As String = ProjectName & [Ô].[Ô] & NomeFrm
Dim TType As Type = Type.GetType(component, False, True)
Dim Frm As Form = TryCast(Activator.CreateInstance(TType), Form)

Frm.StartPosition = FormStartPosition.CenterScreen
Frm.FormBorderStyle = FormBorderStyle.FixedSingle
Frm.MaximizeBox = False

If FrmModal = False Then
Frm.Show()
Else
Frm.ShowDialog()
End If
Catch ex As Exception
Exit Sub
End Try
Tópico encerrado , respostas não são mais permitidas
Voltar