主题：怪事！求助

开发版用户。今天对开发的一个系统做更改。其中有几句代码放到窗口作为单击事件触发时，无法运行。真是奇了怪了！

代码应该没有问题（将这几句代码复制到命令窗口，运行正常）。

代码很简单：

Dim txl As String
If InputValue(txl, "请输入!", "请输入要删除的通讯录:") Then
DataTables("任务").DeleteFor("[通讯录名称] ='"& txl &"'")
End If

请高手帮忙！

刚才又试了一下，就是把中间的一句代码删掉，也无法运行.

Dim txl As String
If InputValue(txl, "请输入!", "请输入要删除的通讯录:") Then
End If

应该是InputValue(txl, "请输入!", "请输入要删除的通讯录:") 这里出问题，因为对话框根本就没有出现，程序像是进入了死循环，退出都不行。

正版软件。我联系客服吧。

刚才又做了试验：

在另外一个窗口建立一个完全一样的按钮,这段代码可以正常运行！

也就是说在A窗口不能运行，在B窗口可以运行。

难道和窗口的属性有关？或者是窗口本身的其它东东有关？

没有此类语句

找到问题了。

原来是窗口属性的问题！

独立窗口属性->位置->最顶层->FALSE!! OK!!!(初始位置CenterScreen)

为什么会这样呢？请高手解释解释，我们也学习学习。