VB6.0中如何让label 自动 移动

来源：百度知道 编辑：UC知道 时间：2024/06/22 06:29:55
VB6.0中用下面语句就可以用使控件移动
Label1.Left = Label1.Left +50
我想问怎样才能点击鼠标按钮 能使label1自动移动
你说在 form_click下面输入timer.enable=true 是怎么回事? 我是想点击一下command lable1自动移动

给你这个教程，在 窗体1~7 中找答案，会有你想要的~http://tech.163.com/special/000915SN/vbgreat.html

这个十分简单，利用单击事件，在窗体上单击即可实现label1的移动
具体代码如下：
Private Sub Form1_Click()
Label1.Left = Label1.Left + 50
End Sub

插入timer控件，双击timer，输入Label1.Left = Label1.Left +50，设置enable为false，双击窗体，form_click下面输入timer.enable=true。就行了，这样单击窗体后，控件就自己动了。