Hola ya casi lo tengo resuelto.

el problema es en la funcion es en esta instruccion.

total = total + CDbl(dgv.Item(nombre_Columna, a).Value)

Segun yo su equivalente es. Oh no es asi?.

 total = total + CDbl(dgv.Rows.Add(nombre_Columna, a).Value)

Saludos.

Hola gracias por responder a los dos.

    

Private Function Sumar(ByVal nombre_Columna As String, ByVal Dgv As DataGridView) As Double
       Dim Total As Double = 0
       ' recorrer las filas y obtener los items de la columna indicada en "nombre_Columna"  
       Try
          For i As Integer = 0 To Dgv.RowCount - 1
             Total = Total + CDbl(Dgv.Item(nombre_Columna, i).Value)
          Next
       Catch ex As Exception
          MsgBox(ex.Message.ToString)
       End Try
       Return Total
    End Function

No se cual es el equivalente DataGridView en Telerik

Ya que si uso el RadGriewView me muestra un error en la parte del item

Total = Total + CDbl(Dgv.Item(nombre_Columna, i).Value)

Luego en el evento CellValueChanged

txtSubTotal.Text = FormatCurrency(Sumar("Monto", gvFactura), 2).ToString 'Me muestra un error por que gvFactura no es parte del DataGridView

luego en un evento de remover

' La culmna a sumar se llama Monto
   txtSubTotal.Text = FormatCurrency(Sumar("Monto", gvFactura), 2).ToString()  

Veo que el unico evento que esta es el Control Removed

No esta  ItemRemoving ni ItemRemoved.

Saludos.

Hola como están.
Mi consulta es la siguiente, Como puedo calcular datos en mi griewview Control(Telerik) y mostrarlos en un textbox el problema con que me topo es que estoy haciendo un form de facturación (imagen).

Cuando agrego el producto el subtotal me la va cargando según el precio del articulo el problema viene cuando borro un producto del griewview como hago para que el subtotal baje, según esa columna del griewview.



Esto se puede, no comparto ningún código porque no tengo nada aun, no se me ocurre como manipular una columna del griewview todavía.

Saludos.

Hola como estas.

Si a tu profesora no le gusto que el usuario aprete el boton para buscar puedes usar el evento KeyDown para buscar el codigo y dejar el foco ahi para que siga buscando.

Aca te dejo un ejemplo cuando presione Enter dentro de textbox busque tu registro, espero me entiendas es lo unico que se me ocurre.

Private Sub txtBuscarEmpleado_KeyDown(sender As Object, e As KeyEventArgs) Handles txtBuscarEmpleado.KeyDown
        If (e.KeyCode = Keys.Enter) Then
            buscarCodigoEmpleado()
            txtBuscarEmpleado.focus()
End If

---

Veo que Elektro te dio una solucion mas facil puedes cargar tu registros al combox desde la BD y luego el auto completado como el indica.

Saludos

Hola gracias por responder

Es correcto solo que estaba confundiendo

Esta instruccion

.FileName = "Image"

Con el de este FileName

Me.ptbFotoPersonal.Image.Save(sfd.FileName, Imaging.ImageFormat.Jpeg)

Gracias he estado probando veo que por medio del evento FileOk se hace mas practico para mis fines.

Gracias y saludos.

Hola ya resolví el problema.

Obtuve la ruta de la siguiente manera.
También se puede de las formas que puse anteriormente el problema estaba en donde ponía la instrucción.

ruta = saveFileDialog1.FileName

La instrucción debe ponerse después de que se presiona el botón de save y así guarda la ruta del saveDialog

Case 1
Me.ptbFotoPersonal.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Jpeg)
'Si captura la ruta completa del archivo
ruta = saveFileDialog1.FileName

No me guardaba la imagen porque la ponía después del FileName

 
'Malo no captura la ruta si el nombre que se le da al archivo
saveFileDialog1.FileName = txtPrimerNombre.Text & " " & txtPrimerApellido.Text
ruta = saveFileDialog1.FileName
 

Saludos.

Hola como están tengo la siguiente duda y es como obtengo la ruta completa donde guardo un archivo con un saveDialog

He estado probando lo siguiente pero solo me obtiene el nombre del archivo y no la ruta.

'Obtengo el nombre de la foto
ruta = Path.GetFileName(saveFileDialog1.FileName)
 
'Igual obtengo nombre
ruta = IO.Path.GetFileName(saveFileDialog1.FileName)
 
MsgBox(ruta) 

He notado que con el OpenDialog cuando uso el FileName si me trae toda la ruta.

Lo siquiente como obtengo la ruta completa de la imagen en un pictureBox

ptbFotoPersonal.ImageLocation

Ya que necesito esa ruta para mandarla a un método por cualquier forma que se pueda ya sea por medio de saveDialog o por el pictureBox.

Saludos y gracias.

Hola

Puede que ya hayas leido esto, pero puede que no, te dejo algunos links que puede que te sirvan.

https://msdn.microsoft.com/en-us/library/dn771552.aspx

https://visualstudiogallery.msdn.microsoft.com/d486edc5-aae3-4ad9-84c1-578efc0a32ed

El tema es muy parecido a lo que preguntas tú, puedes echarle un ojo si te interesa.
http://www.vbforums.com/showthread.php?714407-VB-net-for-Android

http://www.mono-project.com/

Saludos.

Funciono también solo que primero hay que llenar el listview y después ejecutar el evento, si no muestra un error algo como esto Index was out of range.

Pero sirvió por medio de llaves.

Gracias sé que no eres un Guru de Telerik. (Aunque no lo creo)

Pero cualquier idea de cómo tratar de hacerlo se agradece enormemente

Muchas gracias de nuevo Eleкtro

Disculpa las molestias.

Saludos.

PD: uso un DateTable para no traer el nombre de las columnas de la BD pero funciona tambien por medio de llaves. : )))

Hola de hecho probé el findKey de ese método

Parecido a lo que a lo del otro post como mencionas

Pero en lo que me fije que cuando se agrega el item al listview se le agrega la llave, y en este caso muestro los datos en el listview con un Query a la BD no sé si aun así se le puede asignar una llave a los item del listview eso me confundió un poco, pero claro que lo probé por que hace la búsqueda y compara si existe o no, así que es casi lo mismo que mencionas.

Que seria esta parte:

Donde le agregas la llave al campo articulo.

ElseIf Me.lvListaPedidos.FindItemByKey(key:=articulo.ToLower, searchVisibleItems:=True) IsNot Nothing Then
            RadMessageBox.Show("El articulo ya existe en la lista.", "", MessageBoxButtons.OK, RadMessageIcon.Error)
 
 Else
            Dim lvItem As New ListViewDataItem(text:="", values:={articulo, cantidad, total}) With
        {.Key = articulo.ToLower}
            Me.lvListaPedidos.Items.Add(lvItem)
End If
 

En el caso de la busqueda deberia de asignar una llave por cada item a la columna no??
Oh antes de cargar los datos le asigno la llave?

Corrigeme si estoy mal en algo por favor.

Saludos.