SQL database not getting updated by vb.net command from datagridview

See more:

VB

I am using following command to update sql database from datagridview but the database is not updated. and their is no error. pls help.. thanks in advance

Dim update As New SqlCommand("Update FAGR SET FAGRN=@FAGRN,FAGRU=@FAGRU WHERE FAGRC=@FAGRC", connection)

update.Parameters.Add(New SqlParameter("@FAGRC", SqlDbType.NChar, 3))
update.Parameters.Add(New SqlParameter("@FAGRN", SqlDbType.NVarChar, 50))
update.Parameters.Add(New SqlParameter("@FAGRU", SqlDbType.NChar, 3))

Dim i As Integer
i = 0
Do While i < DataGridView1.Rows.Count
Try
update.Parameters(0).Value = DataGridView1.Rows(i).Cells(0).ToString
update.Parameters(1).Value = DataGridView1.Rows(i).Cells(1).ToString
update.Parameters(2).Value = DataGridView1.Rows(i).Cells(2).ToString
vartemp1 = update.ExecuteNonQuery()

Catch ex As Exception
MsgBox("Exception:" & vbCrLf & ex.Message)
Finally
Me.Close()
End Try
Loop