Here solution is
For i = 0 To MsGrid.Rows.Count - 1
If MsGrid.Rows(i).Cells(4).Value = True Then
MsGrid.Rows(i).Cells(4).Value = "الملحقات"
Else
MsGrid.Rows(i).Cells(4).Value = "جهاز"
End If
Next
Mark as solution, if this material helps you in any way...