Visual Basic Forum

Verfasst am: 19.05.2012, 06:56 Aufrufe: 82

Hallo Leute, ich bitte um Eure Hilfe. Es existiert ein String mit Datum und Uhrzeit im Format "2012-05-12 - 22'45'36". Wie kann ich ihn so umwandeln, dass ich damit SetCreationTime etc. neu setzen kann? Dim fileTime As DateTime fileTime = ??? File.SetCreationTime(sgPath_Target & sFilename_New, fileTime) File.SetLastWriteTime(sgPath_Target & sFilename_New, fileTime) Vielen Dank für Eu ...

Verfasst am: 17.05.2012, 07:57 Aufrufe: 143

CD anthology sales in 2011 fell by 13% in the UK, in adverse to downloaded anthology sales, which were up by 24%. Similarly, DVD sales fell by 7.2% aftermost year, whilst agenda rental affairs rose by 12%. Even gamers, who accept still been affairs in a concrete format, can apprehend a added agenda acquaintance soon. Nintendo, for example, is because absolution agenda versions of its amateur on the aforemen ...

Verfasst am: 02.04.2012, 13:06 Aufrufe: 147

Width / end_counter ' Text mit Prozentsatz aktualisieren PB1.Label3.Caption = Format(PctDone, "0%") ' Balkenbreite aktualisieren Länge = Länge + Schritt PB1.Label2.Width = Länge If zeile_meisterschaften_aktivitaet = ende_tabelle_meisterschaften - 1 Then flag_meisterschaften_ende = True For zeile_fahrten_aktivitaet = zeile_fahrten ...

Verfasst am: 06.03.2012, 16:00 Aufrufe: 174

Hi meinst Du die Funktion "Tieferstellen" mit Deiner Frage "Gibts da eine Funktion ..."? Wenn ja, ist die Antwort: Ja! Du hast auf folgende Weise Zugang dazu: Format/Zeichen/Zeichenabstand/Position, hier auswählen: Tieferstellen Diese Angaben beziehen sich auf Word 2000, aber ich nehme an, daß es bei den neueren Versionen ähnlich ist. Gruß Ernesto

Verfasst am: 10.12.2011, 13:17 Aufrufe: 274

