Buenos dias... agradézco por sus respuestas, he llegado al siguiente código, pero todavia no me funciona, me puse a depurar el programa pero no me quiere entrar al condicional que tiene el mensaje... no sé si lo tengo bien escrito...help me!
NOTA: El datagrid1 se llama grilla_menu y el datagrid2 se llama grilla_dia
Código vb:
Ver originalPrivate Sub grilla_menu_CellContentDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles grilla_menu.CellContentDoubleClick
Dim k As String
Dim tota, toot As Integer
' Se define una lista temporal de registro seleccionados
Dim rowSelected As New List(Of DataGridViewRow)()
' Se agrega el campo a la lista temporal
rowSelected.Add(grilla_menu.CurrentRow)
' Se agrega el item seleccionado a la grilla de destino
Dim existe = False
For Each row As DataGridViewRow In rowSelected
If Convert.ToString(row.Cells("Nombre Menu").Value).Equals(grilla_menu.CurrentRow) Then
existe = True
If (existe = True) Then
MsgBox("Éste menú ya fué agregado", MsgBoxStyle.OkOnly, "INFORMACIÓN")
Else
End If
End If
grilla_dia.Rows.Add(New Object() {False, row.Cells("Nombre Menu").Value, row.Cells("Valor").Value})
toot = row.Cells("Valor").Value
tota = TextBox1.Text
k = (toot + tota)
TextBox1.Text = k
Next
End Sub