- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]tabcontrol页面选择问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44729)
-- 发布时间：2014/1/7 18:20:00
-- [求助]tabcontrol页面选择问题
如下图，想实现：
此主题相关图片如下：20140107181502.jpg
1. 通过textbox2的值选择相应的页面（textbox2的值与页面的标题一样），其它页面隐藏
2.通过textbox1的值对相应页面中的表进行筛选（值就是表中patientsID）
谢谢！
[此贴子已经被作者于2014-1-7 18:20:48编辑过]
-- 发布时间：2014/1/7 19:28:00
--
呃，你先要解决两个问题。
1、你设置一下各个页面的name属性为对应的textbox2的名称。然后编写textbox2的textchanged事件；
2、各个页面里面的table控件的name属性需要设置与页面的名称有一定关系。这样编写textbox1的代码就简单了。
你先做，然后上传个例子。
-- 发布时间：2014/1/7 20:08:00
--
修改一下，更合理：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:选择页面.table |
[此贴子已经被作者于2014-1-7 20:26:04编辑过]
-- 发布时间：2014/1/8 11:09:00
--
谢谢！lsy提供的思路，很好。但是还是有点问题。例子中：页面选择窗口中筛选控件的值来自导航窗口中单击节点后形成的patientsID，而页面控件中的值也来自单击的节点的名称。
想实现：1. 页面控件中的值自动选择相应的页面（页面标题和节点名称一致），其余页面隐藏；
2. 通过筛选控件的值对选择页面中的表进行筛选（页面中的表名称与页面标题一致），然后进行处理。
谢谢！
-- 发布时间：2014/1/8 13:46:00
--
实际的例子发上来，要求说的更明白点。在实际例子中做，要容易许多。
1. 页面控件中的值 什么值？
-- 发布时间：2014/1/8 15:27:00
--
就是您做的例子相应标签后面控件中的值。
-- 发布时间：2014/1/9 10:10:00
--
经过调试，textbox2能获得导航窗口来的值，但运行后仍有错误。提示如下：
此主题相关图片如下：360软件小助手截图20140109095612.jpg
代码如下：
Dim txt As String= e.Form.Controls("textbox2").value
MessageBox.Show(txt)
Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
For Each page As WinForm.TabPage In tab.TabPages
page.Visible = False
tab.TabPages(txt).Visible = True
tab.SelectedPage = tab.TabPages(txt)
Next
-- 发布时间：2014/1/9 10:11:00
--
建议您用这个方法：
http://www.foxtable.com/help/topics/1485.htm
先找出是哪一行出错，然后分析原因，搞不定，贴出代码，并告诉我们运行到哪一行出错，以及错误提示。
-- 发布时间：2014/1/9 10:15:00
--
你没看懂，我在前面做的例子。
把现在的例子发上来，很简单的问题。
-- 发布时间：2014/1/9 13:50:00
--
好的。我把例子传上来，现在就是"患者病史"窗口中textbox2里面的问题，通过“导航”窗口赋值，就是三级节点的值，只是显示textbox2控件所显示值代表的页面，其它隐藏。
谢谢！
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:患者信息管理系统1.table |