Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Visual Basic Schleife
Autor: mimi
Datum: 02.02.06 14:23
Sub KnightRider() Dim a As Integer, b As Integer ' Forward For a = 0 To 9 ' Turns one on (RED) and all others off (Black) For b = 0 To 9 If a = b Then Shape1(b).BackColor = "red" Else Shape1(b).BackColor = "black" End If Next b Next a ' Backword For a = 9 To 0 Step -1 ' Turns one on (RED) and all others off (Black) For b = 0 To 9 If a = b Then Shape1(b).BackColor = "red" Else Shape1(b).BackColor = "black" End If Next b Next a End Sub das würde doch auch gehen, oder?

Visual Basic Schleife	1.037	mimi	31.01.06 19:40
Re: Visual Basic Schleife	657	OldMan	31.01.06 20:34
Re: Visual Basic Schleife	609	mimi	01.02.06 13:29
Re: Visual Basic Schleife	722	OldMan	01.02.06 13:56
Re: Visual Basic Schleife	591	mimi	01.02.06 14:01
Re: Visual Basic Schleife	590	mimi	01.02.06 16:36
Re: Visual Basic Schleife	649	spike24	01.02.06 23:58
Re: Visual Basic Schleife	647	OldMan	02.02.06 08:27
Re: Visual Basic Schleife	627	spike24	02.02.06 09:41
Re: Visual Basic Schleife	649	mimi	02.02.06 14:23

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen