Visual Basic Forum

Verfasst am: 14.05.2012, 14:11 Aufrufe: 64

Die meisten Tools sind noch nicht verfügbar, aber es wird daran gearbeitet. Es werden auch mit manchen Updates Tools entfernt oder hinzugefügt. Folgende Tools sind in dieser Version vorhanden: -Anti-Virus -E-Mail -Wetterzentrale -Nachrichten -Cool Tool-Box Sozial Für Vorschläge, Fragen oder bei Fehlern bitte die im Programm enthaltene Feedback Funktion benutzen. Download (Server nicht immer verfügbar): ...

Verfasst am: 30.04.2012, 14:45 Aufrufe: 93

Hallöchen, ich komme mal gleich zur Sache: Habe einen zweidimensionalen Array und in Position array(0,0) einen Wert gespeichert. Will ich diesen wert abfragen, bekomme ich eine indexoutofrange-meldung. Es ist definitiv ein wert in array(0,0) vorhanden. Was soll das? habe es zuerst mit einer variablen versucht und jetzt sogar fix array(0,0) stehen, aber keine Chance. Woran kann das liegen? Danke schonmal an all ...

Verfasst am: 02.04.2012, 13:33 Aufrufe: 195

Verfasst am: 30.01.2012, 12:50 Aufrufe: 591

Schön und gut. Du hast eine Methode für eine Textbox geschrieben. Das heisst, jede Textbox kann diese Methode verwenden. Und wie frage ich nun die Form ab, welche Controls vorhanden sind? Wenn ich sie habe, wie frage ich die Form welche Typen die Controls haben? Das muss ich alles abfragen... wie ich eine textbox abfrage und aktionen ausführe ist nicht das problem sondern die abfrage der controls und der typen ...

Verfasst am: 26.01.2012, 10:17 Aufrufe: 591

Hallo zusammen, ich habe ein Formular erstellt, welches verschiedene Steuerelemente beinhaltet. Beispielsweise sind dort Label, Textboxen, Checkboxen etc. vorhanden. Diese Steuerelemente (Controls) sind in einem TabControls auf verschiedene Tabs verteilt. Nun möchte ich eine Schleife erstellen, die durch die Form geht, alle Controls ermittelt und dann abfragt, um welchen Typ es sich handelt. Wenn ich das habe ...

Verfasst am: 14.12.2011, 15:52 Aufrufe: 492

Hallo, ich stehe vor volgendem Problem. Ich möchte alle Items einer Listbox auslesen und prüfen ob meine Variable messageSplit(1) schon vorhanden ist. Das ganze ist in einem If Befehl und sieht etwa so aus: If List1.List(0).Contains(messageSplit(1)) Then WinSock(Index).SendData "Sie haben sich beim letzten mal nicht Ausgeloggt!" Else List ...

Verfasst am: 08.12.2011, 12:12 Aufrufe: 453

eine Anforderung an die Cracks hier im Forum. Ich benötige ein VB-Script, welches 2 .xls-Dateien vergleicht. Es soll überprüfen, ob alle Inhalte aus der ersten Excel-Tabelle in der 2. auch vorhanden sind. Wenn nicht, soll er die fehlenden Excel-Tabellen in eine 3. Tabelle hineinschreiben. Hier mal ein Pseudocode, den ich mir zusammengestellt habe. Da ich die Syntax nicht kenne würde ich gerne wissen, ob sic ...

Verfasst am: 23.10.2011, 17:57 Aufrufe: 326

... 55 0 0 27374 Lederhandschuhe 2011-02-17 20:05:46 0/0/0/0 84 84 255 0 0 In anderen Forms des Projektes sind alle "Produkte" aufgelistet und ich möchte danach je nach "Status" eine Picturebox mit einem anderen Bild befüllen. Es gibt dabei folgende Möglichkeiten: 1) Eine ID taucht nicht in der Liste auf - soweit das einfachste, die Picturebox ist standardmäßig auf "Nicht vorhanden ...

Verfasst am: 26.06.2011, 16:26 Aufrufe: 247

In meinem Tool gibt es eine Textbox und da muss man eine E-Mail angeben um sich anmelden zu können.Dieses Tool muss auf den Server zugreifen und wenn dann die E-Mail dort schon vorhanden kommt ein Fehler Kann mir jemand den Source Posten,peer PN ist auch nice! Weil ich brauch das dringend! mfg X-Righter

Verfasst am: 21.06.2011, 18:44 Aufrufe: 247