99 auf 122.87 immer noch rechtsbündig bleibt. So in etwa ist der Code, wo muss ich was einfügen. Console.WriteLine("Sie haben " & menge & " Artike1: " & Format(ergebnis, "0.00") & " Euro") Console.WriteLine("Sie haben " & menge & " Artikel2: " & Format(ergebnis, "0.00") & " Euro") Console.WriteLine( ...

Verfasst am: 23.11.2011, 09:34 Aufrufe: 408

Guten Tag, ich hab eine Combobox die mir eine Spalte aus meiner Datenbank anzeigt, die Spalte Zeit. In dieser Zeile stehen natürlich Zeiten drin. Es wird jede sekunde ein neuer Datensatz in diese Db geschrieben, also 60 pro min. Ich will aber jetzt in meiner Combobox nicht zeitangaben mit Sekunden stehen haben, sondern nur minuten. Wenn ich jetzt im Format einfach nur die sekundenanzeige rauslösche, habe ich i ...

Verfasst am: 02.11.2011, 09:46 Aufrufe: 215

hi wenn ich mit zeiten arbeite rechne ich immer vorher in sekunden um rechne gegen und rechne es wieder in ein ordentliches format vl hilft dir das lg

Verfasst am: 01.11.2011, 11:27 Aufrufe: 215

Hallo Leute, ich steh mit folgendem Thema aufm Schlauch. Ich habe ein Textfeld 1 in das ein Anfangsdatum eingegeben wird (Format hh:mm:ss) und ein Textfeld 2 in das ein Enddatum, selbes Format eingeben wird. In ein Textfeld 3 soll nun die Summe aller Stunden, Minuten und Sekunden ausgegeben werden (auch Intervalle zwischen 23:59 und 00:01 Uhr möglich). Anschließen soll in einem Textfeld 4 eine Multiplikation ...

Verfasst am: 29.10.2011, 11:04 Aufrufe: 246

Hallo, ich bräuchte mal Hilfe bei folgendem Problem. Versuche jetzt seid Tage es selbst zu lösen aber muss jetzt das Handtuch werfen. Ich hoffe sehr das sich jemand damit auskennt: Also ich möchte Daten aus einer Datenbank formatieren und ausdrucken. Funktioniert auch alles super nur mit der Formatierung des Strings für den Druck habe ich ein Problem. Manche meiner Werte haben eine unterschiedliche Stringlänge un ...

Verfasst am: 17.08.2011, 07:27 Aufrufe: 279

Hi BaSh, es ist normal dass du die Dezimalstellen verlierst weil der Befehl Val(Text1.Text) den Wert aus dem Text nimmt und ihn auf die nächste ganze Zahl aufrundet. Besser ist es im Single-Format zu rechnen, da dieses Format auch Dezimalstellen verarbeitet. Private Sub Command1_Click() Text5.Text = CSng(Text2.Text) / 60 Text4.Text = CSng(Text1.Text) / 9 Text3.Text = CS ...

Verfasst am: 15.07.2011, 07:10 Aufrufe: 375

Verfasst am: 14.07.2011, 09:02 Aufrufe: 375

Hallo Leute, möchte einen Serienbrief aus VB6 heraus anstossen mit folgendem Code: .OpenDataSource Name:="", ConfirmConversions:=True, ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False, _ PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", _ WritePasswordTemplate:="", Revert:=False, Format:=wdOpenFormatAuto, _ ...

Verfasst am: 25.01.2011, 13:34 Aufrufe: 869

Hallo zusammen, habe folgendes Problem. Aus Outlook exportierte ics Datei hat das Format UTF-8. Öffnet man den Termin wird alles korrekt dargestellt. Jetzt erzeuge ich aus einer Acces Datenbank via VBA ebenfalls eine ics Datei mit identischem Aufbau, bei der verschiedene Variablen durch Daten aus der Datenbank ersetzt werden. Öffne ich diese ics Termindatei zerschiesst er alle Umlaute etc. Grund: VBA exp ...

Verfasst am: 30.12.2010, 19:56 Aufrufe: 1272

... ble from the 'Textbox Backcolor'-combobox - Amount of macros was limited - UPPER-/lowercase was distinguished (for the macro commands) - Recent file with the same content could exist twice - Characters Counter, Words Counter and Lines Counter weren't refreshed if an arrow key is or was pressed Changed: - Stretched the security query (so that longer translations won't be cut) - Rearranged the format ...

Verfasst am: 08.11.2010, 16:06 Aufrufe: 498

hi wenn du das in einem ganz bestimmen format speichern musst na dann grüß gott da wirst garantiert irre... aber ich habe folgendes gefunden... jap letzter beitrag Wink

habs nicht getestet da ich eigentlich nur vb6 code

Verfasst am: 08.11.2010, 15:51 Aufrufe: 498

Hallo zusammen, nun hat es mich leider auch erwischt und ich muss einen Editor mit vb.net schreiben. Soweit so einfach. Das Dumme ist nur, dass ich rtf einlesen muss und dieses dann aber nicht als rtf ausgeben darf sondern in einem rtf ähnlichen format. Soll heißen: Ich muss alle Formatierungen einer Zeile umsetzen in ein spezielles Format und diese Zeile dann mit den neuen Formatierungen in eine neue Datei sc ...

Verfasst am: 02.11.2010, 16:51 Aufrufe: 605

Hi all! Ich habe VB 2010 Express und sende in meinem Form die Systemzeit an den Com-Port im Format hh:mm:ss.dcm. Dies funktioniert einwandfrei. Ich möchte mir aber zusätzlich die Zeit im Format hh:mm:ss.d anzeigen lassen! oder Wie kann ich: Dim Hundertstel As String = My.Computer.Clock.LocalTime.Millisecond formatieren, damit mir nur die Zehntelssekunden angezeigt werden? Nach mehreren Stund ...

