Question

    picklist = w.Pickliststrings (3, 0, server_name, nfs_name, "vwaDoc", "Docs", "Select", 1, "")

    If Not Isarray(picklist) Then Exit Sub

    Set doc_new = db_colector.GetDocumentByUNID (Cstr (picklist (0)))

上面的视图列出了第一列 - 分类了一些文档。来自不同的两种形式。

我想按下选项列表中的OK按钮后才能获得一个文档。从，formA开始。

我能够管理以下条件：

If doc_new.Form(0) = "fmB" Then 'form B => Not
            Msgbox "Bla bla bla, wrong document ", 32, "Atention"
            Goto et

Else

但是如果用户正在选择分类部分（第一列没有表格）会怎么样？

我试过这样的事情：

If doc_new.Form(0) Is Nothing Then 
            Msgbox "no doc.", 32, "Atentie"
            Goto et
End if

感谢您的时间！

Answer 1

使用

If doc_new Is Nothing then

将显示未选择文档（和类别）

Lotus Notes：从选项列表中查看选择

1 个答案: