如何使用Lotusscript列表来存储集合中的表单数量?

时间:2017-07-10 07:40:40

标签: vba list lotus-domino lotusscript

我有一组具有不同形式的文档,需要在列表中存储多个文档表单,listtag将是表单名称和该表单中该表单的出现次数的值,如下所示:

Form Main = 20

表格Doc = 10

以下代码是我尝试做的事情的开始,但每次有现有表单的新doc时,我都需要增加元素的值

Dim frmList List As integer
Set ud = newdc.Getfirstdocument()
Do Until ud Is Nothing
            frm = ud.Form(0)
            If(IsElement(frmList(frm))) Then
                frmList(frm) =  1 ' Need to increment this value with 1 if tag exist
            Else
                frmList(frm) = 1 
            End If
            Set ud = newdc.Getnextdocument(ud)  
        Loop

如果使用“列表”无法做到这一点,我需要另一种解决方案

感谢

托马斯

1 个答案:

答案 0 :(得分:6)

只需写下

frmList(frm) =  frmList(frm) + 1 

frmList(frm)为您提供表单的当前编号。只需将其递增1并设置新值即可。