Verfasst am: 28.09.2010, 17:12 Aufrufe: 621

... ean Get Return __ResultCounter < 255 End Get End Property Public Event ScanComplete(ByVal AvailabeIPs As List(Of PingResult)) Public Sub New(ByVal Subnet As String) __Subnet = Subnet End Sub Public Sub Scan() For d As Integer = 0 To 255 Step 1 Dim ping As New IPPinger(Me, String.Format ...

Verfasst am: 06.09.2010, 15:37 Aufrufe: 541

Verfasst am: 02.08.2010, 08:27 Aufrufe: 592

. muss heissen If Max(0) > 255 Or Max(1) > 255 Or Max(2) > 255 Or Max(3) > 255 Then -) und du solltest prüfen ob überhaupt das richtige format eingegeben wurde sont kommt der nächste fehler weil du nicht max(0-3) nicht prüfen kannst Private Sub Command1_Click() Dim Max() As String Dim IP As String IP = txtip.Text If IsIPFormat(IP) = False Then MsgBox &qu ...

Verfasst am: 16.06.2010, 11:33 Aufrufe: 408

Verfasst am: 27.04.2010, 07:36 Aufrufe: 648

Hallo, ich benötige mal grundsätzlich ein paar Informationen zu folgendem Problem. Aussendienstmitarbeiter versenden Excel-Dokumente mit Reisekostenabrechnungen, Tätigkeitsnachweisen etc. Diese Dateien sollen in ein internes System übertragen werden das zentral liegt. Da keine Installation auf den Rechner der Aussendienstmitarbeitern möglich ist, kommt eine Übertragung nur via E-mail in Frage. Nun meine Frag ...

Verfasst am: 01.04.2010, 19:10 Aufrufe: 486

Hallo, ich arbeite mit vb6.0 und hab ein Problem mit einer Sql-Abfrage. Ich habe ein Datenbankfeld, dass heißt "Datum" und ist vom Typ String. Darin steht ein Datum in folgendem Format: mm.yyyy also nur das Monat und das Jahr, zum Beispiel 12.2010 Dann gibt es noch zwei textboxen, eine heißt txtvon, die andere txtbis Auch in diesen beiden Textboxen steht ein Datumswert im Format mm.yyyy, also Monat & ...

Verfasst am: 28.01.2010, 13:38 Aufrufe: 2310

... mp; OWNER & "PARZELLE ORDER BY ID", _ conORCL, adOpenDynamic, adLockOptimistic, adCmdText If Err Or PAZ.RecordCount <= 0 Then Work5.Caption = "Fehler Öffnen [" & Err.Number & "]" InitError = InitError + 1: Err.Clear Else Work5.Caption = "Tabelle geöffnet" End If If CheckError Then Exit Sub 'Änderung Datumsformat ...

Verfasst am: 29.12.2009, 18:18 Aufrufe: 1317

Ja was mein problem ist steht ja schon im titel. Smile

ich möchte das bild wenn es mit 400x500 pixeln kommt auch so wieder speichern können, nur halt im format 350x200 anzeigen lassen. Laughing

Verfasst am: 17.12.2009, 11:37 Aufrufe: 769

format") End If Catch ex As Exception 'Do Nothing End Try ´ wenn ich auf button klicke soll er sofort in meine eigene dateien auch ein ordner erstellen mit die bilder von picturebox1,2,3 und von gewünschte ordner soll die bilder in "C:\Programme\ exemple folder" speichern hoff ihr versteht mich Razz

brauche eure help :**** End Sub FG FLO™Mp ...

Verfasst am: 13.11.2009, 11:21 Aufrufe: 2711

Verfasst am: 07.11.2009, 03:27 Aufrufe: 857

Ich hab auf meinem Rechner ne riesen Menge an .bin Dateien. Und ich weiss, dass in diesen .bin Dateien Bilder sind. im Format 128x64 und 64x32.Nun will ich, dass ich mit meinem Programm die .bin Datei öffne und Visual Basic mir nur das 128x64 Bild in eine PictureBox läd.Allerdings hab ich absolut keine Ahnung, wie ich das ganze anstellen soll.Für mich ist ja schon ein Erfolg, dass ich zur Laufzeit ein Bild per OpenFi ...

