| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 全局变量出错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184200) |
| -- 作者：zhuxinhui -- 发布时间：2022/11/28 11:51:00 -- 全局变量出错 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)) \'获取本月的最后一天
读取EXCEL表单元格值时出错，ASC(1001,2022,03,期未数）
.NET Framework 版本：4.0.30319.42000
单独建一个项目测试又可以，不知是哪出错了 |
| -- 作者：有点蓝 -- 发布时间：2022/11/28 11:59:00 -- 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)) \'获取本月的最后一天 |
| -- 作者：zhuxinhui -- 发布时间：2022/11/28 12:02:00 -- 都测试过，都是可以显示出来 |
| -- 作者：有点蓝 -- 发布时间：2022/11/28 12:07:00 -- 调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm，看哪一句代码出错 |
| -- 作者：zhuxinhui -- 发布时间：2022/11/29 10:02:00 -- 真的不知哪里出错了，用加减年月日都可以，就是这个不行
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)) \'获取本月的最后一天 |
| -- 作者：有点蓝 -- 发布时间：2022/11/29 10:10:00 -- 出错的时候下面代码弹出什么内容？ MessageBox.Show(s2 )
MessageBox.Show(s3) 出错的时候MessageBox.Show(d5)能不能弹出来？ |
| -- 作者：zhuxinhui -- 发布时间：2022/11/29 10:34:00 -- 不能 昨晚测了一晚都只弹出MessageBox.Show(d3) 后就弹出出错窗口 应该项是这句有问题 最后实在没有办法就采用了加减年月日法，这样就可以了 但是这句错在哪里查不出来 |
| -- 作者：有点蓝 -- 发布时间：2022/11/29 11:13:00 -- MessageBox.Show(d3)在哪里？和上面的代码有什么关系？ |
| -- 作者：zhuxinhui -- 发布时间：2022/11/29 16:06:00 -- 这个是测试前面的几个值的提示，就是到了求当月最后一日，或上月最后一日就出错 |
| -- 作者：有点蓝 -- 发布时间：2022/11/29 16:15:00 -- 麻烦把所有代码贴出来，然后说明调试到哪一句代码出错 |