用的是calendar control，只需要按这个日历查数据就可以了。有人指点一下吗 非常感谢
没用过组态王，用过力控，用历史报表控件就好了，组态王不知道怎么用
1.
向页面中添加数据源AccessDataSource。
2.
设置C1EventsCalendar事件存储的DataSourceID属性，如果必要，填充DataMember属性。
3.
让最终用户能编辑事件，生成插入/更新/删除/查询命令。
4.
调用查询命令进行查询操作。
希望可以帮到你
新建工程，
定义8个内存整数变量年、月、日、时、分、秒、星期、周；
定义2个内存字符串变量：日期、时间；
2
制作画面：
新建画面，名为：日历控件。
点击工具箱“插入通用控件”，
选择“Microsoft Date and Time Picker Control 6.0(SP4)”；
如图所示：
3
画出矩形的日历控件，双击控件，命名为：“ADate”。
画出时间日历控件，双击控件，命名为：“ATime”；
选中“ATime”控件，右击选择“控件属性”，
进行“格式”设置，4种格式，
选择“2-dtpTime”，确定。
"ATime"控件由日期变为时间。
4
控件属性介绍：
常用控件属性和事件：
属性：FLOAT型--Day、Month、Year、DayOfWeek（周）、Hour、Minute、Second、
BOOL型--Enableed；
事件：Change（）--在选择时间的时候使用；
CloseUp（）--在选择日期的时候使用；
Enabled属性控制此控件是否允许被使用。
如图所示：
5
控件使用：
在动画连接属性，选择“事件”，双击“CloseUp”事件的关联函数，弹出“控件事件函数编辑框”。
6
函数声明处为函数命名，如“CloseUp()”；
在命令语言编辑框中编写脚本程序，
点击编辑窗口下方“控件”按钮，弹出“控件属性和控件方法”，
在控件名称中选择“ADate”日历控件；
在查看类型中选择“控件属性”；
在属性或方法中选择“Year”。
7
脚本程序分享如下：（请投票）
日期：
string temp;
\本站点\年=ADate.Year;
\本站点\月=ADate.Month;
\本站点\日=ADate.Day;
\本站点\周=ADate.DayOfWeek;
temp=StrFromInt(\本站点\年,10);
if(\本站点\月<10)
temp=temp+"/0"+StrFromInt(\本站点\月,10);//一位数要加零
else
temp=temp+"/"+StrFromInt(\本站点\月,10);
if(\本站点\日<10)
temp=temp+"/0"+StrFromInt(\本站点\日,10);
else
temp=temp+"/"+StrFromInt(\本站点\日,10);
\本站点\日期=temp;
if(\本站点\周==1)
\本站点\星期="星期日";
if(\本站点\周==2)
\本站点\星期="星期一";
if(\本站点\周==3)
\本站点\星期="星期二";
if(\本站点\周==4)
\本站点\星期="星期三";
if(\本站点\周==5)
\本站点\星期="星期四";
if(\本站点\周==6)
\本站点\星期="星期五";
if(\本站点\周==7)
\本站点\星期="星期六";
时间：
string temp;
\本站点\时=ATime.Hour;
\本站点\分=ATime.Minute;
\本站点\秒=ATime.Second;
if(\本站点\时<10)
temp="0"+StrFromInt(\本站点\时,10);//10是十进制的样子；
else
temp=StrFromInt(\本站点\时,10);
if(\本站点\分<10)
temp=temp+":0"+StrFromInt(\本站点\分,10);
else
temp=temp+":"+StrFromInt(\本站点\分,10);
if(\本站点\秒<10)
temp=temp+":0"+StrFromInt(\本站点\秒,10);
else
temp=temp+":"+StrFromInt(\本站点\秒,10);
\本站点\时间=temp;