以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  月份发二位数导出  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=183897)

--  作者：nbsugu_z --  发布时间：2022/11/18 9:58:00 --  月份发二位数导出 zn = Tables("wy_gt").Compute("Max(yy)") \'提取当月库最大的年份 dn = Tables("wy_gt0").Compute("Max(yy)") \'提取当月最大年份中的最大月份 dy = Tables("wy_gt0").Compute("Max(yy1)", "yy=" & dn) \'年份 + 月份以整数计算 Dim dny As Integer = zn & zy \'年份+月份以整数计算 老师，以上代码是正常的。如果是2022年10月份。变量dny结果是202210                                   如果是2022的9月份，变量dny结果是20229，这样少了一位。如何月份用二位数表示，使得这是值为202209？  上面的yy和yy1是整数型字段，用4位长度和2位长度输入的 ，比如 2022  01     2022  02...... 2022   12 [此贴子已经被作者于2022/11/18 10:07:18编辑过]

--  作者：有点蓝 --  发布时间：2022/11/18 10:12:00 --   http://www.foxtable.com/webhelp/topics/0361.htm Dim dny As Integer = zn & format(zy,"00")

--  作者：bjljb --  发布时间：2022/11/18 10:15:00 --    Dim dny As String = zn & Format(zy,"00") [此贴子已经被作者于2022/11/18 10:35:01编辑过]