[vb.net]sich selbst schreibender text[scr]

[matze093]

Wieso fehlerhaft? Bei mir steht alles richtig da "Hallo ich bin ein Geist!"

[inmate]

Oh sry lag nicht an dir , war ein Fehler in meinem Code

mfG

[magerquark]

Hab sowas ähnliches auch schon mal Anfang Februar dieses Jahres veröffentlicht.
Meiner meinung nach etwas schöner gelöst da das Ganze ohne Timer arbeitet.
Der Source bezieht sich auf das direkte Schreiben mit DrawString, drunter auch noch ein Beispiel mit ner Richtextbox.
http://forum.vb-paradise.de/allgemei...Text#post78714

[Fixi]

inmate oder jemand anderes könntet ihr die source nochmal uppen? wäre nett

[br00_pwn]

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Timer1.Start()
        Timer1.Interval = 100

    End Sub
    Dim count As Integer = 0
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim Text As String = "Der Text, der geschrieben werden soll!"
        Dim Buchstabe() As Char = Text.ToCharArray
        If count = Len(Text) Then
            Timer1.Stop()
        Else
            Label1.Text += Buchstabe(count)
            count += 1
        End If

    End Sub
End Class

Leider ist der Link down, hier ein Beispiel...
Eigentlich relativ einfach und selbsterklärend
LG br00_pwn