主题：[求助]FileManager表示文件管理器的问题

我做了一个公告的主页面

用了2个label标签 和一个filmanager管理器 分别用来写公告内容 公告时间 和 下载公告附件的

 

是这样写的

Dim dr As DataRow
dr = DataTables("公告").Find("[通知] <> ''" , "[_SortKey] Desc")  '从第一行开始查找
If dr IsNot Nothing Then  '如果找到的话
    e.Form.Controls("lb公告内容").text ="    通知:" & dr("通知")
e.Form.Controls("lb公告时间").text = "日期 : " & Format( dr("发布日期"),"yyyy年MM月dd日")
e.Form.Controls("lb公告附件").value = dr("附件")
end if

 

前面2个label的内容 时间 都没有问题

 就是附件 出现了问题 定位不了，这个代码应该如何修改呢

定位不了，具体指什么？

就是这句代码e.Form.Controls("lb公告附件").value = dr("附件") 还是要靠光标来定位列

 

而 e.Form.Controls("lb公告内容").text =" 通知:" & dr("通知")
e.Form.Controls("lb公告时间").text = "日期 : " & Format( dr("发布日期"),"yyyy年MM月dd日")

这两句代码只要刷新窗口，就可以自动更新 定位到最后一次输入的行

e.Form.Controls("lb公告附件").value = dr("附件") 这个提示没有value 和 text属性 不知道应该用哪种属性

e.Form.Controls("lb公告附件").Text= dr("附件") 

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2015.12.22.1
错误所在事件：窗口,首页,AfterLoad
详细错误信息：
未找到类型“FileManager”的公共成员“text”。

 

提示这个错误

主要的是这个附件 我用的是 文件管理器 不是标签 不知道为什么定位不到那个行

嗯，被控件名给迷惑了。

现在就是这段代码不能自动定位到行，不知道用哪个属性，它没有text属性

思路错了。FileManager绑定表的附件列，然后代码

 

Dim dr As DataRow
dr = DataTables("公告").Find("[通知] <> ''" , "[_SortKey] Desc")  '从第一行开始查找
If dr IsNot Nothing Then  '如果找到的话   
    Tables("公告").position = Tables("公告").FindRow(dr)
    e.Form.Controls("lb公告内容").text ="    通知:" & r("通知")
    e.Form.Controls("lb公告时间").text = "日期 : " & Format( r("发布日期"),"yyyy年MM月dd日")
End If

袍哥，我发现用这段代码出现BUG   Tables("公告").position = Tables("公告").FindRow(dr)

 

我设置了timertick 用的默认1000毫秒，发现 此时在输入新的内容的时候光标一直上移，根本没法输出新值。

同时推出一个新的问题，现在是单机版看不出来，以后组网多用户使用，公告页的文字可以通过时间间隔长些让其不会立刻跟着变，但是附件是随着光标变化而变化，出现文本和附件不一的情况了。

 

请问 我的设计思路应该如何修改。

 

不知道我表述的清楚不清楚~~