Cómo Pasar un Valor desde un Form...?

14/10/2004 - 22:22 por David Fúnez | Informe spam
Ok;

Tengo un Form1 desde el cual llamo a otro form llamado "ProvFdr" al cual lo
llamo desde un botón "Buscar":

Dim Frm As New ProvFdr
Frm.ShowDialog()

Este Form se encarga de buscar y presentar los resultados en un Grid. Hasta
ahi todo OK. En el grid me aparece el Código, Nombre, etc... de la
ocurrencia encontrada.
La tabla "Proveedores" tiene como llave primaria "Código" pero la consulta
la hago por "Nombre"
Este es el código que tengo para rellenar el Grid [botón "realizar
consulta"] en el Form ProvFdr:
Dim dv As New Data.DataView
dv = DsProvFdr1.Tables(0).DefaultView
dv.RowFilter = "nombre LIKE'" + Trim(TextBox1.Text) + "%'"
DataGrid1.DataSource = dv


Ahora, deseo seleccionar un Item del Grid [ya sea con doble click o
seleccionarlo y pulsar un botón] y devolver el Código como valor para que el
Form1 lo tome y pueda ubicar ese registro en pantalla.

Saludos y gracias.


David Fúnez
Tegucigalpa, Honduras

"La Piratería Mata Las Ideas"
Desarrollador Cinco Estrellas Visual FoxPro
 

Leer las respuestas

#1 htb
14/10/2004 - 23:22 | Informe spam
Del Help de VB:NET "Form.ShowDialog Method
(IWin32Window) [Visual Basic]"

Example
[Visual Basic, C#] The following example displays a form
as a modal dialog box and reads the result of the dialog
box before determining whether to read the value of a
TextBox control on the dialog box form. This example
assumes that a Form named Form2 is created and that it
contains a TextBox control named TextBox1. The example
uses the version of ShowDialog that specifies an owner
for the dialog box.

[Visual Basic]
Public Sub ShowMyDialogBox()
Dim testDialog As New Form2()

' Show testDialog as a modal dialog and determine if
DialogResult = OK.
If testDialog.ShowDialog(Me) =
System.Windows.Forms.DialogResult.OK Then
' Read the contents of testDialog's TextBox.
txtResult.Text = testDialog.TextBox1.Text
Else
txtResult.Text = "Cancelled"
End If
testDialog.Dispose()
End Sub 'ShowMyDialogBox




Ok;

Tengo un Form1 desde el cual llamo a otro form


llamado "ProvFdr" al cual lo
llamo desde un botón "Buscar":

Dim Frm As New ProvFdr
Frm.ShowDialog()

Este Form se encarga de buscar y presentar los


resultados en un Grid. Hasta
ahi todo OK. En el grid me aparece el Código, Nombre,


etc... de la
ocurrencia encontrada.
La tabla "Proveedores" tiene como llave


primaria "Código" pero la consulta
la hago por "Nombre"
Este es el código que tengo para rellenar el Grid


[botón "realizar
consulta"] en el Form ProvFdr:
Dim dv As New Data.DataView
dv = DsProvFdr1.Tables(0).DefaultView
dv.RowFilter = "nombre LIKE'" + Trim(TextBox1.Text)


+ "%'"
DataGrid1.DataSource = dv


Ahora, deseo seleccionar un Item del Grid [ya sea con


doble click o
seleccionarlo y pulsar un botón] y devolver el Código


como valor para que el
Form1 lo tome y pueda ubicar ese registro en pantalla.

Saludos y gracias.


David Fúnez
Tegucigalpa, Honduras

"La Piratería Mata Las Ideas"
Desarrollador Cinco Estrellas Visual FoxPro



.

Preguntas similares