Postada em 08/08/2018 14:41 hs
Boa tarde pessoal, estou com uma dificuldade da seguinte forma.
Tenho um datagriview e a primeira coluna tem um checkbox.
Gostaria que assim que eu clicar no checkbox para deixar ele true ja somar o valor de uma coluna x em um TextBox. qual evento melhor a usar para chamar esta função?
tenho essa sub aqui:
Sub calcula()
Dim total, pedidos, frete As Decimal
total = 0
pedidos = 0
frete = 0
TextBox1.Text = total
TextBoxXP8.Text = pedidos
TextBoxXP7.Text = frete
For i = 0 To dg_pedidos_liberar.Rows.Count - 1
If dg_pedidos_liberar.Rows(i).Cells(0).Value IsNot DBNull.Value Then
If CType(dg_pedidos_liberar.Item(0, i).Value, Boolean) = True Then
pedidos += 1
total += dg_pedidos_liberar.Item(8, i).Value
TextBox1.Text = total.ToString("N")
TextBox1.Refresh()
TextBoxXP8.Text = pedidos
TextBoxXP8.Refresh()
frete += CDec(dg_pedidos_liberar.Rows(i).Cells("VLfrete").Value.ToString) * 100
TextBoxXP7.Text += frete
TextBoxXP7.Refresh()
End If
End If
Next
TextBox1.Refresh()
TextBoxXP8.Refresh()
End Sub
ja tentei colocar isso no evento do datagrid CellContentClick.
desde ja agradeço a atenção.
|
