[vb.net] Timer in BackgroundWorker ausführen

[aked (Gast)]

Hi, ich habe einen Timer mit relativ langem Code. Dieser muss relativ 
zeitgleich mit dem öffnen eines SerialPorts gestartet werden. Durch den 
langen Code friert aber die UI kurz ein, wenn ich in Form.Load den Timer 
starte.

Nun habe ich einen BackgroundWorker erstellt, welcher beim Start der 
Anwendung aufgerufen wird:

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

If BackgroundWorker1.IsBusy Then
Return
End If
BackgroundWorker1.RunWorkerAsync()

End Sub

und im BackgroundWorker wird der Timer gestartet:

  Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        Timer1.Start()

    End Sub

Der Timer wird auch gestartet, das hab ich über ein Label mit

 If Timer1.enabled = true

 etc. getestet.

Aber der Code im Timer wird nicht ausgeführt. Dieser verarbeitet Daten 
vom SerialPort und soll an diesen senden, es wird aber nichts gesendet.

Kann mir jemand einen Tip geben?

Danke

[Schlaumaier (Gast)]

Unter VB musst du eine Sub für den Timer machen.

Private Sub TimerEventProcessor(myObject As Object, ByVal myEventArgs As 
EventArgs) Handles my_Timer.Tick

' mach was.


end sub

Das sollte unter NET ähnlich sein.

Diese SUB wird bei Timer automatisch ausgelöst

Sub Timer_auslosen ()
 my_Timer.Interval = 1000
 my_Timer.Enabled = True
end sub



my_timer ist das Timer_objekt.