In meinem Tool gibt es eine Textbox und da muss man eine E-Mail angeben um sich anmelden zu können.Dieses Tool muss auf den Server zugreifen und wenn dann die E-Mail dort schon vorhanden ist geht es weiter! Kann mir jemand den Source Posten,peer PN ist auch nice! Weil ich brauch das dringend! mfg X-Righter

Verfasst am: 21.05.2011, 16:46 Aufrufe: 847

Text = (dlgFolderOpen.SelectedPath) End If Next End If Jetzt möchte ich aber noch die Icons wie im VLC Player (siehe Bild) angezeigt werden, also das Cover (siehe Bild) von der Musikdatei. Wenn kein Cover (Icon) vorhanden ist (siehe Bild) soll er ein Icon aus einer Imagelist nehmen. Hier ein Bild zur Erklärung: Ich hoffe ihr könnt mir helfen. Very Happy

MFG Do ...

Verfasst am: 25.03.2011, 01:11 Aufrufe: 1244

Split("=") File(i) = strTeile(0) Size(i) = strTeile(1) aktuelleDatei = MyPfad & "\" & File(i) Me.ProgressBar2.Maximum = 307 Me.ProgressBar2.Value = i Dim vorhanden As Boolean = My.Computer.FileSystem.GetFileInfo(aktuelleDatei).Exists() I ...

Verfasst am: 20.02.2011, 09:51 Aufrufe: 516

Verfasst am: 19.02.2011, 05:14 Aufrufe: 410

Hallo, die Frage habe ich nicht ganz verstanden. Die msvbvm60.dll ist auf jedem Windows-System standardmäßig vorhanden. Ich habe bei den Win98 Rechnern diese auf den neuesten Stand gebracht. Das ändert nichts. Grüße cydney1996

Verfasst am: 02.02.2011, 00:18 Aufrufe: 640

Line (0, 0)-(6, 6), vbWhite, B Next i Call SetzeAnf(False) End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) If UnloadMode = 0 Then ' Schliessen unterbinden Cancel = 1 End If End Sub ' ' Focusrechteck zeichnen oder löschen, wenn bereits vorhanden ' Private Sub FlipFocusRect() Dim OldSetting As Boole ...

Verfasst am: 03.01.2011, 16:34 Aufrufe: 468

Hallo, ich habe ein uraltes VB6 Projekt geebrt. In diesem sind einige gekaufte Zusatzsteuerelemente benutzt worden und natürlich gibt es keine Original Disketten oder Lizenzunterlagen mehr. Die OCX' und DLL's sind natürlich auf dem Ausführenden System noch vorhanden, aber eben ohne Design-Lizenz. Nun müsste ich am Code ein paar kleine Änderungen durchführen und eine neue EXE erstellen. Dabei meldet VB6 das Fehl ...

Verfasst am: 18.12.2010, 13:30 Aufrufe: 418

Hallo Ich programmiere mit Visual Basic 2010 Ich möchte das mein Programm eine Datei erstellt mit einem bestimmten Namen, und zwar sollen die Dateien nach nummern genannt werden d.h wenn noch keine Datei vorhanden ist soll die datei "1" heißen, wenn eine datei mit dem namen "1" schon vorhanden ist soll die nächste datei "2" heißen u.s.w Mein Programm erstellt eine ".ini" ...

Verfasst am: 26.10.2010, 17:28 Aufrufe: 481

die connection soll halt in modsystem geöffnet werden. danach soll eine funktion aufgerufen werden, in der halt die DB kurz auf und zu gemacht werden soll hat das funktioniert soll es normal weiter gehen. gibt es einen fehler bzw. ist die DB nicht vorhanden, soll ein OpenFileDialog geöffnet werden in der man dann die neue DB bzw den neuen speicherort auswählen kann. ich hab zwar schon ein bissel rumgetüff ...

Verfasst am: 07.10.2010, 05:46 Aufrufe: 561

Die Zahlen lassen sich nun eingeben, jetzt gehts nur noch darum, die eingegebene Zahl mit der Spalte A in einem Excel File zu suchen, wenn vorhanden IO. gruß andy

Verfasst am: 20.09.2010, 13:03 Aufrufe: 725

Laut Doku geht das im "Projekt-Designer" unter "Einstellungen" - "Webeinstellungen laden". Aber nur wenn Sie auf der Seite Dienste Clientanwendungsdienste aktiviert und einen Speicherort für Webeinstellungsdienste angegeben ist. Mein Problem ist das bei mir im "Projekt-Designer" die Schaltfläche "Dienste" gar nicht vorhanden ist. Bitte um Untertsützung. Danke, ...

