[求助]这个代码哪错了 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

代码前面加上e.Cancel = True，试试

Dim dr As Row = e.Row

e.Cancel = True

Forms("目录窗口").open()

If forms("目录窗口").opened Then

forms("目录窗口").controls("Label2").text=dr("ajdjh")

End If

Forms("一般程序管理").open()

If forms("一般程序管理").opened Then

forms("一般程序管理").controls("ComboBox1").text=dr("jbxx_zfry1")

forms("一般程序管理").controls("Label8").text=dr("jbxx_zfzh1")

forms("一般程序管理").controls("ComboBox2").text=dr("jbxx_zfry2")

forms("一般程序管理").controls("Label9").text=dr("jbxx_zfzh2")

End If

主题：[求助]这个代码哪错了