Verfasst am: 06.11.2009, 08:03 Aufrufe: 794

Verfasst am: 02.11.2009, 18:27 Aufrufe: 798

Verfasst am: 23.10.2009, 13:11 Aufrufe: 719

5 ) Soweit so gut die Daten Bank lässt sich anzeigen und alles. Doch nun versuch ich die Daten mit einen button suchen Durzusuchen doch nun folgendes Problem: Habe mit diesem Provider geteste << "Provider=Microsoft.Jet.OLEDB.4.0;" >> Und ich bekamm die fehler meldung unbekanntes datei format.... Datenbank.mdf Also hab ich angefangen zu Googeln und fand dann was über ein MDL datei ...

Verfasst am: 14.09.2009, 17:14 Aufrufe: 699

. Ich versuche die ganze Zeit nach etwas, Google und alles andere hilft mir nicht weiter... Also, es geht erstmal um Visual Basic 2008 Ich möchte wenn ich Button1 klicke, dass der Text der sich in der RichTextBox1 befindet auf einen FTP-Server hochlädt (Kilu), und zwar in einem .html Format... Wisst ihr was ich meine.Ich Danke euch schon im vorraus und hoffe bekomme eine schnelle antwort back. Thx von kru ...

Verfasst am: 09.09.2009, 18:37 Aufrufe: 1047

Hallo, Ich wollte einfach nur fragen, ob diese Idee funktionieren könnte, so einen Crypter zu bauen. Ich möchte einen Cryter bauen, der das exe file in Assembler Code formatiert, und an Stellen im Code Jumps oder einfach nur leere Code Zeilen einfügt, um Dateien vor AntiVir zu schützen. Danach wird der Assembler Code wieder in eine EXE "compiled" (oder wie man das auch immer nennt) Ich bräuchte vo ...

Verfasst am: 21.07.2009, 15:06 Aufrufe: 373

hi.da ich grad an meiner richtextbox rumwerkel und dort verschiede farben brauche, würd ich gerne wissen wie ich denn am einfachsten die farben in LONG ermittle...also mann muss ja bei der rtb die farben as long angeben nur fehlt mir jetzt iwie sowas wie ein color dialog...mfg

Verfasst am: 16.07.2009, 12:41 Aufrufe: 2508

Hier wird der Inhalt der Datei(en) ausgelesen und verarbeitet.2. 'DragEnter'Wenn eine Datei in das Fenster gezogen wird, muss zunächst überprüft werden, ob die Daten auch gültig sind. Dafür eignet sich eine If-Anweisung, die das Format überprüft. Der Code dafür lautet:Visual Basic: GetDataPresent erwartet einen Parameter, der das Format der Daten enthält (hier: DataFormats.FileDrop).Zurückgegeben wird ein boolscher W ...

Verfasst am: 20.06.2009, 14:12 Aufrufe: 863

... r Button "Vorschau" aktiv den klicken wir nun! Dann wir der Ordner nach Musikdateien durchsucht und diese werden in die Liste eingetragen, sollte es mehrere Interpreten und ALben geben in dem Hauptordner werden diese in der zweiten Box angezeigt! So dann muss man nurnoch "Save Text" klicken und kann sich dann aussuchen wo die Datei gespiechert wird diese Datei enthält dann alle Files im Format ...

Verfasst am: 18.06.2009, 13:00 Aufrufe: 905

... nbsp;If s = 138 Then temp = "8A "<br /> If s = 154 Then temp = "9A "<br /> If temp = "" Then<br /> sBinaryString = sBinaryString & Format ...

Verfasst am: 18.06.2009, 12:03 Aufrufe: 2010

