Dim dtb As New DataTable
 
 With dtb
    .Columns.Add("Computer", GetType(String))
    .Columns.Add("RAM", GetType(Integer))
 
    .Rows.Add("Zewa", 5)
    .Rows.Add("Kleenex", 1)
    .Rows.Add("Tempo", 2)
    .Rows.Add("Softies", 4)
End With
 
DataGridView1.DataSource = dtb
 
With DataGridView1
   For i As Integer = 0 To .Rows.Count - 1
       If CType(.Rows(i).Cells("RAM").Value, Integer) <= 2 Then
          .Rows(i).Cells("RAM").Style.BackColor = Color.Red
       End If
   Next i
End With