Ayuda

12/08/2004 - 17:46 por Omar Flores | Informe spam
Ayuda con el siguiente código por favor. Descripción de lo que pretendo
hacer. Tengo una forma
llamada frmProveedores en la cual pongo un botón btnbusca2 el cual me va a
abrir una forma
llamada BuscaProveedor en la cual tengo un listBox con los nombres de los
proveedore, quiero que
al darle doble click al listado me regrese su RFC y cierre la forma, y me
aparezca el RFC en el
txtMRFC de la forma frmProveedores (Principal) el sig. código es la forma en
que lo estoy haciendo
no me marca ningun error y segun eso si hace la asignación pero al momento
de cerrar la forma de
busqueda y regresar a la principal no aparece nada en el txtMRFC de la forma
principal, ojalá y
alguien me pueda ayudar con esto, Muchas gracias


Modulogeneral.vb

Public Proveedores As New frmProveedores

-
En frmProveedores (forma principal)

Private Sub btnBusca2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnBusca2.Click
Dim BuscaProveedor As New frmBuscaProveedor
BuscaProveedor.Show()
End Sub

'Doble click en el list box de la forma BuscaProveedor (Forma de busqueda)
Private Sub lstListadoProv_DoubleClick(ByVal sender As Object, ByVal e
As System.EventArgs) Handles lstListadoProv.DoubleClick
Dim strRFC As String
strRFC = lstListadoProv.SelectedValue
Proveedores.txtMRFC.Focus()
Proveedores.txtMRFC.Text = strRFC
Me.Close()
End Sub

Preguntas similare

Leer las respuestas

#1 Jose Carlos
12/08/2004 - 20:40 | Informe spam
Bueno, mi primera duda es como entras a la aplicación, es decir en las
propiedades de la aplicación entras como un Sub Main o entras con el
formulario frmProveedores(Principal), porque si entras con el formulario
principal, cuando le das doble click al listbox de BuscaProveedor estás
abriendo un nuevo formulario igual al primero pero no es el mismo, con lo
cual el primero lo tendrás cargado en memoria y luego no estoy seguro de la
coleccion de items que has metido en el listbox, como pones los Proveedores
en el listabox, porque puede ser que SelectedValue no te retorne nada en el
caso de que no haya value y a lo mejor debas de poner SelectedItem.
En resumen ¿Como entras a la aplicación? ¿Que objetos tienes en el listbox,
de donde los sacas y como?

Un saludo

"Omar Flores" escribió en el mensaje
news:
Ayuda con el siguiente código por favor. Descripción de lo que pretendo
hacer. Tengo una forma
llamada frmProveedores en la cual pongo un botón btnbusca2 el cual me va a
abrir una forma
llamada BuscaProveedor en la cual tengo un listBox con los nombres de los
proveedore, quiero que
al darle doble click al listado me regrese su RFC y cierre la forma, y me
aparezca el RFC en el
txtMRFC de la forma frmProveedores (Principal) el sig. código es la forma


en
que lo estoy haciendo
no me marca ningun error y segun eso si hace la asignación pero al momento
de cerrar la forma de
busqueda y regresar a la principal no aparece nada en el txtMRFC de la


forma
principal, ojalá y
alguien me pueda ayudar con esto, Muchas gracias


Modulogeneral.vb

Public Proveedores As New frmProveedores

-
En frmProveedores (forma principal)

Private Sub btnBusca2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnBusca2.Click
Dim BuscaProveedor As New frmBuscaProveedor
BuscaProveedor.Show()
End Sub

'Doble click en el list box de la forma BuscaProveedor (Forma de busqueda)
Private Sub lstListadoProv_DoubleClick(ByVal sender As Object, ByVal e
As System.EventArgs) Handles lstListadoProv.DoubleClick
Dim strRFC As String
strRFC = lstListadoProv.SelectedValue
Proveedores.txtMRFC.Focus()
Proveedores.txtMRFC.Text = strRFC
Me.Close()
End Sub


Respuesta Responder a este mensaje
#2 Omar Flores
13/08/2004 - 00:21 | Informe spam
Que tal, entro como un Sub Main llamado frmProveedor (child form), en esta
forma tengo un tabControl con 4 TabPages
una para Alta,Baja,Modificacion y Consulta, la tabPage que utilizo es tpMod
(modificación) ahí tengo un textBox txtMRFC y un botón buscar2 que manda
llamar a la forma BuscaProveedor en la cual tengo un textbox y un listBox en
el textbox hago el filtrado de la busqueda por el nombre del proveedor (como
un incremental search) y el resultado que me va arrojando lo vacio en el
listbox, una vez encontrado el nombre del proveedor le debemos de dar 2
clicks para que en la forma Proveedor en el txtMRFC me ponga el RFC que
corresponde al nombre buscado. Espero y me de a entender.

