主题：代码实现下拉窗口的效果

呃，你这个功能，本来就有，而且你的更简单

http://www.foxtable.com/help/topics/2465.htm

OpenDropDown

打开下拉列表或者下拉窗口，只有正在编辑的列设置了列表项目或下拉窗口，此方法才有效。

貌似描述的例子都是针对，设置了列表项目或下拉窗口的DropDownBox控件才有效。

我现在想要的是，在table的click事件中，用代码打开设置好特定的下拉窗口。

请问，这个click事件如何写呢？

 做一个独立窗口，点击的时候就打开就好。

 控制一下独立窗口的位置为鼠标的位置即可。

Dim x As Integer = System.Windows.Forms.Cursor.Current.Position.X
Dim y As Integer = System.Windows.Forms.Cursor.Current.Position.Y

msgbox(x & " " & y)

或者click事件写代码

e.Table.StartEditing
e.Table.cols("第一列").OpenDropDown

每一列都设置一个下拉窗口

for each c as col in tables("表A").cols
    c.DropForm = "窗口1"
Next

Click事件代码

e.Table.StartEditing
e.Col.OpenDropDown

如果不用8楼，弹出一个窗口显示也是不错的选择啊。