Visual Basic Forum

Verfasst am: 02.04.2012, 13:06 Aufrufe: 147

... er in Fahrtkosten n = 1 ' Zähler für laufende Nummer in Einzel_Nachweis fk_zeileneintrag = 1 en_zeileneintrag = 1 zeile_fahrten_aktivitaet = 10 blattnr = 1 en_blattnr = 1 zeile_fahrten_start = 10 lfdnr = 1 zeile_meisterschaften_aktivitaet = 5 zeile_fahrtkosten_aktivitaet = 19 flag = True flag_neues_blatt = False ' Inhalt in den Tabellen leeren ...

Verfasst am: 15.02.2012, 14:49 Aufrufe: 260

Hallo, ich habe ein DataGridView dessen Inhalt in eine XML gespeichert werden soll. Lesen/Schreiben von/in XML funktioniert soweit auch gut. Nun möche ich die DGV per Button leeren und in zelle 0;0 (also die erste) das aktuelle Datum eintragen lassen. Diese (fast) leere DGV soll dann wieder in die XML geschreiben werden. Das Leeren an sich und das Eintragen des Datum funktioniert auch aber der Inhalt (das Da ...

Verfasst am: 14.09.2011, 07:34 Aufrufe: 561

hm, ist wohl nicht das, was ich suche. Finde ich aber dennoch interessant. Was ist denn dein Papier und wie bekommst du die Linien hin? Bei mir funtioniert übrigens nur der Explorerer mit der Vorschau von jpg's, die Anzeige von Linien, wenn ich auf "Hilfslinien" klicke und das Drucken eines leeren Papiers. Wahrscheinlich soll doch das Bild auf das Papier kommen, oder? Drauf Ziehen funktionier ...

Verfasst am: 02.11.2010, 08:24 Aufrufe: 574

hi tut mir leid dich entäuschen zu müssen aber es gibt leider nichts anderes... was du aber machen könntest ist die imagebox im mouse_down event zu leeren und dann eben mouse_move... und zums schluss beim mouse_up das bild wieder zu laden ansonsten wirst du dich wohl oder übel damit zufrieden geben müssen dass es flackert lg

Verfasst am: 26.10.2010, 19:17 Aufrufe: 257

Ich suche eine Möglichkeit ein structure, welche wiederum aus mehreren untergeordneten structure besteht, zu leeren. Es soll so sein, dass die Werte der enthaltenen untergeordneten structure alle auf Nothing gesetzt werden und nicht der Wert der obersten structure einfach Nothing ist. z.B. structure structGesamt Dim A() As structA Dim B As structB '... End structure

Verfasst am: 22.03.2010, 20:46 Aufrufe: 571

Anhand der getroffenen Auswahl schreibt mein Makro dann die dazugehörigen Daten in ein anderes Arbeitsblatt. In der Auswahl Spalte kommen jetzt aber natürlich die Begriffe mehrfach vor und ich bekomme die dann halt einfach untereinander mit den vielen Mehrfachnennungen und auch zum Teil leeren Zeilen in meiner Combobox angezeigt. Das ist sehr unübersichtlich und führt dazu das man oft mehrmals nach dem gleichen Begr ...

Verfasst am: 30.12.2009, 17:48 Aufrufe: 1202

tblTische". Sie können sie bei Bedarf verschieben oder entfernen. Me.TblTischeTableAdapter.Fill(Me.BetriebsmittelDataSet.tblTische) 'Felder leeren txtWerkzeugNr.Text = "" txtAussenDurchm.Text = "" txtBohrungDurchm.Text = "" txtAussparungsDurchm.Text = "" txtWinkel.Text = "" txtTiefe.Text = ...

Verfasst am: 30.12.2009, 11:55 Aufrufe: 1202

tblTische". Sie können sie bei Bedarf verschieben oder entfernen. Me.TblTischeTableAdapter.Fill(Me.BetriebsmittelDataSet.tblTische) 'Felder leeren txtWerkzeugNr.Text = "" txtAussenDurchm.Text = "" txtBohrungDurchm.Text = "" txtAussparungsDurchm.Text = "" txtWinkel.Text = "" txtTiefe.Text = ...

Verfasst am: 01.08.2009, 18:48 Aufrufe: 996

Text) = False Then 'wenn die eingabe keine zahl ist mache... txt_größe.Text = "" 'textbox leeren txt_größe.SetFocus 'den cursor in die box setzen Beep 'einen beepton ausgeben Exit Sub 'wie oben End If lg und viel erfolg mit deinem bmi rechner (ich hasse den bodymaß index ... er sagt bin knapp am über ...

