在你的数据库里建一个表test.里面分别建一些不同数据类型的列.
DB为一数据访问类.
Dim sda As SqlDataAdapter = db.GetSqlDataAdapter("select * from test ")
        Dim dt As New DataTable
        Dim dc As DataColumn
        sda.FillSchema(dt, SchemaType.Source)
        Dim reader As SqlClient.SqlDataReader = db.GetDataReader("select * from test")        For n As Integer = 0 To reader.FieldCount - 1
            For Each dc In dt.Columns
                If dc.ColumnName.ToLower = reader.GetName(n) Then                    Response.Write(" 数据列  " + dc.ColumnName + " 数据类型为" + reader.GetDataTypeName(n) + "   ,对应c#中的数据类型为" + dc.DataType.ToString() + "<br>")                End If
            Next
        Next        reader.Close()