Impressum | Werbung

Geizhals » Forum » Programmierung » wieder mal Vb (13 Beiträge, 95 Mal gelesen) Top-100 | Fresh-100

^ Forum  Programmierung  #2882611 wieder mal Vb hellraiser 18.10.2005, 01:34:59 Habe folgendes Programm zur Ansteuerung der seriellen Schnittstelle: jedoch hängt sich das Programm nachm Starten leider auf, kA wieso. Es lässt sich kein Button auswählen Und zwar ist der Hänger drinnen, sobald er von der Private Sub Timer1.Timer() in die IOout(dat) springen sollte, und somit die Leitungen aktualisiert werden sollten. Source: (in der Form mit 8 Checkboxes und 2 Option) -------------------------------------------- Private Sub Form_Load() i = OPENCOM("COM4") If i = 0 Then    i = OPENCOM("COM5")    Option1.Value = True End If If i = 0 Then MsgBox ("Com Interface Error") TXD 0 RTS 0 DTR 0 Timer1.Interval = 100 End Sub ---------------------------------------- Sub IOout(Dat) Bitvalue = 1 RTS 0 For n = 1 To 8     If (Dat And Bitvalue) > 0 Then TXD 1 Else TXD 0         DTR 1         DELAY 0.005         DTR 0         Bitvalue = Bitvalue * 2     Next n   RTS 1   DELAY 0.005   RTS 0 End Sub ---------------------------------------------------- Private Sub Timer1_Timer() TIMEINIT Dat = 0 Dat = Dat + Check1.Value Dat = Dat + Check2.Value * 2 Dat = Dat + Check3.Value * 4 Dat = Dat + Check4.Value * 8 Dat = Dat + Check5.Value * 16 Dat = Dat + Check6.Value * 32 Dat = Dat + Check7.Value * 64 Dat = Dat + Check8.Value * 128 IOout Dat End Sub ------------------------------------------------------------- ports.bas passt soweit. 18.10.2005, 03:22 Uhr - Editiert von hellraiser, alte Version: hier ^ Forum  Programmierung  #2882591 Re: wieder mal Vb Silence! 18.10.2005, 01:40:36 Fehlt da nicht nach dem Timer ein End If ? #edit: Bzw. wirds nach dem next nicht auch benötigt? . --------------- Silence    18.10.2005, 01:45 Uhr - Editiert von Silence!, alte Version: hier Dieser Beitrag bezieht sich auf eine ältere Version des beantworteten Postings! ^ Forum  Programmierung  #2882595 Re(2): wieder mal Vb hellraiser 18.10.2005, 02:00:07 nein leider, der Source ist ja vom "Elektronik am Pc" Buch Source MUSS so passen, habs schon hundertmal mitm Buch verglichen. Aber immer der gleiche Object reqzired Fehler ^ Forum  Programmierung  #2882665 Re(3): wieder mal Vb hover 18.10.2005, 07:53:22 also passen MUSS es nicht, hab schon oft Fehler in Büchern/Zeitschriften gesehen. Desweiteren, verwenden die die gleiche VB Version wie du? __________________ http://dennis-home.at ^ Forum  Programmierung  #2882794 Re(3): wieder mal Vb Somnatic 18.10.2005, 09:22:44 in welcher zeile kommt denn der object required fehler ? Wozu weibliche Unvernunft imstande ist, hat sich schon an der Idee erwiesen, sich von einer sprechenden Schlange Diätvorschriften geben zu lassen. (Orson Welles) ^ Forum  Programmierung  #2883257 Re(4): wieder mal Vb hellraiser 18.10.2005, 12:43:47 der hat sich schon erledigt,danke jetz bleibts hängen ^ Forum  Programmierung  #2883293 Re(5): wieder mal Vb Somnatic 18.10.2005, 12:54:10 ja, aber in welcher zeile bleibt er hängen ... du kannst dich ja einzeln durchs programm durchsteppen .. dann siehst genau welche zeile das problem macht ... könnt eine endlosschleife sein, oder eine methode die auf rückgabewerte wartet, ... Wozu weibliche Unvernunft imstande ist, hat sich schon an der Idee erwiesen, sich von einer sprechenden Schlange Diätvorschriften geben zu lassen. (Orson Welles) ^ Forum  Programmierung  #2884540 Re(6): wieder mal Vb hellraiser 18.10.2005, 21:10:23 Und zwar ist der Hänger drinnen, sobald er von der Private Sub Timer1.Timer() in die IOout(dat) springen sollte, und somit die Leitungen aktualisiert werden sollten. Habs oben im Text schon so ausgebessert. Exe lässt sich erstellen, nur bleibt die hängen ^ Forum  Programmierung  #2884839 Re(7): wieder mal Vb Somnatic 18.10.2005, 22:50:52 also direkt beim sprung kann er nicht hängenbleiben ... es mus genau bei einer zeile sein ... was passiert wenn du den breakpoint auf die erste zeile der IOOut setzt ? Wozu weibliche Unvernunft imstande ist, hat sich schon an der Idee erwiesen, sich von einer sprechenden Schlange Diätvorschriften geben zu lassen. (Orson Welles)

 

Dieses Forum ist eine frei zugängliche Diskussionsplattform.
Der Betreiber übernimmt keine Verantwortung für den Inhalt der Beiträge und behält sich das Recht vor, Beiträge mit rechtswidrigem oder anstößigem Inhalt zu löschen.
Datenschutzerklärung