Vb.net 基于某些现有列值向其添加列和值

我已经从datasource检索了这个数据表，我想添加一个更基于列的“类别” 在每个角色的每个值上，例如如果角色列的值为“90 daya client”，则在 同一行的“类别”列中应有一个值“DC”。请让我现在怎么能 请看这个。 我可以创建一个临时dt1表，但需要添加相关值

 S.No     First Name     Last Name           Role             Date
    1   Us er1Name  User1Name   90 Day Client   11/01/2011
    2   User1NameAtt1   User1NameAtt1   90 Day Client   11/01/2011
    3   User4Name   User4Name   Student Client  11/01/2011
    4   User4NameAtt1   User4NameAtt1   Student Client  11/01/2011
    5   user1   user1   90 Day Client   90 Day Client   11/01/2011
    6   att1    att1    Employee        Accountin   11/01/2011
    7   User4NameAtt2   User4NameAtt2   Student Client  11/01/2011
    8   e   ertrt   90 Day Client   Student Client  11/01/2011
    9   User4NameAtt3   User4NameAtt3   Employee    11/01/2011

---

如果使用SQL Server，则可以使用在SQL查询中添加此列。 例如（如果您的表名为

Students

：

SELECT Students.*, Category =
      CASE Role
         WHEN '90 Day Client' THEN 'DC'
         WHEN 'Student Client' THEN 'SC'
         WHEN 'Accountin' THEN 'AC'
         WHEN 'Employee' THEN 'EM'
         ELSE ''
      END
FROM Students