Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Source Codes
Autor
Nachricht
Jings
Poster
Poster

Anmeldedatum: 02.05.2008
Beiträge: 123

Selbstgemachte Progressbar
Verfasst am: 12.06.2008, 00:12

Hab mal aus langeweile ne Stinknormale Progressbar gemacht, die nicht wie die normale Progressbar sich von Links nach Rechts füllt...sondern sich von Links nach Rechts bewegt.

Für manch einen Anfänger sicherlich hilfreich Smile

Download im Anhang!

MfG
Jings
 
igoe
Gast





Verfasst am: 12.06.2008, 01:02

Joa ist ganz gut geworden, ist aber mehr was für leute die noch nicht wirklich von Visual basic eine ahnung haben 5* ^^
 
KleinesVoodoo
Coder
Coder

Anmeldedatum: 17.04.2008
Beiträge: 78


Verfasst am: 12.06.2008, 17:14

(Jings;3690)
nicht wie die normale Progressbar sich von Links nach Rechts

(Jings;3690)
sondern sich von Links nach Rechts

Uhm, ja.
 
boehser enkel
Tutorial Leser
Tutorial Leser



Anmeldedatum: 01.05.2008
Beiträge: 58


Verfasst am: 12.06.2008, 17:54

(Jings;3690)
sich von Links nach Rechts füllt...sondern sich von Links nach Rechts bewegt.


Wink
 
^^kev####
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 476
Wohnort: Haan


Verfasst am: 12.06.2008, 18:03

Naja ich finds nicht gerade gelungen Wink
Zudem fackert das teil bei mir total xD

PS: Man kann auch eine normale Progressbar von Links nach Rechts bewegen, ist aufjedenfall bei .NET so
 
Administrator
Poster
Poster

Anmeldedatum: 16.04.2008
Beiträge: 153


Verfasst am: 12.06.2008, 18:22


Ich habe mir mal die Freiheit genommen den Code etwas zu ändern.

Weiterhin sind 2 Labels und 1 Button nötig.
lblFG ist der Blaue Teil, lblBG ist der Hintergrund.

Visual Basic: [code]Private Declare Function GetTickCount Lib "kernel32" () As Long

Public Sub Delay(ms As Long)
Dim TimeOut As Long
TimeOut = GetTickCount + nSekunden

Do
DoEvents
Loop Until TimeOut < GetTickCount
End Sub

Private Sub cmd_start_Click()
lblFG.Width = 1
For i = 1 To lblBG.Width Step 10
lblFG.Width = i
Delay 10
Next i
End Sub
[/code]
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Source Codes

Tags: rechts bewegt, progressbar, download, links

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Visual Basic Download ? 2003 03.05.2011, 08:38
Keine neuen Beiträge Api Download in Prozent + Kb anzeige + Progrezzbar 1466 21.10.2007, 14:03
Keine neuen Beiträge Download 1489 30.08.2007, 16:45
Keine neuen Beiträge Download mit Internet Explorer Object 1031 18.08.2008, 20:00
Keine neuen Beiträge Visual Basic 6 download 4331 26.05.2007, 12:51
 


[ Time: 0.0537s ][ Queries: 95 (0.0144s) ][ GZIP on - Debug on ]