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
 

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


Preguntas similares