Не можете да картографирате колони към данни . Това, което трябва да добавите, са данните от клетките на реда на този индекс на колона
Това е грешно grdFamily.Columns(0)
Присвояването на параметри в рамките на цикъла for трябва да се коригира, както следва
ЗАБЕЛЕЖКА Моля, променете типа данни според вашата таблица.
adapFam.InsertCommand.Parameters.Add("@ID", SqlDbType.Int)
adapFam.InsertCommand.Parameters.Add("@Name", SqlDbType.VarChar)
adapFam.InsertCommand.Parameters.Add("@Age", SqlDbType.VarChar)
adapFam.InsertCommand.Parameters.Add("@Rel", SqlDbType.VarChar)
adapFam.InsertCommand.Parameters.Add("@Occ", SqlDbType.VarChar)
For i As Integer = 0 To grdFamily.Rows.Count - 1
adapFam.InsertCommand.Parameters[0].Value = Convert.ToInt32(txtEmpID.Text.Trim)
adapFam.InsertCommand.Parameters[1].Value = grdFamily.Rows[i].Cells[0].Value
adapFam.InsertCommand.Parameters[2].Value = grdFamily.Rows[i].Cells[1].Value
adapFam.InsertCommand.Parameters[3].Value = grdFamily.Rows[i].Cells[2].Value
adapFam.InsertCommand.Parameters[4].Value = grdFamily.Rows[i].Cells[3].Value
result2 = adapFam.InsertCommand.ExecuteNonQuery()
Next