主题：请教降序问题

既然是查询, 规格 客户 就是查询条件了

此主题相关图片如下：qq截图20121104205004.png

Dim Kh,Gg As String
Kh=e.Form.Controls("TextBox1").text
Gg=e.Form.Controls("TextBox2").text

Dim Filter1 As String
Filter1="[规格] =  '" & kh & "' And 客户 = '" & Gg  & "'"
Dim dr As DataRow
    dr = DataTables("订单明细").Find(Filter1,"日期 DESC")
    If dr IsNot Nothing Then
       e.Form.Controls("TextBox3").text= dr("单价")
    End If