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

Tho*_*ian 1 vba lotusscript list lotus-domino

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

表格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
Run Code Online (Sandbox Code Playgroud)

如果使用"列表"不可能,我需要另一个解决方案

谢谢

托马斯

Knu*_*ann 6

写吧

frmList(frm) =  frmList(frm) + 1 
Run Code Online (Sandbox Code Playgroud)

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