Laufschrift in VB6

[fr33k]

So da dies von chesar angesprochen wurde, und ich diese funktion bei mir drinnen habe, erklär ich das in einem kleinen "Tutorial".
Dafür ein "grosses" Tutorial oder sogar ein Videotutorial zu machen wäre übertrieben.

Los gehts:

Ihr braucht dafür:
1x Label (bei mir Label2)
1x Timer (bei mir laufschrift)

Es gibt dabei 2 möglichkeiten dies zu realisieren

in die Form_Load kommt:

Code:

Label2.Caption =frmMain.Caption

---

Hiermit bestimmen wir das der Text der in den Eigenschaften(Caption) der Form steht, auch in unser Label stehen soll.

oder:

Code:

Label2.Tag = "Starcraft 2 v1.0.1.16195 +3 Promo trn by fr33k" Label2.Caption = Label2.Tag

---

Hier trägt man den Text direkt ein, also muss in der Caption von der Form nichts mehr stehen.
Wie man es macht ist geschmacksache

und in den Timer kommt bei beiden möglichkeiten:

Code:

1 2 3 4 5 6 7 8 9 10

Private Sub laufschrift_Timer() Dim var As String Dim sText As String var = Left(Label2.Caption, 1) sText = Mid(Label2.Caption, 2, Len(Label2.Caption)) & var Label2.Caption = sText End Sub

---

Ist selbsterklärend denke ich
Wichtig ist nur noch das der Timer Interval zuständig für die schnelligkeit der Laufschrift ist, ich habe bei meinen Trainern den Wert 100 genommen.

Das war der ganze zauber schon, also alles gar nicht so schwer wie man vielleicht denken mag.

gruss fr33k

[chesar]

Super Danke dir
Nur leider geht es nicht in VB08
kommt immer der Fehler

"Caption" ist kein Member von "System.Windows.Forms.Label". C:\Users\****\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 4 9 WindowsApplication1
"

Ne Idee warum?

[DNA]

Ja,
bei VB2008 gibt es keine Label.Caption mehr ...
du musst stattdessen
Label1.Text
benutzen

[chesar]

und wieder ein Neues Problem

Fehler 1 "Public Property Left() As Integer" hat keine Parameter, und der Rückgabetyp kann nicht indiziert werden. C:\Users\***\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 12 15 WindowsApplication1

VB06 is schon Komisch

und könnt ihr euch das mal angucken
http://www.homeofgamehacking.de/showthread.php?tid=63