Verfasst am: 22.07.2009, 12:19 Aufrufe: 395

also wenn ich dich richtig verstanden habe speicherst du deinen selektierten Text in eine Variable!? Dann musst du die Variable bevor du erneut selektierst leeren. Dann steht der Text von vorher auch nicht mehr drin.

Verfasst am: 05.07.2009, 20:39 Aufrufe: 1917

Beschreibung: Dieser Tipp zeigt, wie man zur Laufzeit Tabs zu einem TabControl hinzufügen und diese auch wieder entfernen kann. Funktion: Visual Basic: Beispielprojekt: http://www.activevb.de/tipps/vbnetdownloads/tipp0057.zip Quelle: activevb.de

Verfasst am: 15.06.2009, 21:13 Aufrufe: 1313

Der folgende Code setzt den Text aus allen Textboxen auf einer Form zurück. For Each oControl As Control In Me.Controls If TypeOf oControl Is TextBox Then oControl.Text = "" End If Next

Verfasst am: 15.06.2009, 18:53 Aufrufe: 1159

Win32NT) Then SetProcessWorkingSetSize(Process.GetCurrentProcess().Handle, -1, -1) End If End Sub End ClassDiese entlädt alles unnötige aus dem Ram, denn selbst ein Projekt mit nur einer leeren(!) For ...

Verfasst am: 15.06.2009, 12:35 Aufrufe: 2648

OpenTextFile(Filename, ForWriting, True)So wird also die Textdatei im Schreibmodus geöffnet und falls sie nicht existiert soll er sie gleich erstellen.Genauso könnte man hier Append nutzen.4.1 Zeilen Eine Zeile in die Datei schreiben:tStream.WriteLine("Text")Ist also eigentlich sehr simpel.Außerdem gibt es noch die Möglichkeit eine bestimmte Anzahl an leeren Zeilen auf einmal zu schreiben.tStr ...

Verfasst am: 15.06.2009, 12:16 Aufrufe: 1917

exe") For Binary As #1 Put #1, LOF(1) + 1, buffer buffer = "" Close End SubIn buffer empfangen wir die einzelnen Teile.Und mit Put #1, LOF(1) +1, buffer schreiben wir jeden Teil ans Ende der Datei.Zur Sicherheit leeren wir dann noch die Variable buffer 4. FazitWie ihr seht ist es also gar nicht so schwer. :wink:Natürlich ist das Beispiel ...

Verfasst am: 15.06.2009, 12:16 Aufrufe: 9600

Einträge löschenZuletzt zeige ich noch wie man Einträge löschen kann.Über diesen code läßt sich eine Zeile wieder entfernen.lv.ListItems.Remove (Index)Dazu müßt ihr natürlich den Index, also die Nummer der Zeile wissen.Eine Liste komplett leeren kann man über diesen Aufruf:lv.ListItems.ClearSo. Das war es jetzt erstmal. Ich hoffe ich konnte euch ein wenig die Grundfunktionen eines ListViews erklären.Folgende ...

Verfasst am: 15.06.2009, 12:12 Aufrufe: 2713

SubItems(1), "David" , vbTextCompare) = 0 Then End IfSubItems(1) entspricht der zweiten Spalte, SubItems(2) der dritten und so weiter.3. Über eine Schleife Einträge löschen.Nun wollen wir Einträge wieder löschen.Wenn ihr die komplette Liste leeren wollt geht das einfach mit:lv.ListItems.ClearJetzt wollen wir aber nur markierte Einträge aus der Liste löschen.Dazu müßt ihr in ...

Verfasst am: 15.06.2009, 11:32 Aufrufe: 1865

