主题：全局变量出错

Public Function ASC(ByVal s1 As String, ByVal s2 As Integer, ByVal s3 As Integer, ByVal s4 As String) As Double

Dim d5 As New Date(s2, s3, Date.DaysInMonth(s2, s3)) '获取本月的最后一天
MessageBox.Show(d5)
Dim d6 As New Date(s2 - 1, 12, 31) '获取上年最后一天  
MessageBox.Show(d6）

 

 

读取EXCEL表单元格值时出错，ASC(1001,2022,03,期未数）

 

.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2022.8.18.1
错误所在事件：窗口,自定义报表,Button1,Click
详细错误信息：
年、月和日参数描述无法表示的 DateTime。

 

单独建一个项目测试又可以，不知是哪出错了

都测试过，都是可以显示出来

真的不知哪里出错了，用加减年月日都可以，就是这个不行

 

Public Function ASC(ByVal s1 As String, ByVal s2 As Integer, ByVal s3 As Integer, ByVal s4 As String) As Double

MessageBox.Show(s2 )

MessageBox.Show(s3)

Dim d5 As New Date(s2, s3, Date.DaysInMonth(s2, s3)) '获取本月的最后一天
MessageBox.Show(d5)

不能

昨晚测了一晚都只弹出MessageBox.Show(d3)

后就弹出出错窗口

应该项是这句有问题

最后实在没有办法就采用了加减年月日法，这样就可以了

但是这句错在哪里查不出来

这个是测试前面的几个值的提示，就是到了求当月最后一日，或上月最后一日就出错