求解
vb吧
全部回复
仅看楼主
level 5
2021年01月06日 04点01分 1
level 15
思路:
用一个变量表示移动的方向和距离,比如s=-30表示向左或向上移动30个单位的距离,具体是向左还是向上通过单选按钮的选择情况进行判断
在每次定时事件中,给标签的Left或Top属性增加上述变量的值:如果选中“左右移动”,则加在Left属性上,否则加在Top属性上;然后判断是否到边缘了,如果满足以下条件,则表示到达了相应的边缘:Label1.Left<=0(左边缘),Label1.Left>=Me.ScaleWidth-Label1.Width(右边缘),Label1.Top<=0(上边缘),Label1.Top>=Me.ScaleHeight-Label1.Height(下边缘);如果到达了边缘,则先将变量取负(s=-s),然后判断复选框是否选中,如果选中则关闭定时器
2021年01月06日 05点01分 2
[大拇指]
2021年01月06日 07点01分
1