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编辑过]
加好友 
发短信
Post By：2022/11/18 9:58:00 [只看该作者]
