双击单元格 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

双击窗口副本表的单元格，其DoubleClick代码：

Select Case e.Col.Name

Case "编号"

If Forms("窗口1").opened()

If e.Form.Controls("CheckBox1").Checked =False Then

Dim Str1 As String = e.Row("编号")

clipBoard.SetText(Str1) '把编号内容复制到粘贴板

If e.Row("挂网")=False Then

e.Row("挂网")=True

Else

e.Row("挂网")=False

End If

Else

MessageBox.Show("双击编号锁已锁上,请解锁后再操作!", "提示")

End If

End Select

代码作用：双击“编号”单元格时，如果挂网列没有勾选，则勾选，如果已经勾选，则去掉勾选。现在遇到的问题是：如果挂网是不勾选的话，第一次双击，它会变成勾选状态，鼠标没有离开该单元格，继续双击，则挂网没有反应（即不会变成不勾选的状态）；请问老师是不是代码有问题？

主题：双击单元格