Ver Mensaje Individual
  #14 (permalink)  
Antiguo 15/02/2008, 12:03
mroblesv
 
Fecha de Ingreso: diciembre-2007
Mensajes: 26
Antigüedad: 16 años, 5 meses
Puntos: 1
Re: kien logre resolver este problema mis respetos

Charlie gracias por tu ayuda, pero no me funciono o no se donde lo voy a poner.
tengo lo siguiente:

este codigo esta en el Form que tiene el Datagridview
Private Sub TB_AgenteDataGridView_CellDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles TB_AgenteDataGridView.CellDoubleClick
No_Empleado = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).No_Empleado
No_gafete = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).No_Gafete
Nombre_Agente = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).Nombre_Agente
App_Agente = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).App_Agente
Apm_Agente = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).Apm_Agente
Nom_Completo = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).Nom_Completo
ID_Grado = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).ID_Grado
CUIP = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).CUIP
Img_Agente = DataSet_Armeria.TB_Agente(TB_AgenteBindingSource.P osition).Img_Agente
Me.Close()
End Sub

y este otro codigo esta en el Form a donde llegan los datos ke selecciono del datagridview:
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
My.Forms.BuscarAgente.ShowDialog()
No_EmpleadoTextBox.Text = My.Forms.BuscarAgente.No_Empleado
No_GafeteTextBox.Text = My.Forms.BuscarAgente.No_gafete
Nombre_AgenteTextBox.Text = My.Forms.BuscarAgente.Nombre_Agente
App_AgenteTextBox.Text = My.Forms.BuscarAgente.App_Agente
Apm_AgenteTextBox.Text = My.Forms.BuscarAgente.Apm_Agente
Nom_CompletoTextBox.Text = My.Forms.BuscarAgente.Nom_Completo
ComboBox1.SelectedValue = My.Forms.BuscarAgente.ID_Grado
CUIPTextBox.Text = My.Forms.BuscarAgente.CUIP
Img_AgentePictureBox.Image = My.Forms.BuscarAgente.Img_Agente
Button5.Enabled = True
End Sub

La linea ke marke con rojo es donde me sale el siguiente error:
Error 1 Un valor de tipo '1-matriz dimensional de Byte' no se puede convertir en 'System.Drawing.Image'

ojala ke con este codigo puedas(n) deducir el error y darle solucion.
Gracias por su tiempo y cooperacion.