主题：关于下拉窗体的操作

下拉窗口表中字段不较多单击选择数据时怎么经常移动到最后的字段上，还得手动移动过来挺麻烦的怎么设置一下在选择数据时显示的字段不移动呢？

DropDownOpened事件，加上代码

 

e.Form.Controls("Table1").Select

表格DrawCell事件，写代码

 

Dim ary() As String = e.Table.name.Split("_")
If ary.length = 2 Then
    forms(ary(0)).controls(ary(1)).Select
End If

在下拉窗体DrawCell事件中还是商户资料表DrawCell中写代码呢？If ary.length = 2 Then
    forms(ary(0)).controls(ary(1)).Select
End If

下拉窗口的table控件的对应的drawcell事件。

下拉窗体表中没有DrawCell事件

 那就写到商户资料表的drawcell事件。

写完运行后

 具体例子发上来测试。