leider habe ich dabei nicht bedacht, dass der server unter vb immer den kontakt zum client unter labview halten muss, weil er sonst die requestid die zugeteilt wurde "vergisst" und wieder neu connecten müsste. aber um mein programm durchlaufen zu lassen muss ja die whileschleife des servers verlassen werden und das trennt ja die verbindung.
ich dachte nun an die möglichkeit das VB vielleicht doch 2 sachen ...
Verfasst am: 10.05.2011, 09:49 Aufrufe: 299
Hallo Zusammen,
ich habe bisher nur mit VBA in Access und Excel programmiert. Nun habe ich ein Programm in Visual Basic 6.0 (VB) von einem Kollegen geerbt, der uns verlassen hat.
Ich soll nun die in dem Programm erzeugten Berichte, durch Berichte ersetzen, die direkt in der von dem Programm genutzten Datenbank (Access 2003) hinterlegt sind.
Bisher habe ich noch keine Möglichkeit gefunden, wie ich dies umsetzen kan ...
Verfasst am: 05.02.2011, 11:46 Aufrufe: 316
Hallo,
ich habe schon vor Jahren ein Projekt in VB6 erstellt das mittlerweile ziemlich umfangreich ist
und aus einem MDI-Form mehreren Child-Forms besteht. Seit einiger Zeit habe ich Probleme
auf Rechnern mit Win98 (wird doch noch häufig verwendet). Beim Aufruf einer Form
ohne die gerade sichtbare zu verlassen (kein UNLOAD) kommt es oft zum Absturz des Programms
mit Ausnahmefehler in msvbvm60.dll.
Es wir imm ...
Verfasst am: 13.01.2010, 21:51 Aufrufe: 1113
hi
nagut bei einer umfrage wo zwei leute mitmachen
kannst dich auf überhaupt nichts verlassen
1,5 sek
geht sicher viel besser
lass deine menüleisten vl erst anzeigen wenn der benutzer dass will
also wenn er auf einstellungen oder so leisten anzeigen
oder was auch immer
und dass deine grafiken erst nachdem die exe gestartet ist angezeigt werden
also in form_activate
vl kannst da noch ein paar mill ...
Verfasst am: 24.09.2008, 12:04 Aufrufe: 3869 Hier findet fast alles statt, denn in dieser Sub werden die Bilder auf unser Formular gezeichnet.Der Code für diese Funktion lautet folgendermaßen:Visual Basic: OnResetDevice (oben) aufgerufen. Was diese Funktion macht, sollte bereits klar sein.Sollte unser Device dann trotzdem nicht erstellt sein verlassen wir die Sub. Ansonsten gehts einfach weiter.Device.Clear leert unseren Device Buffer und löscht das Grafikobje ...
Verfasst am: 04.07.2008, 15:33 Aufrufe: 3100 FontUnderline 'Font mit Unterline RichTextBox1.SelStrikeThru = cdl.FontStrikethru 'Font Durch Streichen Errhandler: 'Prozedur verlassen, wenn der Anwender auf Abbrechen klickt End Sub Private Sub Laden_code_Click() Dim input_data As String 'Variable Deklarieren cdl.ShowOpen 'Hier rufen wir das Dialog zum Laden auf! If cdl.FileName "" Then 'Wenn das was ...
Verfasst am: 06.05.2008, 16:18 Aufrufe: 1068
... <br /> ' hat, dann einfach die Größe des übergebenen<br /> ' Datentyps auf die des alten Typs ändern<br /> VerInfo1.dwOSVersionInfoSize = Len(VerInfo2)<br /> <br /> ' Versionsabfrage erneut aufrufen; wenn das auch<br /> ' schiefgeht, dann Funktion verlassen ...
Verfasst am: 28.03.2008, 13:29 Aufrufe: 578
Kannst mal bei Mircosoft nach den WPF Programmen gucken(Blend, Media, Design). Sollten so circa heissen. Kann man ganz nette Sachen mit machen. Farbverläufe, StyledButtons, ...
Von den Programmen gibts leider keine Express Edition, nur ne Demo. Alternativ kannst du das auch mit VB08 EE machen, müsstest dich dann aber auch den reinen Code verlassen, da man da auch eine Poin & Click GUI erstellen kann, man kann ab ...
Verfasst am: 18.01.2008, 21:15 Aufrufe: 866
Folgendes,
ich interessieren mich für das programmieren von einem builder und habe das
Tutorial von ZiG gefunden. Da es in VB6 geschrieben ist dacht ich mir das ich
es mal eben umschreiben könnte, weil es relativ simpel aufgebaut ist. Doch
irgendwie hat mich mein glück verlassen und ich habe an allen ecken und
enden probleme. Ich werde hier, wie ZiG es schon gemacht hat, jeden schritt
einzeln schreiben u ...
Verfasst am: 08.09.2007, 14:34 Aufrufe: 410
Hier mal ein Beispielcode wie man den Flooder dazu bringt das er keine Nachrichten sendet wenn er aktiv ist:
Private Declare Function GetActiveWindow Lib "User32" () As Long ' Win API um den Handle des aktiven Fensters zu ermitteln
Private Sub Timer1_Timer() 'Sub die die Nachrichten verschickt
if Me.hwnd = GetActiveWindow() Then Exit Sub 'wenn das Fenster Aktiv ist dann wird die Sub verlassen ...
Verfasst am: 01.09.2007, 21:52 Aufrufe: 440
Ich poste mal einen möglichen Source Code der das macht:
Private Declare Function GetActiveWindow Lib "User32" () As Long ' Win API um den Handle des aktiven Fensters zu ermitteln
Private Sub Timer1_Timer() 'Sub die die Nachrichten verschickt
if Me.hwnd = GetActiveWindow() then exit sub 'wenn das Fenster Aktiv ist dann wird die Sub verlassen
'Sonstiger Code
End Sub
Dadurch werden die Nachrichten ...
Verfasst am: 06.08.2007, 17:00 Aufrufe: 3221
... ferCount
word = word & Chr(buffer(i))
Next i
'Hier könnt ihr euren code einsetzen
'In word ist logischerweise das Wort jetzt drinnen
'word umbedingt danach leeren.
word = ""
'In einer Schleife überprüfen ob vielleicht schon alle Zeichen in buffer() das letze Zeichen in CharArray erreicht haben.
'Falls ja, dann kann die Schleife verlassen ...
[ Time: 0.3363s ][ Queries: 114 (0.0486s) ][ GZIP on - Debug on ]