Muchas gracias.


"Jose Carlos" escribió en el mensaje
news:
Bueno, mi primera duda es como entras a la aplicación, es decir en las
propiedades de la aplicación entras como un Sub Main o entras con el
formulario frmProveedores(Principal), porque si entras con el formulario
principal, cuando le das doble click al listbox de BuscaProveedor estás
abriendo un nuevo formulario igual al primero pero no es el mismo, con lo
cual el primero lo tendrás cargado en memoria y luego no estoy seguro de


la
coleccion de items que has metido en el listbox, como pones los


Proveedores
en el listabox, porque puede ser que SelectedValue no te retorne nada en


el
caso de que no haya value y a lo mejor debas de poner SelectedItem.
En resumen ¿Como entras a la aplicación? ¿Que objetos tienes en el


listbox,
de donde los sacas y como?

Un saludo

"Omar Flores" escribió en el mensaje
news:
> Ayuda con el siguiente código por favor. Descripción de lo que pretendo
> hacer. Tengo una forma
> llamada frmProveedores en la cual pongo un botón btnbusca2 el cual me va


a
> abrir una forma
> llamada BuscaProveedor en la cual tengo un listBox con los nombres de


los
> proveedore, quiero que
> al darle doble click al listado me regrese su RFC y cierre la forma, y


me
> aparezca el RFC en el
> txtMRFC de la forma frmProveedores (Principal) el sig. código es la


forma
en
> que lo estoy haciendo
> no me marca ningun error y segun eso si hace la asignación pero al


momento
> de cerrar la forma de
> busqueda y regresar a la principal no aparece nada en el txtMRFC de la
forma
> principal, ojalá y
> alguien me pueda ayudar con esto, Muchas gracias
>
>
> Modulogeneral.vb
>
> Public Proveedores As New frmProveedores
>
> -
> En frmProveedores (forma principal)
>
> Private Sub btnBusca2_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles btnBusca2.Click
> Dim BuscaProveedor As New frmBuscaProveedor
> BuscaProveedor.Show()
> End Sub
>
> 'Doble click en el list box de la forma BuscaProveedor (Forma de


busqueda)
> Private Sub lstListadoProv_DoubleClick(ByVal sender As Object, ByVal


e
> As System.EventArgs) Handles lstListadoProv.DoubleClick
> Dim strRFC As String
> strRFC = lstListadoProv.SelectedValue
> Proveedores.txtMRFC.Focus()
> Proveedores.txtMRFC.Text = strRFC
> Me.Close()
> End Sub
>
>


Respuesta Responder a este mensaje
#3 Jose Carlos
13/08/2004 - 07:38 | Informe spam
Ya he visto que te ha contestado e incluso te ha dado codigo Juan Carlos
Badiola (Tristan ) en otro foro.

Un saludo


"Omar Flores" escribió en el mensaje
news:
Ayuda con el siguiente código por favor. Descripción de lo que pretendo
hacer. Tengo una forma
llamada frmProveedores en la cual pongo un botón btnbusca2 el cual me va a
abrir una forma
llamada BuscaProveedor en la cual tengo un listBox con los nombres de los
proveedore, quiero que
al darle doble click al listado me regrese su RFC y cierre la forma, y me
aparezca el RFC en el
txtMRFC de la forma frmProveedores (Principal) el sig. código es la forma


en
que lo estoy haciendo
no me marca ningun error y segun eso si hace la asignación pero al momento
de cerrar la forma de
busqueda y regresar a la principal no aparece nada en el txtMRFC de la


forma
principal, ojalá y
alguien me pueda ayudar con esto, Muchas gracias


Modulogeneral.vb

Public Proveedores As New frmProveedores

-
En frmProveedores (forma principal)

Private Sub btnBusca2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnBusca2.Click
Dim BuscaProveedor As New frmBuscaProveedor
BuscaProveedor.Show()
End Sub

'Doble click en el list box de la forma BuscaProveedor (Forma de busqueda)
Private Sub lstListadoProv_DoubleClick(ByVal sender As Object, ByVal e
As System.EventArgs) Handles lstListadoProv.DoubleClick
Dim strRFC As String
strRFC = lstListadoProv.SelectedValue
Proveedores.txtMRFC.Focus()
Proveedores.txtMRFC.Text = strRFC
Me.Close()
End Sub


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida