如何动态修改任务栏的名称 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

“常用网址”窗口里有个任务栏控件“TopicBar1”，1个修改按钮控件“button1”,如下图所示：

此主题相关图片如下：1.jpg

单击修改按钮，跳出来窗口1，单击窗口1的“将其修改成：”按钮，跳出窗口2，如下图所示：

此主题相关图片如下：2.jpg

我想实现的效果是：在窗口2中输入网站名称和网址之后，tables("常用网址表")里对应的数据也会随之修改，并且“常用网址”窗口中的任务栏控件“TopicBar1”里对应的链接的名称也随之改变。

于是，我在窗口2的textbox1的textchanged事件中写了如下代码：

Dim str As String = Tables("常用网址表").Current("网站名称")

Dim tl As WinForm.TopicLink = Forms("常用网址").Controls("TopicBar1").Pages(0).Links("'& str &'")

tl.name = e.Form.Controls("TextBox1").text

这个代码有问题，但我不知道怎么改。

项目贴出来，请老师指点！谢谢

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

主题：如何动态修改任务栏的名称