这句代码麻烦大家看一下有什么问题

  days = DateDiff("d", Year(Date) & "-" & Me.commonth.Text & "-1", _
                            Year(Date) & "-" & Me.commonth.Text + 1 & "-1") --------------------编程问答-------------------- 代码没有问题，只要你窗体上有个叫commonth的文本框即可，就是结帖率有点低，不是一般的底

补充：VB ,  基础类