Beschreibung:Mit dieser Funktion kann man ein String (oder Integer)-Array von leeren Feldern befreien. Dabei wird das Array der Funktion übergeben und bearbeitet. Es wird sortiert, die leeren Felder ermittelt, gelöscht und danach das Array wieder auf die passende Größe reduziert. Dabei geht aber die ursprüngliche Reihenfolge der Elemente verloren.Die FunktionPrivate Function clean_Array(ByRef ar() As Stri ...

Verfasst am: 17.02.2009, 14:14 Aufrufe: 3131

hi naja einen leeren string schreiben ... ich weis nicht ob das so super ist beende einfach den sub wenn das texfeld leer ist oder mach eine msgbox meinen eigenen ftp server eintragen... zum einen hab ich keinen weder weis ich wo oder wie ich sowas kriege... und zum zweiten ich hab zwar vbnet und kann auch ein bisschen was vom quelltext lesen aber ich könnte nix damit schreiben da ich einfach bei .net auf d ...

Verfasst am: 17.02.2009, 13:19 Aufrufe: 3131

. wenn man etwas falsches eingibt sollest du auch prüfen da sonst wiederum ein fehler auftritt lg ich habe nun eine absicherung eingebaut aber normalweise sollte keine fehlermeldung kommen, zumindest ist bei mir nie eine gekommen weil falls die textfelder leer sein sollten, schreibt er halt einen "leeren" string in die textdatei. ich glaub der fehler, den du meinst, kommt wegen den ftp-daten ...

Verfasst am: 17.02.2009, 11:15 Aufrufe: 3131

Verfasst am: 20.10.2008, 10:32 Aufrufe: 595

Also Leute, ich brauche eure Hilfe bei folgender Aufgabe: ********************************************* Ich habe 4x4 im Quadrat angeordnete Commandbuttons, Caption durchnummeriert von 1 bis 15 + Caption des letzten Feldes ist leer. (sieht aus wie ein Taschenrechner). Funktion des Programms soll sein: Beim clicken auf den "leeren" Commandbutton soll die Zahlen alle einen nach rechts wandern. Das ganze soll mit e ...

Verfasst am: 24.08.2008, 14:26 Aufrufe: 1067

Doch hab ich, ich hab mir beide Mysql Tutorials angesehen von dir, aber das Connecting funktioniert nicht. Ich habs mit einer leeren Datenbank und eine mit einigen Tabellen. Meine Adresse zu den Datenbanken ist: http://phpmyadmin.simtractor.si.funpic.de/ liegt das vielleicht daran?Ich denke ich hab alle Datenrichtig eingeben, wie den server localhost. Es kommt auch keine Fehlermeldung

Verfasst am: 15.08.2008, 19:39 Aufrufe: 1166

Verfasst am: 13.08.2008, 22:02 Aufrufe: 1166

Mit dem Problem des überschreibens:Schonmal drüber nachgedacht, beim druck auf die Screenshot Taste vorher die Picturebox zu leeren?Dann sollte es sich nicht überlagern.Voraussetzung: Du realisierst das ganze mit ner Picturebox.Zum speichern Problem, hat dir bla ja schon ne Antwort gegeben.Ansonsten würde ich das über den Savedialog machen, damit der User sich auch einen Platz aussuchen kann, wo er es speichern will.

Verfasst am: 13.08.2008, 21:50 Aufrufe: 1166

Verfasst am: 04.07.2008, 16:33 Aufrufe: 3309

FileName For Input As #1 'Hier öffnen wir die Datei die gerade ausgewählt wurde! RichTextBox1.Text = "" 'Richtextbox Leeren While Not EOF(1) 'wenn noch nicht am ende der datei Line Input #1, input_data 'Dann Lies weiter in die Varieable Line_Input ein RichTextBox1.SelText = input_data & vbCrLf 'Hier wird in Die Richtextbox alles was in Line_input drin Steht einge ...

Verfasst am: 04.07.2008, 16:06 Aufrufe: 3167

Willkommen zu Meinen 3 Tutorial :DHeute möchte Ich euch zeigen wie Mann Text in die dllLaden tut, und wie Mann denn Text dann in der Form abfangen kannDll SchreibenExe SchreibenVorteile:http://msdn.microsoft.com/de-de/library/dtba4t8b(VS.80).aspx 1. Als erstes Startet ihr ein Neues AktiveX-Dll Projekt (Sieht Mann im 1 AktiveX-Dll Tutorial) Jetzt macht ihr unter dem „Projekt Explorer“ Rechtsklick ...

Verfasst am: 17.06.2008, 21:05 Aufrufe: 746

hey leute ich hätte mal wieder eine frage ich hab jetzt mehrere imageboxen und die werden mit LoadPicture(pfad) befüllt kann man irgendwie prüfen ob: image1 leer ist... welches bild was angezeigt wird (den namen oder pfad) und kann man eine imagebox wieder leeren??? thx schon mal im vorraus lg

Verfasst am: 13.06.2008, 17:40 Aufrufe: 1031

Verfasst am: 07.06.2008, 19:07 Aufrufe: 865

1. wenn kein bild darin ist ist .picture = 02. du könntest mal versuchen den steuerelementen, die die liste benutzen eine andere oder keine zuzuweisen und diese dann zu leeren

Verfasst am: 11.05.2008, 15:46 Aufrufe: 1704

Ja das mit dem MultipleLine habe ich schon aktiv ich kann die box auch leeren und speichern.Aber ich kann die Datei Öffnen und Speicher nur von einem Ort.Also von C:datei.txt ich möchte aber das man Dateien von irgendeinem ort öffnen kann und auch irgendwo speichern kann.Ich weiß das ich open und filesave dialog brauche.

Verfasst am: 08.05.2008, 16:53 Aufrufe: 1437

Verfasst am: 19.04.2008, 18:09 Aufrufe: 729

also ich glaube ihr versteht mich alle nicht: ich habe eine datei die so aussieht: Hallo mein name ist marcel1994 So, diese lese ich jetzt ein: Dim alles As String Open "C:\data.txt" For Binary As #6 alles = Space(LOF(6)) Get #6, , alles Close #6 Nun möchte ich aus dem eingelesenen String "alles", die Leeren Zeilen ENTFERNEN, nicht ersetzen durch irgend ...

Verfasst am: 19.04.2008, 17:46 Aufrufe: 729

Verfasst am: 12.04.2008, 19:43 Aufrufe: 735

danke, nur geht es nicht ganz: Dim daten_all2 As String daten_all = Replace(daten_all, "") Ich habe eine .txt datei in den daten_all-String eingelesen und möchte nur die leeren zeilen entfernen. Warum geht es nicht?

Verfasst am: 11.04.2008, 17:35 Aufrufe: 1450

Sehr unübersichtlich und viel überflüssiger Kram, versuch mal den Buffer der geöffneten Datei vor dem Schließen mit Flush() zu leeren. Ich schreib dir später mal eine anständige Function zum vergleichen.

Verfasst am: 26.03.2008, 17:59 Aufrufe: 439

Ne das nicht, aber wenn man es deklariert, wird man schon wissen wo es anfängt. Btw. Verursacht Ubound bzw. LBound nen Fehler, wenn das Array nicht dimensioniert ist (z.B. wenn Split nen leeren oder falschen string übermittelt bekommt). Kann man umgehen wenn man es in eine extra Function packt mit ner Fehlerbehandlung. Hab auch mal iwo ne Function gesehen zum ermitteln ob das Array schon dimensioniert ist oder ...

Verfasst am: 17.03.2008, 20:28 Aufrufe: 3257

Beschreibung: Mit dieser Funktion kann man ein String (oder Integer)-Array von leeren Feldern befreien. Dabei wird das Array der Funktion übergeben und bearbeitet. Es wird sortiert, die leeren Felder ermittelt, gelöscht und danach das Array wieder auf die passende Größe reduziert. Dabei geht aber die ursprüngliche Reihenfolge der Elemente verloren. Die Funktion Private Function clean_Array(ByRef ar() ...

Verfasst am: 16.03.2008, 21:21 Aufrufe: 1421

EventArgs) Handles auswahl_games.SelectedIndexChanged auswahl_games.Items.AddRange(New String() _ {"Unreal Tournament 2004", "Painkiller Black Edition", "Quake 4 Arena"}) auswahl_games.SelectedItem = "Painkiller Black Edition" End Sub End Class Nur die Combobox bleibt nur mit einer leeren Auswahl bestehen, und ich verstehe nicht w ...

Verfasst am: 14.03.2008, 15:24 Aufrufe: 456

Textfeld leeren: Text1.Text = vbNullString Inhalt in Textdatei speichern: Dim sContent As String, sPath As String, FF As Integer sContent = Text1.Text sPath = "C:\datei.txt" FF = FreeFile Open sPath For Binary As #FF Put #FF, , sContent Close #FF

Verfasst am: 06.03.2008, 19:28 Aufrufe: 4075

OpenTextFile(Filename, ForWriting, True) So wird also die Textdatei im Schreibmodus geöffnet und falls sie nicht existiert soll er sie gleich erstellen. Genauso könnte man hier Append nutzen. 4.1 Zeilen Eine Zeile in die Datei schreiben: tStream.WriteLine("Text") Ist also eigentlich sehr simpel. Außerdem gibt es noch die Möglichkeit eine bestimmte Anzahl an leeren Zeilen au ...

Verfasst am: 27.02.2008, 20:28 Aufrufe: 616

ListCount - 1 ' buffer für pfad strPfade(comSerie.ListCount + 1) = strPfad ' episoden If booEpisoden = True Then EpisodenAuslesen strPfad End If End Function Private Function EpisodenAuslesen(strPfad As String) Dim strEpisode As String Dim a As Integer ' liste leeren lstEpisode.Clear ' episoden auslesen strEpisode = Dir(strPfad & &quo ...

Verfasst am: 24.02.2008, 00:30 Aufrufe: 508

Verfasst am: 16.02.2008, 13:46 Aufrufe: 817

Wo soll da das Problem liegen? Wenn er den Key in der Registry nicht findet, bzw. einen leeren String zurückgibt, dann ist das Spiel halt nicht installiert.

Verfasst am: 07.01.2008, 12:58 Aufrufe: 255

Was ist denn so schwer daran? Button Leeren: If txt_eingabe.Text = "" Then MsgBox("Kein Eintrag vorhanden!") Else txt_eingabe.Text = "" End If

Verfasst am: 07.01.2008, 12:49 Aufrufe: 255

Ich habe eine Form mit einer Textbox. DIe heisst: txt_eingabe Ich möchte nun, das bei drücken des Buttons: Leeren, Das Feld der Textbox frei wird. Ich dachte ich schaff das locker aber nein? Ich habe: Kill txt_eingabe.Text Wieso geht das nicht? Es soll doch den Text, in der Textbox "killen" ? Und ich möchte erweitert, wenn kein Text in der Textbos steht und man leeren klickt, das eine Mel ...

Verfasst am: 18.12.2007, 13:59 Aufrufe: 633

Mein Upload Programm Funktioniert ja schon gut, aber wenn es die 2. Datei (jeweils 100mb) per Winsock hochladen will, kommt der Fehler "Nicht genug Zeichenfolgenspeicher", meine frage ist jetzt, wie leert man den Speicher?

Verfasst am: 12.12.2007, 20:17 Aufrufe: 596

... al hWnd As Long, ByVal lOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long URL aus Textfeld öffnen: Call ShellExecute(App.PrevInstance, "Open", Text1.Text, "", "", 1) URL in Label anzeigen (hoffe ich hab dich richtig verstanden): Label1.Caption = Text1.Text Textfeld wieder leeren ...

Verfasst am: 05.12.2007, 19:13 Aufrufe: 987

... on einem POP3-Mailserver abzurufen, benötigen Sie folgende Informationen: * Name des Servers * Ihr Benutzername * Ihr Kennwort Ohne diese Daten können keine Mails abgerufen werden! ' Verbindung zum Mailserver herstellen Public Function MailConnectToServer(ByVal ServerName As _ String, ByVal UserName As String, ByVal Password As _ String) As Boolean ' Status-Fenster "leeren ...