主题：按条件开启下拉窗口问题（已解决）

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

点击浏览该文件:管理项目3.table

第一列为数字，当第一列大于等于2时，点击该行的第二列则开启下拉窗口

现在有2个问题：

1.按以下代码执行，第二列下拉窗口是按列的，若是第二列第一行能开启下拉窗口，其他所有都开启了。第二列的每一行下拉窗口按第一列的条件开启的代码应该怎么写？

2. 以下代码放在datacolchanged 里似乎有问题，因只有在数据发生变动时才会 执行，应该放在那里更合适。

If  e.DataCol.Name = "第一列"  Then
If  e.DataRow("第一列") >=2 Then  
    Tables("表A").Cols("第二列").DropForm = "窗口1"
   Else
   
    Tables("表A").Cols("第二列").DropForm = Nothing
   
End If
End If

PrepareEdit 事件   可以了

If  e.Col.Name = "第一列"  Then
If  e.Row("第一列") >=2 Then  
    Tables("表A").Cols("第二列").DropForm = "窗口1"
   Else
   
    Tables("表A").Cols("第二列").DropForm = Nothing
   
End If
End If