标题：代码首次运行 和第二次运行的结果不一样

运行表“明细账”中的窗口“应付账款明细账”，点击“按业务员”按钮，双击选中一名业务员，数据不正确。若再次点击“按业务员”按钮，双击选中一名业务员，数据正确，以后若干次都是正确的。

为什么打开窗口，第一次结果不正确，以后结果都正确。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目21.rar

楼主你已经掌握了一点点基本的分析技巧，但是还不够，你知道在后面来个MessageBox.Show(vars("业务员"))来显示变量的值，为什么不在前面也来个呢？

按下面这样设置，可以看出目录树窗口关闭后，变量是有值的，执行完红色的代码后，变量的值是空的。

为什么执行完红色的代码，变量的值是空的，因为textbox1已经绑定到变量了，红色代码将textbox1的值设置为""，变量的值自然就为空了。

这是代码逻辑问题，你重新整理一下思路吧。

vars("业务员")=""
vars("单位名称")=""
Forms("明细账_业务员").open()
MessageBox.Show("1:" & vars("业务员"))
Dim s As String=e.Form.controls("cb2").text
If e.form.controls("textbox1").text<>""
    e.form.controls("textbox1").text=""
End If
If e.form.controls("textbox2").text<>""
    e.form.controls("textbox2").text=""
End If
e.form.controls("textbox1").ReadOnly = BooleanEnum.True '锁定
e.form.controls("textbox2").ReadOnly = BooleanEnum.False '解锁
MessageBox.Show("2:" & vars("业务员"))

原因是找到了，但解决方案还是想不出来。

结果就是“运行窗口，第一次选中业务员会出来数据。”，求解。

这个问题，怎么解决呀？

我的问题就是，如何解决打开窗口后首次选择业务员不出现数据的问题。

呵呵，我都不明白你遇到了啥问题，怎么分析啊。

你得用简单明了的例子，让大家明白你得问题。