当前位置: 主页 > bte3651vip >

使用vb设计字幕滚动程序。这会导致label1首先向右移动,然后在触摸form1的右边缘后向左移动。我的设计出了什么问题

发布者:365bet手机app
来源:365bet平台网址 日期:2019-07-26 09:55 浏览()
展开全部
即使X是-100,问题在于Timer1_Timer()事件,但是在触发事件之后,X返回到100。在Timer1_Timer()事件中,X = 100被删除如下:DimxAsIntegerOptionExplicitPrivateSubCommand1_Click()Timer1。
有效= TrueEndSubPrivateSubCommand2_Click()Timer1。
有效值= FalseEndSubPrivateSubForm_Load()x = 1 EndSubPrivateSubTimer1_Timer()Label1。
左=标签1
向左+ 100 * xIfLabel1。
左= Form1
宽度为1的标签。
WidthThenx = -1IfLabel1。
Left = 0Thenx = 1EndSub