以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  用label获取内容并打开链接  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187059)

--  作者:sunion0769
--  发布时间:2023/6/18 12:47:00
--  用label获取内容并打开链接
项目中有表A,第一列是项目标题,第二列是网络地址
在窗口中建立三个label。分别为label1、label2、label3
如何实现:
(1)label1显示项目标题第1行的内容,label2显示项目标题第2行的内容,label3显示项目标题第3行的内容?
(2)点击label1,打开网络地址第1行的地址,以此类推

--  作者:有点蓝
--  发布时间:2023/6/18 20:27:00
--  
1、
dim r as row = tables("表A").rows(0)
e.form.controls(“label1”).text = r("地址")
r  = tables("表A").rows(1)
e.form.controls(“label2”).text = r("第一列")
……

2、label1,click事件:
Dim Proc As New Process \'定义一个新的Process
Proc.File = e.sender.text
 \'指定要打开的文件 :
http://www.foxtable.com/webhelp/topics/0353.htm
Proc.Start()

--  作者:sunion0769
--  发布时间:2023/6/19 21:04:00
--  
明白了,谢谢
[此贴子已经被作者于2023/6/19 21:06:14编辑过]