以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Label文组滚动  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139909)

--  作者:yifan3429
--  发布时间:2019/8/24 22:12:00
--  Label文组滚动
e.Form.TimerEnabled = True
Dim lab1 As WinForm.Label = e.Form.Controls("Welcome")
If lab1.Width + lab1.Left = 0 Then
    lab1.left = e.Form.Width
Else
    lab1.left = lab1.left -6
End If

Label绑定了列  
1.想再打开时窗口时Label 的内容指定到最新的日期行 
2.每循环换完一条,然后调到下一行,也就是第二新的行
3.循环至最新的5行后重现开始。


或者增加一个列 内容为  置顶 的行 自然循环
[此贴子已经被作者于2019/8/24 23:06:26编辑过]

--  作者:有点蓝
--  发布时间:2019/8/25 20:47:00
--  
Label 绑定列,然后需要显示哪一行的内容,直接查表定位即可: