“月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → “月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现

共有2385人关注过本帖树形打印复制链接主题：“月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现

约翰舒

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：226 积分：1796 威望：0 精华：0 注册：2016/8/3 15:11:00

“月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现 发帖心情

Post By：2016/9/1 18:14:00 [显示全部帖子]

Select Case e.DataCol.Name

Case "起始日","月","天"

If e.DataRow.IsNull("起始日") Then

e.DataRow("到期日") = Nothing

Else

e.DataRow("到期日") = e.DataRow("起始日").AddMonths(e.DataRow("月")).AddDays(e.DataRow("天"))

End If

End Select

这是日期计算代码，我想问的是：

当“月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现，当“月”、“天”列输入字符时，代码能正常运行

约翰舒

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：226 积分：1796 威望：0 精华：0 注册：2016/8/3 15:11:00

Post By：2016/9/1 18:31:00 [显示全部帖子]

那当单独提取出“起始日”的日单独做为一列“号”，而“号”这一列为字符型，怎么办

If e.DataCol.name = "起始日"

e.DataRow("起始日") = e.DataRow("号").Day

End If

这样写提示错误“号”的类型不对

主题：“月”、“天”列为字符型时，这个代码就不能正常运行，怎么样才能实现