如何将多个字段中包含某种特殊名称的字的字段赋予给新字段？

机会成本　发表于：2010-07-05 21:51:18 　

复制

我想通过字段记录事件，（用备注也可以，可是如何归类啊）然后通过查询可以将一类的事件进行归总。请教如何做啊？谢谢！

例如：利用十个字段记录每天重要的十件事情，然后一个月我想利用查询查出关于某事的记录。

如：

ID 事件1 事件2 事件3 事件4 事件5........

1 进苹果100斤进香蕉50斤卖葡萄10斤卖水10瓶

2 卖苹果20斤买葡萄20斤卖冰棍5根

3 卖苹果5斤进苹果50斤

.....

...

如果查询出一个月中关于“苹果”的事件。并进行汇总。

因记录的事件很多，不能够通过固定的字段记录某类事件！

Top

煮江品茶发表于：2010-07-05 22:16:27

以下代码没测试过，你试试看。

dim ctls as controls
dim ctl as control
dim str as string
set ctls=me.子窗体.form.controls
str=false
for each ctl in ctls
    if ctl.controltype<>acLabel then
        if TypeName(ctl.value)=string then
            str=str & " or " ctl.name & " like '*苹果*'"
        end if
    end if
next ctl
me.子窗体.form.filter=str
me.子窗体.form.filteron=true

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

如何将多个字段中包含某种特殊名称的字的字段赋予给新字段？