Verfasst am: 07.09.2010, 17:26 Aufrufe: 935

Verfasst am: 24.08.2010, 09:56 Aufrufe: 725

hmm naja ich stehe auch öfters vor dem gleichen problem ich prüfe immer vor dem start ob die ocx oder was acuh immer schon vorhanden ist wenn nicht wird sie abgelegt und nach dem beenden wieder entfernt (oder auch nicht) würde sagen dass da die möglichkeiten in vb6 etwas beschränkter sind Wink

lg

Verfasst am: 03.08.2010, 13:36 Aufrufe: 1031

txt" For Append As #3 On Error Resume Next For i = 1 To 2000 Input #1, zeile1 For j = 1 To 2000 Input #2, zeile2 Print #3, zeile1 & zeile2 Next Next Close #1 Close #2 Close #3 lg Hallo, danke auch Dir vorab! Aber da stimmt was nicht. Hast Du mal selbst getestet? Selbst wenn nur 3 Zeilen vorhanden sind - in der test2.txt 01 02 03 04 05 06 01 02 ...

Verfasst am: 04.05.2010, 12:31 Aufrufe: 576

Verfasst am: 25.03.2010, 11:27 Aufrufe: 599

Verfasst am: 23.03.2010, 23:24 Aufrufe: 593

Was nicht funkt ist der Range(hilf).activate befehl und evnt der Emptybefehl.Ich habe auch direkt mit Range("A"+str(i)) probiert aber es funkt auch nicht. Könnt ihr mir bitte weiterhelfen und wenn möglich noch verraten wie die Syntax lautet zu Prüfen ob statt ein Text eine Zahl Vorhanden ist. (Hab Microsoft Visual basic 6.5 version) Ich hoffe ich habe mich einigermaßen verständlich ausgedrückt. ...

Verfasst am: 27.01.2010, 09:58 Aufrufe: 671

IO im Code per "Imports System.IO" eingebunden. Also dieser Fehler bezieht sich ja auf die DLL "mscorlib.dll". Diese ist auf dem Rechner des Arbeitskollegen vorhanden. Wieso findet er sie dann aber nicht? Danke für die Antworten. p.s. ich habe die Suche des Forums auch probiert aber nach meiner Suchanfrage bekam ich immer den Fehler "Die Seite kann nicht angezeigt werden" daher ...

Verfasst am: 18.01.2010, 16:47 Aufrufe: 527

1 In einer MySQL Datenbank habe ich "fremde" Texte (z.B. Jap/Chin) gespeichert. Die entsprechenden Spalten in der MySQL Datenbank sind also vom Zeichensetz "ujis" etc. Die Texte sind mit dem MySQL Query Browser korrekt sichtbar, also auch tatsächlich vorhanden Wink

Problem: Lesen von jap./chin. Inhalten aus der Datenbank liefert nur "???". Schreiben in die Datenbank geht auch nich ...

Verfasst am: 04.01.2010, 01:00 Aufrufe: 1549

Hallo, ich hatte mal Langeweile und hatte so ein kleines lustiges Kopfrechen Programm Programmiert. Das ganze ist Inspiriert von einer Frage hier aus dem Bereich Fragen zu VB6 wie ich zu geben muss, nur, dass ich es ein wenig weiter programmiert habe. Ich finde, dass Ergebnis lässt sich sehen. Bei dem ganzen geht es darum einige sehr einfache Kopfrechen Aufgaben möglichst schnell zu lösen. Je schnelle desto meh ...

Verfasst am: 14.12.2009, 22:49 Aufrufe: 538

Liebe Enwtickler/innen ! Ich habe hier eine Frage zu einem fertigen Projekt von mir: Das programm is kurzum dazu da, um eine Mysql-Datenbank nach Inhalten zu dursuchen und diese in einer Listbox anzuzeigen. Es funktioniert alles schön und gut. Das alles ist durch ein Login geschützt, um zu sehen, ob der user auch im Forum vorhanden ist. Funktioinert gut und recht. Nur bekommen andere User (alle anderen) folge ...

Verfasst am: 08.12.2009, 21:50 Aufrufe: 723

ich bin im begriff ein kleines spielchen zu programmieren; paar vorkenntnisse dementsprechend vorhanden Wink

