作者naphuang (天凉好个秋)
看板Database
标题[SQL ] Access表单搜寻资料的问题
时间Sun Oct 17 23:03:18 2010
我有一个资料表
月份 NSV
201007 20
201007 30
201007 25
201008 36
201008 12
201008 45
201008 87
201009 98
201009 12
201009 65
月份的栏位大小是数字(长整数);NSV的栏位大小也是数字
用表单精灵作一个简易的查询(输入月份後可查询NSV)
并且写一个程式，按了後会执行上述的结果
程式码如下：
Private Sub Command5_Click()
Dim Fx As ADODB.Recordset
Set Fx = New ADODB.Recordset
Fx.Open "销售资料", CurrentProject.Connection, , adLockOptimistic
Dim a As Long
a = 0
Do While Not Fx.EOF
If Fx("月份") = Me.起始月份 Then
a = a + Fx("NSV")
End If
Fx.MoveNext
Loop
Me.NSV = a
End Sub
可是当我输入月份(如201007)的时候，出来的结果是0(正确应该是75)
(输入201008也一样结果是0)
请问一下那边设定有问题呢？
该怎麽修改呢？
谢谢～
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 125.232.85.25