主题：[求助]克隆含表达式行出错

工资表中有一表达式列， [医疗保险] = [医疗基数] * 0.02 + 3，利用

For Each dr1 As DataRow In DataTables("工资表").Select("[月份]=MAX([月份])")
   Dim dr2 As DataRow = DataTables("工资表").AddNew()
   For Each dc As DataCol In DataTables("工资表").DataCols
           dr2(dc.name) = dr1(dc.name)
    Next

Next

克隆时，提示错误“医疗保险”列为只读。据观察，如果原行数值为空，复制后数值不再是空，而变为“0”。这样的话，对表达式的意义就不同了。

如何修改能避免克隆时出现此问题呢？ 即有数值的克隆下来，空数值的仍然为空。

老师，改完后是不报错了，但如果医疗基数为空时，复制出的行数值仍然是0，医疗保险自然变为3，这样还是不对啊..

IsNull的问题我考虑过，但在这里我觉得不能用啊，比如某个人没上保险，医疗基数不能为0，否则就扣医疗保险3元了.

现在问题就出在，原先是空值的复制后不再是空值而变成0了，对后面的表达式造成了影响。、

不知我理解的对不对

  谢谢！做笔记了...

之前我还有个问题没有搞妥，月份列如何改成“2012－02”这种格式，然后在克隆时月份自动递增到下个月

帮助文档中Drawcell事件的例子很少啊，基本都是和单元格颜色有关的，不知从何下手

这样虽然显示的是1111－11，但输入日期的时候还必须输全了1111-11-11

我的意思不是想输入日期，只是月份。是不是该列就不能设为“日期时间”类型了？

因为工资表都是按月份的，不会涉及到某日的数据。那我还是将月份设为数值型吧。谢啦~