nun weiß ich zwar, wie man mit der MouseOver-Funktion umzugehen hat, aber ich stelle mir die frage, wie man so eine "Over"-Funktion hinzukriegen hat bei beispielsweise 2 labels. im prinzip habe ich folgendes problem: --------------------- ein label, welches mittels eines timers über die form ...

Verfasst am: 05.12.2009, 20:42 Aufrufe: 476

Verfasst am: 03.12.2009, 20:50 Aufrufe: 1228

Webseiten einlogen soll. Das Prog merkt sich auch gleich die Cookies, damit er, sollte ein Cookie vorhanden sein, gleich mit Cookie nach dem login weitergeleitet wird. Dim username, password As String username = "TestUser" password = "TestPW" 'Cookie Container erstellen um bei der nächsten Anfrage wieder eingelogt zu sein Dim Request ...

Verfasst am: 19.11.2009, 09:08 Aufrufe: 1637

Ich habe mich ma an die Arbeit gemacht und euch ein kleines Druckmodul geschrieben.Damit könnt ihr- Testen , ob ein Drucker vorhanden ist, wenn ja , wird er angezeigt- Drucken - Bis jetzt sonst nichts mehr :DNaja , ihr könnts euch mal anschauen.Der Vorteil dabei ist, dass ihr nicht immer den Code schreiben müsst (falls euer Tool überhaupt die Druckfunktion braucht) , sondern einfach die Funktion aufrufen könnt.Das Mo ...

Verfasst am: 11.11.2009, 13:04 Aufrufe: 1426

B ich gebe ich die Maske ein AT02 Dann sollte mir das Programm sagen, dass ich für AT02 schon die SalesOrg2 definiert habe. Gebe ich eine Kombi an z.B BETX und DE02, dann sagt er mir SalesOrg3. Wenn ich was eingebe, dass noch nicht vorhanden ist, sollte er mir eine Nachricht ausspucken "Du musst eine neue Zuordnung anlegen" Meint ihr das ist möglich? Wie mache ich das? Ich hoffe ihr könnt hi ...

Verfasst am: 11.11.2009, 10:33 Aufrufe: 489

B ich gebe ich die Maske ein AT02 Dann sollte mir das Programm sagen, dass ich für AT02 schon die SalesOrg2 definiert habe. Gebe ich eine Kombi an z.B BETX und DE02, dann sagt er mir SalesOrg3. Wenn ich was eingebe, dass noch nicht vorhanden ist, sollte er mir eine Nachricht ausspucken "Du musst eine neue Zuordnung anlegen" Meint ihr das ist möglich? Wie mache ich das? Ich hoffe ihr könnt hier w ...

Verfasst am: 14.10.2009, 12:21 Aufrufe: 370

Ich habe zwei Comboboxen. In einer ist eine Auzählung schon vorhanden und in der anderen nicht, wenn ich jetzt in der ersten Box etwas auswähle, dann soll in der zweiten Box eine bestimmte Aufzählung angezeigt werden und wenn ich in der ersten Box etwas anderes auswähle, dann soll in der zweiten Box etwas anderes Angezeigt werden. Wie funktioniert das?

Verfasst am: 28.09.2009, 18:03 Aufrufe: 921

Ich gehe dabei aber immernoch über ein normales array. Die Textdateien sehen folgendermassen aus: Kundennummer;Kundenname;Seriennummer;Username;Datum;Uhrzeit;Zugriffsdauer;Status;Fehler;Fehler2 in soeiner Textdatei welche eine Logdatei darstellt können an die 100000 Datensätze vorhanden sein. Mein Programm sieht im moment folgendermassen aus: Sub daten() Dim i As Integer Dim j As Intege ...

Verfasst am: 28.09.2009, 17:10 Aufrufe: 570

... ne/Unseres erste projekt soll ein Downloader sein wie oben gesagt! der downlaoder soll für einen Internet-Seite sein! weiter folgt von mir wenn genügend leute dabei sind! Fortsetzung!!: es wüsste jemand dabei seine der sich mit quelltexten (html) auskennt! und dann in den Downloader einbinden kann! automatische captcha erkennung programmieren kann Auslesen der Internet-Seite wieviel Speicher noch vorhanden ...

Verfasst am: 16.09.2009, 12:03 Aufrufe: 888

Text = "" 'wenn Datei nicht vorhanden If Dir$(Dateipfad1) = "" Or Dir$(Dateipfad2) = "" Then MsgBox "Eine oder beide Dateien sind nicht vorhanden!", vbCritical, "3rr0r" GoTo Ende End If 'Dateien zum Lesen öffnen F = FreeFile Open Dateipfad1 For Input As #F G = FreeFile Open Dateipfad2 For Input As #G 'Zeilenweise durcharbeiten While Not EOF(F) lRow = lRow + 1 'Zei ...

