| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1090 人关注过本帖
标题:这程序怎么写
只看楼主 加入收藏
zl2210
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-1-10
收藏
 问题点数:0 回复次数:17 
这程序怎么写
谁能告诉我 连续滚动字幕 程序怎么写,谢了!!!
搜索更多相关主题的帖子: 字幕 
2006-01-13 15:50
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 

用 Timer 控件,设置 Interval 为你想滚动的速度(1 为 1 毫秒,1000 为 1 秒)。然后不断使滚动的控件的 Top 属性减 1,并检测 Top < 0,如果 Top < 0,则将控件的 Top 属性设为 Me.ScaleHeight(即窗体的高度)。这样就实现了控件从下往上滚动的效果。

2006-01-13 16:32
zl2210
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-1-10
收藏
得分:0 

二楼的同志我试了还是不行呀!
Private Sub Command1_Click()
Label1.Left = 50
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label1.Left = Label1.Left + 50 - 1
End Sub
你看看在哪修改呀?


新手上路希望大家照顾.
2006-01-13 16:55
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 
你没有判断控件是否已滚动到外面了。

Private Sub Timer1_Timer()
Label1.Left = Label1.Left + 50 '不需要 - 1
If Label1.Left >= Me.ScaleWidth Then '控件超出窗体右边缘
Label1.Left = 0 '坐标置 0,使控件再回到窗体左边缘
End If

End Sub
2006-01-13 21:37
zl2210
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-1-10
收藏
得分:0 
Me.ScaleWidth 这是什么意思为什么要大于等于它?

新手上路希望大家照顾.
2006-01-15 16:04
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 
form.width
如果移动到窗口外了再移你就看不到了
就让他再次从左边开始向右移

http://toorup.3v.do
loading...
2006-01-15 16:15
zl2210
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-1-10
收藏
得分:0 
我还有件事不明白VB和C语言的区别在与什么?哪个更好?VB将来就业方向是什么地方呀

新手上路希望大家照顾.
2006-01-16 00:21
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
C语言是结构化的程序设计语言...
VB是可视化的.面向对象的..事件驱动的...
这就是VB比较易学的原因...
但是VB功能还是有限的..不能跨平台...而且在多线程上.实在.......
而且要深入系统低层的话..VB就无能为力了..所以这时候就好用C了..
要用VB来就业的话..一千几百是没有问题的..但要赚大钱...呵呵..建议用VC++和JAVA和.Net了..

我的msn: myfend@
2006-01-16 11:57
fireboy
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2006-1-27
收藏
得分:0 
8楼说得很有道理!
2006-01-27 15:20
忧郁人
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-1-27
收藏
得分:0 

我一定要把vc++学好

2006-01-27 17:37
快速回复:这程序怎么写
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.051116 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved