VB 怎样对ACCESS数据库排序

1、select * from table order by 字段 desc

这是按此字段的降序排.

2、select * from table order by 字段 asc

这是按升序排.

3、举个例子：

Public Sub SortX()

Dim cnn As New ADODB.Connection

Dim rst As New ADODB.Recordset

rst.CursorLocation = adUseClient

cnn.Open "DSN=PubsProvider=MSDASQLuid=sapwd="

rst.Open "SELECT * FROM Authors", cnn, _

adOpenStatic, adLockReadOnly, adCmdText

SortXprint "Initial Order", rst

rst.Sort = "au_lname ASC, au_fname ASC"

SortXprint "Last Name Ascending", rst

rst.Sort = "au_lname DESC, au_fname ASC"

SortXprint "Last Name Descending", rst

rst.Close

cnn.Close

End Sub

再将rst写入新表,删除原表,将新表定为原表名即可

实际上用什么编程语言没有太大关系,不管你是VB还是VC还是delphi,按字段排序是属于数据库sql语法的问题,所以只要用sql语句

select

*

from

数据库表

order

by

排序字段

desc

其中desc为降序

asc为升序

让access数据库中的记录排序，理所当所该在vb代码中写sql的语句，因为添加数据时是无序的，添加数据到access数据后，access数据库是不会自动排序的，只有用vb等编程语言在调用数据库数据时用sql语句进行排序，然后显示出来!

---