Verfasst am: 06.08.2009, 16:32 Aufrufe: 475

Hey ich brauche einen VBA Code der den Namen einer Textdatei ließt (nicht den Inhalt) und vergleicht ob ein Ordner mit dem selben Namen schon vorhanden ist. Wenn ein Ordner mit dem gleichen Namen der textdatei vorhanden ist dann soll die datei in den Ordner verschoben werden. danke schon mal für die Hilfe. Bye

Verfasst am: 06.08.2009, 13:25 Aufrufe: 1090

... rledigt") End Try End Sub [/code] Wie man sieht werden hier zwei "Fehlersorten" abgefangen, einmal die allgemeinen Fehler (Exception) und dann noch eine spezielle Ausname, die DriveNotFoundException, d.h hier wurde das Laufwerk Z: nicht gefunden. Innerhalb des Catch-Blockes kann wiederum ein Try-Konstrukt mit Code stehen, hier wird jetzt versucht auf C: die Datei zu öffnen, da sie dort nicht vorhanden ...

Verfasst am: 17.07.2009, 14:43 Aufrufe: 1176

Verfasst am: 15.07.2009, 09:38 Aufrufe: 1461

Hallo, wenn ich dich richtig verstanden habe möchtest du bestimmte Elemente im Array nach Inhalt überprüfen, richtig? Oder möchtest du generell wissen ob in deinem Array Daten vorhanden sind? Wenn du ein bestimmtes Element abfragen möchtest geht das ungefähr so: If array(0)="" then MessageBox.Show("Kein Inhalt") Else MessageBox.Show(array(0)) End If ...

Verfasst am: 10.07.2009, 22:21 Aufrufe: 2213

Bei den Unterverzeichnissen haben die Ordner immer die gleichen Namen. Desweiteren wäre es gut, wenn die Kundenbezeichnung im Ordnernamen automatisch gross geschrieben wird. Sollte es durch zufall den Hauptordner schon geben, sollte mir das Programm sagen, das dieser Ordner schon vorhanden ist. Das Programm darf den vorhandenen Ordner auf keinen Fall überschreiben. Die neu erzeugte Ordnerstruktur sollte standartm ...

Verfasst am: 06.07.2009, 17:59 Aufrufe: 648

Verfasst am: 01.07.2009, 11:10 Aufrufe: 1760

Updater ist ein Steuerelement für VB6 um einfach eine Update Funktion in sein Programm integrieren zu können. Download Ob Updates vorhanden sind wird überprüft indem eine Datei aus dem Internet heruntergeladen wird. Die erste Zeile dieser Datei muss die Version die angefragt hat enthalten und die zweite Zeile die neueste Version des Programms. Wenn es eine neue Version gibt folgt dann eine Liste mit Dateien die ...

Verfasst am: 29.06.2009, 13:59 Aufrufe: 771

Beschreibung:Mit der Funktion lässt sich einfach prüfen, ob ein Host im Netzwerk vorhanden ist. Die Funktion erwartet entweder der Hostnamen oder die IP-Adresse und gibt True zurück, wenn der Host vorhanden ist bzw. False, wenn nicht.Funktion:Visual Basic: Quelle: vbarchiv.net

Verfasst am: 25.06.2009, 02:35 Aufrufe: 650

ini datei mit dem namen: "absender.ini" vorhanden ist, soll eine solche erstellt werden. ist eine vorhanden, sollen entsprechend die daten in folgende text felder ausgelesen werden: txt_vorname, txt_nachname, txt_strasse, txt_plz, txt_ort, txt_telefon, txt_mobil, txt_email, sollten nicht keine oder alle felder NICHT gefüllt sein soll eine entsprechende Information erscheinen, dass diese Feld ...

Verfasst am: 20.06.2009, 14:06 Aufrufe: 656

... g, ihr tragt die Auktionsdaten ein und klickt auf "Eintragen" dann werden die Auktionen eingetragen. Mit dem Button "Speichern" könnt ihr alle Auktionen in einer Textdatei speichern ( um es zum Beispiel auszudrucken), ihr müsst bevor ihr das Programm schließt nicht extra die Auktionen Speichern das Programm speichert automatisch die Auktionen und diese sind auch beim Neustart wieder vorhanden ...