我可以明显地设置窗口的位置,并用Form1.Location.X等来回移动,但是这种方法的效果是可怕的.我想要一些更流畅的东西 – 还有一种方法来摇摆整个屏幕？

我只会使用.net 4.5来定位Windows 7.

更新

使用汉斯和Vidstige的建议,我已经提出了以下,当窗口最大化时也是如此 – 我希望我可以选择两个答案,我已经投票了你的答案,而Vidstige,并希望其他人也会.汉斯的回答虽然触及了所有的突出点.

两种形式MainForm和ShakeForm

主窗体代码

Private Sub shakeScreenFeedback()

        Dim f As New Shakefrm
        Dim b As New Bitmap(Me.Width,Me.Height,PixelFormat.Format32bppArgb)

        Me.DrawToBitmap(b,Me.DisplayRectangle)

        f.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        f.Width = Me.Width
        f.Height = Me.Height
        f.ShowInTaskbar = False

        f.BackgroundImage = b
        f.BackgroundImageLayout = ImageLayout.Center
        f.Show(Me)
        f.Location = New Drawing.Point(Me.Location.X,Me.Location.Y)

        'I found putting the shake code in the formLoad event didn't work
        f.shake()
        f.Close()

        b.Dispose()

    End Sub

ShakeForm代码

Public Sub shake()
    Dim original = Location
    Dim rnd = New Random(1337)
    Const shake_amplitude As Integer = 10
    For i As Integer = 0 To 9
        Location = New Point(original.X + rnd.[Next](-shake_amplitude,shake_amplitude),original.Y + rnd.[Next](-shake_amplitude,shake_amplitude))
        System.Threading.Thread.Sleep(20)
    Next
    Location = original

End Sub