Visual Basic Forum

Verfasst am: 22.01.2012, 15:52 Aufrufe: 267

Verfasst am: 20.01.2012, 11:12 Aufrufe: 267

hi dass was du brauchst ist zeit Wink

zwischen den beinen codezeilen du hast mehrere möglichkeiten! 1) shell '... prozess schließen for i = 1 to 100000 'lasse zählen um zeit zu bekommen Smile

next shell bat datei 2) shell '... prozess schließen Delay 4000 'musst nach der funktion googlen ... dann wartet die 4000millisekunden shell bat datei 3) ShellWait Vlcprozess 'auc ...

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: 15.06.2009, 12:31 Aufrufe: 1392

000 in einer Listbox ausgibt.Und die Lösung, die dazu gepostet wurde lautet so:Private Sub Form_Load() For i = 1 To 100000 If i Mod 2 <> 0 Then List1.AddItem (i) End If Next i End SubUnd so würde es von den meisten VB Programmieren ge ...

Verfasst am: 23.08.2008, 15:50 Aufrufe: 9508

Thema: Arbeiten mit Threads in VB.NETHallo,da die Anfrage nach einem Tutorial kam, hab ich mal eines geschrieben.Sicherlich kennt ihr das Problem: Was sind Threads?Stellt euch vor ihr schreibt eine extrem Speicherlastige Funktion. Wärend diese Funktion dann ausgeführt wird, kann der Benutzer nichts mehr an eurem Programm machen. Sprich: Die Form lässt sich nicht mehr bewegen, Die Form reagiert nicht mehr und der Benu ...

Verfasst am: 06.07.2008, 18:26 Aufrufe: 1006

Floor(1 / 1000) Mod 10 Dim zt As String = Math.Floor(i / 10000) Mod 10 Dim ht As String = Math.Floor(i / 100000) Mod 10 Dim a As String = WWW(e) & WWWW(z) If i < 100 Then Return a : Exit Function a = WWWWW(h) & a If i < 4000 Then a = WWWWWW(t) & a Else a = WWWWW(ht) & WWW(t) & WWWW(zt) & "millia" & a End If Dim aa As String = a.Chars ...

Verfasst am: 21.05.2008, 13:37 Aufrufe: 2540

Verfasst am: 20.05.2008, 21:44 Aufrufe: 2540

Verfasst am: 18.05.2008, 14:51 Aufrufe: 554

Create(url), HttpWebRequest) Dim ws As HttpWebResponse = CType(wr.GetResponse(), HttpWebResponse) Dim str As Stream = ws.GetResponseStream() Dim inBuf(100000) As Byte Dim bytesToRead As Integer = CInt(inBuf.Length) Dim bytesRead As Integer = 0 While bytesToRead > 0 Dim n As Integer = str.Read(inBuf, bytesRead, bytesToRead) ...

Verfasst am: 10.05.2008, 15:12 Aufrufe: 2761

Die Aufgabe lautet: Ihr schreibt ein Programm, dass alle ungeraden Zahlen bis 100.000 in einer Listbox ausgibt. Und die Lösung, die dazu gepostet wurde lautet so: Private Sub Form_Load() For i = 1 To 100000 If i Mod 2 <> 0 Then List1.AddItem (i) End If Next i End Sub Und so würde es von den meisten VB Programmieren gelöst werden. Der code ist vollkomm ...

Verfasst am: 17.10.2007, 20:38 Aufrufe: 2702

... 1) zufall6 = Int((Rnd * 10) + 1) zufall7 = Int((Rnd * 10) + 1) zufall8 = Int((Rnd * 10) + 1) Text1 = PW(zufall1) & PW(zufall2) & PW(zufall3) & PW(zufall4) & PW(zufall5) & PW(zufall6) & PW(zufall7) & PW(zufall8) Else End If pb1.Max = 100001 For i = 1 To 100000 ...

Verfasst am: 05.10.2007, 20:04 Aufrufe: 609

Kritik: Setzt man die Passwort länge auf 100000 oder höher schmirt das Programm ab Sag mir einen Grund warum ich ein PAsswort mit 100000 Stellen haben möchte? O.o

Verfasst am: 05.10.2007, 18:47 Aufrufe: 609

Danke , Ein guter Passwort generator! Kritik: Setzt man die Passwort länge auf 100000 oder höher schmirt das Programm ab Könntest du mir vll die Formen bzw. Das Projekt oder den Source code per pm schicken?

Verfasst am: 10.08.2007, 13:56 Aufrufe: 1084

Verfasst am: 10.08.2007, 13:33 Aufrufe: 1084

Verfasst am: 21.07.2007, 13:04 Aufrufe: 497

visibility = i next i Bin jetzt net im Vb6 Geschäft aktuell und weiss net ob die Eigenschaft so heisst,, aber im Grunde ist der Sinn der Sache getroffen. Die Sichtbarkeit steigt in der Schleife von 0% bis 100%. Ist halt sehr schnell. Um es langsamer zu machen benutz i = 0 to 100000 form.visi = i / 1000 musst ein bisschen testen. Aber je länger die Schleife, desto unterschiedlicher die Ladezeiten bei deinen User ...

Verfasst am: 02.05.2007, 06:58 Aufrufe: 1161

er mkann nich maxlenght benutzen da er nicht die eingabe auf 10000 zeichen beschränkenm möchte sondern den wert. also in der textbox dürfen 5 zeichen sein aber der inhalt soll vom wert her nich über 100000 sein. deswegen maxlenght doof weil sich das auf die in der textbox enthaltene stringlänge bezieht nich auf den wert.