主题：文字滚动的设置疑惑
夕度无痕
[专家分：0] 发布于 2011-03-09 21:56:00
Private Sub Timer1_Timer()
If Label1.Left + Label1.Width > Form1.Left Then
Label1.Left = Label1.Left - 10
Else
Label1.Left = Form1.Left = Form1.Width
End If
为什么要这样设置？咱是新手，刚学VB，不太理解，请朋友指点迷津[em18]
回复列表 （共6个回复）
沙发
老大徒伤悲 [专家分：29120] 发布于 2011-03-10 19:15:00
你不懂的原因是这个代码是错误的！
你运行一下，看是不是你要的？
板凳
一江秋水 [专家分：9680] 发布于 2011-03-13 08:34:00
可能要这样改一下：
Else
Label1.Left = Form1.Left + Form1.Width
3 楼
一江秋水 [专家分：9680] 发布于 2011-03-13 08:36:00
代码的作用是将标签从右至左移动，不过会有“跳”的感觉
4 楼
夕度无痕 [专家分：0] 发布于 2011-03-16 13:00:00
form1.left和form1.width是哪段距离呢
又为什么要那样设置呢
还有msg$"运行程序"是什么意思？看到很多这样的，如string$(6,65)?
5 楼
一江秋水 [专家分：9680] 发布于 2011-03-16 15:36:00
例：
form1.left=300
form1.width=900
那么：Label1.Left =Form1.Left + Form1.Width=1200
这个意思就是设置标签的左边缘到窗体的右边缘外。
msg$"运行程序"是什么意思？我还要问你呢。提问题要写清楚，msg$是字符型变量，它与"运行程序"之间应该有个等于号吧：msg$="运行程序"，你在哪个代码中看到 msg$"运行程序" 这样的语句？
string()是VB函数，你查一下帮助。
6 楼
莫非白 [专家分：750] 发布于 2011-03-19 10:10:00
看一下我花10分钟做的一个小程序,里面有文字滚动效果,自己体验!
挖,附件在哪里发啊，发不上来!
弄个新贴,贴附件
我来回复
您所在位置：