[VB.NET] Scrolling automatico di un controllo RichTextBox

[stejano]

Dovrei poter far scorrere la richtextbox lentamente ho provato così...

 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Enabled = True
        Timer1.Start()
        i = 100
        RichTextBox1.SelectionStart = i
        RichTextBox1.ScrollToCaret()

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick


        i = i + 100
        RichTextBox1.SelectionStart = i
        RichTextBox1.ScrollToCaret()


    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Timer1.Stop()
    End Sub

funziona ma va a scatti....io invece vorrei scorresse lentamente senza scatti.

Se qualcuno ha presente, vorrei la funzione che ha il mouse se si clicca con tasto centrale dello scroll e poi si muove il mouse verso l'alto o il basso.
avete suggerimenti?

[alka]

Se la tua intenzione è quella di realizzare una sorta di "testo a scorrimento", come quello dei film per intenderci, credo che tu non abbia scelto proprio bene i controlli e i mezzi ottimali per realizzarlo.

Meglio ereditare da Control, creando un controllo personalizzato, ridefinire l'evento OnPaint e incorporare la logica del Timer per visualizzare, modificando gradualmente la posizione ogni volta che è necessario, il testo definito attraverso una proprietà specifica del controllo stesso.

Ciao!