Manuel Ugarte
30 de Junio del 2006

Hola amigos :
Estoy desarrollando una funcion de usuario para multiples tablas y a la vez para multiples formularios pero deseo saber si existe alguna forma de utilizar un unico nombre en el formulario algo asi como el thisform de visual basic. Actualmente tengo lo siguiente : frmcliente.text(0).SetFocus
pero el frmclientes la deseo cambiar por una unica frase para todos los formularios pero a la vez no puedo tener el mismo nombre en todos los formularios. Se que en visual fox existe el
thisform.text(0) pero como seria en visual basic.
Saludos
Manuel

Isaac
30 de Junio del 2006

Hola, en tu funcion crea una argumento q sea del tipo Form. Y cuando llames la funcion pasas el formulario al q quieres hacer referencia...
Ejemplo:


Public Sub FuncionUsuario(ByVal Formulario As Form)

Formulario.Text1.Text = 0

End Sub

Private Sub Command1_Click()
FuncionUsuario Form1
End Sub

Claro q tu FuncionUsuario debe estar en un modulo y debe ser publica para q la puedas llamar desde cualquier parte del proyecto...
Bueno Bye y espero q te sirva

Isaac...

mvallejos
30 de Junio del 2006

Otra solucion podría ser declarar una variable pública de tipo Form

Public FromActual as Form

En cada evento Activate de los forms olocas lo siguiente


Set FormActual = Me

Me siempre hace referencia al form activo, pero se accede desde el form activo, no desde un módulo.

Saludos

Manuel Ugarte
30 de Junio del 2006

en el mensaje anterior el error es....
asi como el thisform de visual basic
y deberia ser...
asi como el thisform de visual foxpro
gracias..