AfterLoad事件中设置如下代码:
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")For Each cn As Connection In Connections lst.Items.Add(cn.Name)Next
用来获取所有数据源名称.
需要加一个按钮,删除当前选定的 lst显示的数据源名称