hola que tal saludos a todos, mi problema es el siguiente. Tengo el sig. codigo
Código vb:
Ver originalPrivate Sub form_busqueda_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'id = ""
con = New MySqlConnection()
con.ConnectionString = "server=localhost;user id =root;password=123456;database=cvi_campesino"
con.Open()
data.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells
'creamos el adaptador
ada = New MySqlDataAdapter(cadconsul, con)
'creamos el dataset
datase = New DataSet
ada.Fill(datase, "productos")
'asignar el dataset al datagrid
data.DataSource = datase
data.DataMember = "productos"
End Sub
Private Sub data_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles data.KeyDown
Dim idxrow As Integer = data.CurrentRow.Index
If e.KeyData = Keys.Return Then
id = data.Rows(idxrow).Cells(0).Value
Me.Hide()
Else
If e.KeyData = Keys.Escape Then
Me.Hide()
End If
End If
End Sub
End Class
el problema es que cuando se ejecuta el programa y se manda a llamar la primera ves este form solo se ejecuta la parte del Private Sub form_busqueda_Load(By
la otra parte la del evento keydown (Private Sub data_KeyDown) no se ejecuta hasta la segunda ves que se llama
agradesere la ayuda prestada gracias