Thema Datum  Von Nutzer Rating
Antwort
Rot zu "Timer" vom 16.11.2007
 22.11.2007 04:25:52 inchki
NotSolved
22.11.2007 07:10:55 inchki
NotSolved
22.11.2007 08:23:50 inchki
NotSolved

Ansicht des Beitrags:
Von:
inchki		 Datum:
22.11.2007 04:25:52		 Views:
1977		 Rating:
     
Antwort:
  Ja
Thema:
zu "Timer" vom 16.11.2007
Hallo nochmal,

die DoEvents-Funktion hat super geklappt, wie schon gesagt. Die Anwendung hat allerdings ein weiteres Problem hervorgerufen...naemlich, dass ich entweder "out of stack cache" bin oder das Programm unendlich langsam wird. In der Hilfe wird gesagt, dass die DoEvents-Funktion das verursachen koennte.

Private Sub CommandButton4_Click()
If MSComm4.PortOpen = False Then
MSComm4.PortOpen = True
End If
MSComm4.RThreshold = 12
MSComm4.Output = "D05" & vbCr
End Sub

Private Sub MSComm4_OnComm()
Do
DoEvents
Select Case MSComm4.CommEvent
Case comEvReceive
Hprt4 = MSComm4.Input
Cells(12 * Counter2 + 7, Counter1 + 3).Select
ActiveCell.FormulaR1C1 = Val(Hprt4)
Cells(12 * Counter2 + 8, Counter1 + 3).Select
ActiveCell.FormulaR1C1 = "=R[-1]C/0.68"
End Select
Loop Until Hprt4 <> 0
If Bool4 = True Then
CommandButton3_Click
End If
End Sub

Ich habe in dem Programm insgesamt 4 dieser Befehlsketten. Kann man das DoEvent vielleicht stoppen?
Oder muss ich etwas anderes beachten?

Danke nochmal.

Gruesse
inchki

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot zu "Timer" vom 16.11.2007
 22.11.2007 04:25:52 inchki
NotSolved
22.11.2007 07:10:55 inchki
NotSolved
22.11.2007 08:23:50 inchki
NotSolved