他告诉我说“编译错误,缺少case"这是怎么回事啊?

解决方案 »

  1.   

    "Select sum (应负总金额) as 统计总额 from 广告数据 where 付款时间 >= #" & CDate(qdate) & "#  and 付款时间 <= #" & CDate(zdate) & "# 
    这样也不行啊~~~怎么版阿
      

  2.   

    直接用“Select sum (应负总金额) as 统计总额 from 广告数据 where 付款时间 between #" & CDate(qdate) & "#  and #" & CDate(zdate) & "#"”就可以了,我已经调试通过了
      

  3.   

    你用的的ADO代码还是数据绑定。不是直接写这个吧。
    例:
    dim sql as string 
    sql=你的查询语句
    rst.open sql,你的连接,……
    这样才行。根据你的错误提示,好象是这样的。
      

  4.   

    我用的是DATA控件阿,那我应该怎么写代码呢?
      

  5.   

    是写在同一行阿~~~~在“SELECT.....”前面用加上什么吗?
      

  6.   

    用data控件这样写可以吗?
    Data1.RecordSource = "Select Sum(应负总金额) as 统计总额 from 广告数据 where 付款时间 between #" & CDate(qdate) & "#  and #" & CDate(zdate) & "#"
      

  7.   

    Data1.RecordSource = "select * from 广告数据 where 付款时间 >= #" & CDate(qdate) & "# and 付款时间 <=#" & CDate(zdate) & "#"
    Data1.Refresh
    'Data1.Recordset.MoveFirst
    If Not Data1.Recordset.EOF Then
    Data1.RecordSource = "Select Sum(应负总金额) as (统计总额)from 广告数据 where 付款时间 between #" & CDate(qdate) & "#  and #" & CDate(zdate) & "#"
    'Data1.RecordSource = "统计总额"
    showsub.Text = Data1.Recordset("统计总额")
    c = c + 1
    End If
    If c = 0 Then
    MsgBox "无法统计该范围的交易额款"
    End If
    End Sub
    上面的代码对吗?
      

  8.   

    Data1.RecordSource = "Select Sum([应负总金额]) as [统计总额] from [广告数据] where [付款时间] between #" & CDate(qdate) & "#  and #" & CDate(zdate) & "#"
    Data1.Refresh
    .....