以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  在导航栏上显示 欢迎当前用户  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=106641)

--  作者:恒隆君
--  发布时间:2017/9/13 9:26:00
--  在导航栏上显示 欢迎当前用户
在导航栏上显示 欢迎当前用户
这个如何实现?

现在我在导航栏 增加了一个文本控件
但不知如何依不同用户自动 更换用户名称

--  作者:有点甜
--  发布时间:2017/9/13 9:38:00
--  

加入Label控件,写到AfterLoad事件

 

e.Form.Controls("Label1").Text = "欢迎你:" & User.Name

 

 


--  作者:nxqtxwz
--  发布时间:2018/6/20 13:53:00
--  
Label能不能加到菜单栏上呢
--  作者:有点甜
--  发布时间:2018/6/20 14:17:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/3220.htm

 


--  作者:hanzhang98
--  发布时间:2018/6/20 19:32:00
--  
以下是引用有点甜在2017/9/13 9:38:00的发言:

加入Label控件,写到AfterLoad事件

 

e.Form.Controls("Label1").Text = "欢迎你:" & User.Name

 




加入当前的日期、星期、时间的代码如何写。谢谢


--  作者:有点甜
--  发布时间:2018/6/20 20:20:00
--  

Dim str = "欢迎你:" & User.Name & " " & format(Date.now, "yyyy-MM-dd HH:mm:dd dddd")
msgbox(str)