[VB.NET]如何获取某个字段 数据的种类(ADO.NET+ACCESS)

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
如何获取某个字段 数据的种类(ADO.NET+ACCESS)
普通的ACCESS数据库表格，用ADO.net读写操作

数据已经读入到DataSet中
想统计某个字段中，所有数据的种类，并且把这些种类的值找出来，放到数组中；

应该如何处理？

例：

[ 某Table ]

某字段名（以下为值）
1
1
2
2
2
3

统计结果应该是: 一共三类数据，数据值分别是1，2，3

有没有不需要遍历，直接用表操作的方法完成？
此外，数据已经读入，不在数据库中了

请高手教，谢谢先~~~
__________________________________________________________________________
SELECT DISTINCT 某字段名
FROM 某Table
__________________________________________________________________________
谢ls，但是数据已经在内存中了，在DataSet中
并且不想再读取原始数据库

如何在DataSet中做相应操作？？？
__________________________________________________________________________
http://www.cnblogs.com/jiezhi/archive/2006/12/25/86838.html

这个里面有你要的，不过C#，你可以试着换成vb
__________________________________________________________________________
不用翻译了就用这个吧
Public Function SelectDistinct(ByVal TableName As String, _
ByVal SourceTable As DataTable, _
ByVal FieldName As String) As DataTable
Dim dt As New DataTable(TableName)
dt.Columns.Add(FieldName, SourceTable.Columns(FieldName).DataType)
Dim dr As DataRow, LastValue As Object
For Each dr In SourceTable.Select( , FieldName)
If LastValue Is Nothing OrElse Not ColumnEqual(LastValue, dr(FieldName)) Then
LastValue = dr(FieldName)
dt.Rows.Add(New Object() {LastValue})
End If
Next
If Not ds Is Nothing Then ds.Tables.Add(dt)
Return dt
End Function

http://support.microsoft.com/kb/325684/zh-cn
__________________________________________________________________________