Visual Basic.NET - Obtener Promedio de un GridView

E intentado varios codigos diferentes pero ningun me resulta el .Value enves del .text no me funciona porque no pertenece a Table Cell

espero que me puedan ayudar con alguna sugerencia quedo al pendiente.



Gracias

No entiendo por qué haces un For Each en las filas del DGV si al final solo utilizas la última fila (la variable 'row' no se está usando)...

Entonces que podría hacer?

Hola Oscar, por empezar .Text no forma parte de los miembros de Cells en un datagridview, asi que la primera correccion...
El codigo, debería acumular en algun lado los valores para luego hacer el promedio, te paso un ejemplo:


Ese código funcionaría si en la columna 12 de tu tabla, no hay valores nulos y son valores numéricos, sino deberías hacer una comprobación.
Sugerencia, no utilizar copiar-pegar, asi llegas a entender el código.

Cualquier otra duda, pregunta.
Saludos y +Bytes.

Entendido pero no tengo datagridviewrow

asi que el .value no me funciona

ahora lo estoy intentando hacer por medio de un Datatable
Dim DsTrafico As DataSet = New DataSet
Dim Trafico As DataTable = New DataTable
Dim cnx As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("SIRConnectionString").ConnectionString)
Dim cmd As SqlCommand = New SqlCommand(strSQL, cnx)
Dim adapter As SqlDataAdapter = New SqlDataAdapter
Dim adapter1 As SqlDataAdapter = New SqlDataAdapter
Dim selectCMD As SqlCommand = New SqlCommand(strSQL, cnx)
Dim nuevo As SqlCommand = New SqlCommand(strSQL1, cnx)

adapter.SelectCommand = selectCMD
adapter1.SelectCommand = selectCMD
'lleno la tabla en memoria de Documentos
adapter.Fill(DsTrafico, "Trafico")
adapter1.Fill(Trafico)
DsTrafico.Tables.Add(Trafico)
If DsTrafico.Tables("Trafico").Rows.Count > 0 Then
Me.GridTrafico.DataSource = DsTrafico.Tables("Trafico")
Me.GridTrafico.DataBind()
Me.MultiView1.ActiveViewIndex = 0
Me.lbl_indicador.Text = 1

Else
Me.GridTrafico.DataSource = Nothing
Me.GridTrafico.DataBind()
End If



Dim suma1 As Integer = 0
For Each dr As DataRow In Trafico.Rows
suma1 += Convert.ToInt32(dr("DiasEjecutivo"))
TextBoxAvg.Text = suma1
Next


Saludos.

Tambien consegui este metodo pero me dan una suma mayor a la que me da el query en sql


Dim sumObject As Object
sumObject = Trafico.Compute("Sum(DiasEjecutivo)", "")
TextBoxAvg.Text = sumObject

esta algo extraño

Ya lo verifique el código esta bien la consulta es la que esta mal.