Auto-Scrolling TextBox
A few lines of useful code to make a text box auto scroll to the bottom every time it changes. (like mIRC and msn) Simply replace Text1 with the name of your textbox. By Alex. (http://www.alexchia.com)
AI
Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Zdrojový kód
Private Sub Text1_Change() On Error Resume Next Text1.SelLength = 0 If Len(Text1.Text) > 0 Then If Right$(Text1.Text,1) = vbCrLf Then Text1.SelStart = Len(Text1.Text) - 1 Exit Sub End If Text1.SelStart = Len(Text1.Text) End If End Sub
Původní komentáře (3)
Obnoveno z Wayback Machine