Question

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

VB6.0中用下面语句就可以用使控件移动
Label1.Left = Label1.Left +50
我想问怎样才能点击鼠标按钮 能使label1自动移动
你说在 form_click下面输入timer.enable=true 是怎么回事? 我是想点击一下command lable1自动移动

Answer 1

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

Answer 2

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

Answer 3

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