专家坐堂-无法获得窗口输入焦点Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- 无法获得窗口输入焦点
做了一个主窗口，主窗口里用分区面板。左边用导航栏。右边留出空白用来加载窗口。

右边的窗口是独立窗口。

通过点击左边导航栏里的按钮，可以实现把独立窗口加载入右边的空白区域。

但是应该是右边的窗口加载后，无法获取焦点，导致的原来的一些筛选功能没有用。看图片显示。刚开始时我输入文字后按回车键，没有筛选。

当我再次点击一下左边和导航栏切换一下后，再回到筛选，就可以用了。

加载窗口代码：

Dim PB As Object = e.Form.Controls("SplitContainer1").Panel2

Dim Name As String = "信息总表"

Forms(Name).OPEN( - 1000, - 1500)

Forms(Name).BaseForm.TopLevel = False

Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None

Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill

PB.BaseControl.Controls.Clear

PB.BaseControl.Controls.add(Forms(Name).BaseForm)

MainTable = Tables("项目总表")

Tables("项目总表").OpenView("项目总表") \'打开项目总表的视图

Forms("信息总表").Select

此主题相关图片如下：4.gif