以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 滚动字幕该怎样设置 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1723) |
-- 作者:bingbing -- 发布时间:2009/2/3 15:40:00 -- 滚动字幕该怎样设置 在窗口中想实现一个上下滚动字幕的一个功能,请哪位大侠给帮忙指点一下。谢谢! |
-- 作者:狐狸爸爸 -- 发布时间:2009/2/3 15:52:00 -- 参考资料: TimerTick 窗口计时器代码,根据设定的间隔执行。e参数属性: Form:表示触发事件的窗口。 示例 本示例可以参考CaseStudy目录下的示例文件:窗口计时器.table 窗口中加入一个标签,要求标签不停地闪烁,而且能够通过按钮控制闪烁速度,以及暂停和开始闪烁。 首先在窗口中加入一个标签,标签文本为“警告”,另外加入四个按钮,分别是暂停、开始、慢速、快速。 然后将窗口的TimerClick事件代码设为: Dim Lbl As WinForm.Label = e.Form.Controls("Label1")If Lbl.ForeColor = Color.Red Then Lbl.ForeColor = Color.Black Else Lbl.ForeColor = Color.Red End If SetBounds 统一设置控件的位置和大小。 语法 SetBounds(x, y, Width, Height) x: 控件的水平位置 上述参数的单位为像素。 |