- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [已经解决]几个问题一起打包求助 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=20388)
-- 发布时间：2012/6/7 0:52:00
-- [已经解决]几个问题一起打包求助
1，窗口里的控件比较多，有时学习别人系统的时候不知道控件在哪里，想问下有没有快速定位某个控件的办法？（也就是在那个下拉框选择哪个控件名称后，那个控件就会被自动选中）
2，我想在窗口中实现一个屏幕锁定的功能，参考了以下两个帖子
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=19784&skin=0这个帖子锁定容易，但是输入用户和密码之后怎么都打不开系统了，还没有弄明白怎么回事，待研究；
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=1541这个帖子的案例实验运行出错，按住CTRL直接提示系统锁定，错误截图如下
此主题相关图片如下：1.jpg
我本想去看个究竟的，但是按住ctrl还是打不开源码，不知为何
3，在状态栏右下角本来有个自动计算显示的，又一次不知道看了哪个帖子说可以在哪里隐藏，现在不显示了，不知道怎么再显示出来
此主题相关图片如下：2.jpg
4，我自己做了筛选树，筛选的字段是日期字段，现在显示的既有日期又有时间，可是我不希望有时间显示，怎么去掉呢？
此主题相关图片如下：3.jpg
5，一个关于页面布局的，我本来在店里设计好了的窗口，一切正常有序，关联表格等都已经弄的挺好了，放在家里之后就变成这样子了，不知道哪里出了问题？
这个图下个帖子上传
谢谢各位i老师了
[此贴子已经被作者于2012-6-8 23:45:14编辑过]
-- 发布时间：2012/6/7 0:52:00
--
这个是第5题的图片
此主题相关图片如下：5.jpg
-- 发布时间：2012/6/7 9:36:00
--
1、看看这个图：
http://www.foxtable.com/help/topics/0641.gif
2、这种功能有什么意义？ 直接用windows的屏保多好。
3、看看这节的帮助：
http://www.foxtable.com/help/topics/0176.htm
4、
Dim
trv
As
WinForm.TreeView = e.Form.Controls("TreeView1")
For
Each
nd
As
WinForm.TreeNode
In
trv.AllNodes
If
nd.Level = 0
dim dt as date = nd.text
nd.text = format(dt,"yyyyMMdd")
End
If
Next
5、看看：
http://www.foxtable.com/help/topics/0701.htm
http://www.foxtable.com/help/topics/0702.htm
-- 发布时间：2012/6/8 23:44:00
--
已经解决了问题
我对代码改了下
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView2")
trv.Nodes.Clear
trv.BuildTree("产品明细表", "进货日期|小类别")
For Each nd As WinForm.TreeNode In trv.AllNodes
If nd.Level = 0
Dim dt As Date = nd.text
nd.text = format(dt,"yyyy年MM月dd日")
End If
Next