一个VB程序的几个问题

Question

Brady:
  我给你解答的还不够详细吗？请把你的要求再一次发给我。

Answer 1

日期查询方法可以用SQL进行参数查询，代码如下：
TForm1.Button1Click(Sender : TObject) ;
var 
   date1,date2 : TDate ;
begin
  with Query1 do
  begin
    Close ;
    SQL.Clear ;
    SQL.Add('select * from 表名 where 字段名<=:date1 and 字段名>=:date2') ;
    Prepare ;
    Params[0].AsDate := 日期上限值 ;
    Params[1].AsDate := 日期下限值 ;
    Open ;
  end ;
end ;