Forum: VB.NET |
Thema:
Re: Blinkende TextBox solange Prozedur abgearbeitet wird |
Von:
mirmi li (
19.03.2005 22:29) |
Hi nochmal :)
Hab mir schon was zusammengesucht. Leider kann ich Deinen Tip aus mangelndem VB KnowHow nicht ordentlich umsetzen.
Ich habs jetzt mal so versucht:
zuerst hab ich diese Prozedur erstellt:
Sub subBlinkTxtProd()
Try
Dim intCtr As Integer
For intCtr = 0 To 10
threadBlink.Sleep(500)
If txtProdWhite.Visible = True Then
txtProdWhite.Visible = False
txtProdGreen.Visible = True
Else
txtProdWhite.Visible = True
txtProdGreen.Visible = False
End If
Application.DoEvents()
Next intCtr
txtProdWhite.Visible = False
txtProdGreen.Visible = False
Catch ex As ThreadAbortException
txtProdWhite.Visible = False
txtProdGreen.Visible = False
Return
End Try
End Sub
Diese wird in meiner "langen" Prozedur aufgerufen und auch wieder gestoppt:
Private Sub cmdPortOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdPortOpen.Click
threadBlink.Start()
'Hier steht der ganze Code fürs abschicken der ComPort Befehle. Hier sind auch die Thread.Sleep() eingebaut.
threadBlink.Abort()
End Sub
Leider wird die Blink Prozedur irgendwie nicht richtig abgearbeitet bzw. gestartet. Was mach ich denn hier falsch?
Ich hab schon rausgefunden, dass der Thread mit threadBlink.Abort() nicht gestoppt wird. Denn beim nächsten Versuch heißt es, "Thread noch nicht angehalten", oder so ähnlich.
Danke vorab für die Tips...
mirmi
Betreff |
Von |
Datum |
|
|
Raphael
Crivelli
|
20.03.2005 10:46 |
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!