以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 问个遍历问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=31008) |
||||
-- 作者:lsfdf -- 发布时间:2013/4/8 16:45:00 -- 问个遍历问题 遍历后,打开1个窗口填入1个信息,然后点打印,关闭该窗口,进入下一个循环,现在只能执行1个,请教下是什么原因呢
|
||||
-- 作者:Bin -- 发布时间:2013/4/8 16:49:00 -- 并非只是执行了一个.而是都执行了.只不过你窗口已经打开了.他继续瞬间执行了.多次OPen你感觉不出来. [此贴子已经被作者于2013-4-8 16:50:24编辑过]
|
||||
-- 作者:lsfdf -- 发布时间:2013/4/8 16:55:00 -- 如何暂停下等待客户操作才进行下一次呢 |
||||
-- 作者:lsfdf -- 发布时间:2013/4/8 23:22:00 -- 设置了全局变量,还是不行,只循环了1次,就退出,这个该如何写呢 Dim hs() As String = {"a","b","c","d"} For Each h As String In hs MessageBox.show(h) Tables("表a").Filter = "[第一列] = \'" & h & "\'" Forms("窗口2").open() If pause = True Return End If Next |