如果在对任何文档进行更改后无法正确阅读
If else not read properly after changes made to any document
我在表单中有一个按钮,我正在使用 If else 检查是否在视图中的文档列表中,"IF" 任何状态为 "Lock" 的文档,我将提示消息框 "Complete PC Inspection First!"。所以
首先,点击按钮后,输入代码 运行,一切正常。然后我尝试在不做任何更改的情况下再次单击该按钮,它将提示消息框。
但是当我在任何文档中进行更改并将状态更改为其他文档时,例如 "Active",然后我返回表单并单击按钮,它没有提示消息,但它跳过了第一个如果并继续进行其他。
下面是我的代码:
If doc.PStatus(0) = "Lock" Then
Msgbox "Complete PC Inspection first!"
Exit Sub
Else
answer% = Messagebox("Do you confirm with this infomation?", 4,"Batch Number")
Some code...
...
End If
我想要做的是,如果视图中的任何文档中仍有 "Lock" 状态,则按钮将不会继续 "else"。当视图中没有 "Lock" 状态时,它将继续 "else"。任何帮助将不胜感激。谢谢!
最好使用包含所有锁定文档的视图,按 PC 键左右排序。或者使用按键和状态排序的视图,这样您就可以挑选出特定 PC 的所有锁定文档。如果没有,GetDocumentByKey 将 return Nothing。
我在表单中有一个按钮,我正在使用 If else 检查是否在视图中的文档列表中,"IF" 任何状态为 "Lock" 的文档,我将提示消息框 "Complete PC Inspection First!"。所以
首先,点击按钮后,输入代码 运行,一切正常。然后我尝试在不做任何更改的情况下再次单击该按钮,它将提示消息框。
但是当我在任何文档中进行更改并将状态更改为其他文档时,例如 "Active",然后我返回表单并单击按钮,它没有提示消息,但它跳过了第一个如果并继续进行其他。
下面是我的代码:
If doc.PStatus(0) = "Lock" Then
Msgbox "Complete PC Inspection first!"
Exit Sub
Else
answer% = Messagebox("Do you confirm with this infomation?", 4,"Batch Number")
Some code...
...
End If
我想要做的是,如果视图中的任何文档中仍有 "Lock" 状态,则按钮将不会继续 "else"。当视图中没有 "Lock" 状态时,它将继续 "else"。任何帮助将不胜感激。谢谢!
最好使用包含所有锁定文档的视图,按 PC 键左右排序。或者使用按键和状态排序的视图,这样您就可以挑选出特定 PC 的所有锁定文档。如果没有,GetDocumentByKey 将 return Nothing。