vb+access统计设备故障率
我有张表，表名：设备；字段：日期 设备名称 故障时间（分钟）
2012-12-1 ABB 50
2012-12-1 ABC 35
2012-12-1 BCA 29
2012-12-1 AAC 60
2012-12-3 ABB 45
2012-12-2 ABB 50
2012-12-3 ABC 60
2012-12-2 BCA 65
想求各设备平均每天故障时间占生产时间的百分比。每天正常生产8小时，例：ABB每天占比为：
（50+45+50）/8（小时）/60（分钟）/3（天数）。
根据日期控件（DTPICKER2和DTPICKER1）进行选择查询统计，我的查询语句是：
dim a as integer
a =val(DTPICKER2.VALUE-DPPICKER1.VALUE)
sql="select 设备名称,sum(故障时间)as 总DT,sum(故障时间)/8/60/a as 设备故障率 from 设备 where 日期 between #" & Str(DTPicker1) & "# and #" & Str(DTPicker2) & "#"
结果提示至少一个参数没有赋值，是天数变量a的问题，将a去掉可以正常查询。请教高手帮忙解答如何才能利用这个天数a进行统计查询，TKS，很急！！！上面只写了关键的查询语句，连接数据库的没有写出。 --------------------编程问答-------------------- sql = "select 设备名称,sum(故障时间)as 总DT,sum(故障时间)/8/60/" & a & " as 设备故障率 from 设备 where 日期 between #" & Str(DTPicker1) & "# and #" & Str(DTPicker2) & "#" --------------------编程问答-------------------- dim a as Long
a = (DTPICKER2.VALUE - DPPICKER1.VALUE + 1) * 4800
sql = "select 设备名称, sum(故障时间)as 总DT, sum(故障时间)/" & a & " as 设备故障率 from 设备 where 日期 between #" & Format(DTPicker1, yyyy-mm-dd") & "# and #" & Format(DTPicker2, "yyyy-mm-dd") & "#" --------------------编程问答-------------------- 谢谢高手们的解答，已经完全可以解决问题。 --------------------编程问答-------------------- 还有个问题需要高手帮忙解答的。
我的电脑系统是windows xp繁体版，在电脑上安装了一个VB6.0的繁体企业版，在窗体设计的控件上输入任何汉字不能正常显示，显示为乱码，可以输入数字和英文字母，从其它地方粘贴的汉字也能正常显示。请问应该如何解决此类问题？是否是VB6.0版本也问题和电脑字体不兼容造成的？text控件上就不能输入汉字正常显示。 --------------------编程问答-------------------- 安装VB6 SP6试试看。在控制面板-区域选项，设置为非Unicode程序使用默认编码，设置为简体中文。
补充：VB , 数据库(包含打印，安装，报表)
