cursor.current

Question

Hallo.

Wie kann ich verhindern, dass der Mauscursor wie in diesem Beispiel nach der abgelaufenen Schleife von alleine wieder .default annimmt?

Public Class Form1

  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

  End Sub

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Cursor.Current = Cursors.Cross
    For i = 1 To 1000
      For z = 1 To 100000

      Next
    Next
  End Sub
End Class

Ich möchte das gerne manuell ändern nachdem ich eine Aktion ausgeführt habe.

Danke
Jan

 

Answer 1

Hallo Jan,

der aktuell angezeigte Cursor wird meist von dem Formular bzw. dem Steuerelement beeinflusst, über dem sich gerade der Mauszeiger befindet. Versuche bspw. folgendes, um den Cursor für das aktuelle Formular zu ändern:

Me.Cursor = Cursors.Cross

---

Thorsten Dörfler
Microsoft MVP Visual Basic
vb-faq.de

Answer 2

Hallo.

Das hat leider nicht geholfen. Der Cursor verändet sein Aussehen sofort wieder in standart.

Gruß
Jan

 

Answer 3

Thorsten hat Recht. Der Cursor verändert sich nach Ablauf der Zeit  wieder wie hier festgelegt:

 

Grus Ellen

---

Ich benutze/ I'm using VB2008 & VB2010