主题：[求助]　这个事件代码如何设置？

if e.datacol.name = "年" orelse e.datacol.name = "月" orelse e.datacol.name = "日" then
   e.datarow("日期")=e.datarow("年")&"-"&e.datarow("月")&"-"&e.datarow("日")
end if

在datachanged 事件中，我设置了上述代码。

年、月、日这三列的数据总是同时更新的，所以我设置为　orelse 

但是，执行总是出错：“2009－－”类型错，不能 记入日期列中。


后来，我设置为了　and

但是，执行以后，日期列为空值，不能触发事件！

请教各们如果计算“日期”列啊？

年、月、日　是从其他数据库中查询追加进来的。

设置一下转换？

试试！

这个问题解决了，但是在datachanged事件中，还有这样一段代码：

if  e.datacol.name = "账套编号" orelse  e.datacol.name = "年"  orelse  e.datacol.name = "月" orelse  e.datacol.name = "日" orelse e.datacol.name = "凭证类型" orelse  e.datacol.name = "凭证编号" orelse  e.datacol.name = "附件张数" then
    dim bm as string = e.datarow("凭证编号").tostring()
    e.datarow("关联") = e.datarow("账套编号")&" "&e.datarow("年")&"年"&e.datarow("月")&"月"&e.datarow("日")&"日"&e.datarow("凭证类型")&bm.PadLeft(4," ")&"号 附件"&e.datarow("附件张数")
end if

这段代码的意思是，当"账套编号"、"年"等等列的内容发生变化时，就更新"关联"列的内容，其中 "凭证编号"转换了一下类型。

执行以后就出现这样的错误提示：


此主题相关图片如下：未命名.jpg



我是一段一段地测试代码的，可以确定就是这一段出错了。

已试过了，还是出相同的错误！

外部数据库，不好办！

我再定了一下位，是这句代码有错：

dim bm as string = e.datarow("凭证编号").tostring()

或者是：bm.PadLeft(4," "）

这两句的意思是：将"凭证编号"　　1、2、3等等，格式化为0001、0002、0003，

然后再加入到　　e.datarow("关联")　　中去！

我上面搞错了，是要搞成4个空格，

Format(bm,"    ")

这样可以吧！

试试!

我改为：Format(bm,"    ")，试了一下，不出错了，但是无法实现4个空格的目的！

这是执行以后“关联”列的结果：
2009年4月1日14号 附件8

我想要的是：
2009年4月1日  14号 附件8