Name: GetShortPathnameFunktion: Wandelt einen normalen String/Pfad in das alte Dos 8.3 Format um.Rückgabe: Ein String. (Verkürzter Pfad)Visual Basic: [code]Private Declare Function GetShortPathname Lib "kernel32" Alias "GetShortPathNameA" (ByVal strLongPath As String, ByVal strShortPath As String, ByVal intBufferLen As Integer) As IntegerPublic Function GetShortname(ByVal LongPathName As String) As StringDim strShort ...

Verfasst am: 02.06.2009, 08:20 Aufrufe: 1309

Enabled = False Timer1.Interval = 1000 Start1 = CDate(CStr(Date) & " 00:00:00") End Sub Private Sub Timer1_Timer() Static zait1 As Long Dim n As Date zait1 = zait1 + 1 n = DateAdd("s", zait1, Start1) Text1.Text = Format(n, "hh:mm:ss") End Sub Hier noch ein Printscreen des programmes: [URL=http://img ...

Verfasst am: 15.05.2009, 08:16 Aufrufe: 712

Verfasst am: 03.05.2009, 12:38 Aufrufe: 2362

Man müßte hier also nichts angeben, da dbVersion30 der Default Wert ist. Aber hier mal die Möglichen Optionen: dbEncrypt: Creates an encrypted database dbVersion10: Creates a database that uses the Microsoft Jet database engine version 1.0 file format dbVersion11: Creates a database that uses the Microsoft Jet database engine version 1.1 file format dbVersion20: Creates a database that ...

Verfasst am: 29.04.2009, 15:18 Aufrufe: 869

B. Cinema 4D erstellte Animationen abspielen lassen kann... Also, dass man die wie die Modelle in das .x format konvertieren ist mir auch klar, aber wie kann man die so aufrufen, dass das feststehende Modell, was ja vorher auch schon vorhanden sein soll, diese Animation abspielt, und danach wieder normal steht... oO Also z.B. bei Tastendruck auf "A" (wie man das abfragt weiß ich, also bitte kein Tut z ...

Verfasst am: 06.04.2009, 18:25 Aufrufe: 854

Ein Traum wäre natürlich noch den Bildwechsel in die Video-Austastlücke/Screen Refresh des LCD Monitors zu legen, aber wenn das nicht geht ist das eben so. Scheint ohnehin von der Grafik abhängig zu sein und die ist beim EeePC eher bescheiden. Ich brauche im Grunde nur folgendes: 1. Bild ins RAM oder Grafikkarte laden (Format ist dabei völlig egal, ich kann es so konvertieren, wie es das Programm braucht ...

Verfasst am: 19.03.2009, 11:23 Aufrufe: 794

... en >Private Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS) > >Private Sub Form_Load() > 'Deklaration: Lokale Prozedur-Variablen > Dim strText As String > Dim udtMem As MEMORYSTATUS > GlobalMemoryStatus udtMem > With udtMem > strText = strText & "Speicher belegt in Prozent : " & _ > Format ...

Verfasst am: 06.02.2009, 18:47 Aufrufe: 2032

... quot; If s = 74 Then temp = "4A " If s = 90 Then temp = "5A " If s = 106 Then temp = "6A " If s = 122 Then temp = "7A " If s = 138 Then temp = "8A " If s = 154 Then temp = "9A " If temp = "" Then sBinaryString = sBinaryString & Format ...

Verfasst am: 11.09.2008, 18:45 Aufrufe: 1345

Verfasst am: 11.09.2008, 18:41 Aufrufe: 1345

Hallo. Ich habe eine Frage:Wie kann ich aus einer Texdatei im Format "user:pass" die Daten in eine Listview Komponente einlesen ?mfgregenz

Verfasst am: 09.09.2008, 11:33 Aufrufe: 1279

Hiich benutze diesen Code um meine Listview zu Speichern.Visual Basic: Wie kann ich jetzt die txtfile wieder Öffnen und einfügen?thx schonmal

Verfasst am: 28.08.2008, 14:43 Aufrufe: 616

Verfasst am: 25.08.2008, 12:36 Aufrufe: 17617

Dafür gibts von CoolXP ein nettes Control.Und die Icons im 16x16 Format gibst du einfach in ein Imagelist.