Question

vb.net 渐渐移动窗体

1秒从1270,150移动到1000,150
最好不用Timer

Answer 1

用多线程即可。
新建一个项目，在Form1上画一个Button1，窗体代码如下：
Public Class Form1
Sub MoveForm()
For i As Integer = 1270 To 1000 Step -1
Me.Location = New Point(i, 150)
Threading.Thread.Sleep(10)
Next
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Control.CheckForIllegalCrossThreadCalls = False
Dim th As New Threading.Thread(AddressOf MoveForm)
th.Start()
End Sub
End Class
生成看效果

Answer 2

不用Timer，就用API