mirror of
https://github.com/EverythingWindows/ShiftOS-TheRevival-Old.git
synced 2025-02-02 06:17:34 +00:00
19 lines
511 B
VB.net
19 lines
511 B
VB.net
|
Module ConsoleAPI
|
|||
|
|
Public Sub NewLine(str As String)
|
|||
|
|
Console.TextBox1.Text = Console.TextBox1.Text & Environment.NewLine & str
|
|||
|
|
End Sub
|
|||
|
|
|
|||
|
|
Public Sub AddLine(str As String)
|
|||
|
|
Console.TextBox1.Text = Console.TextBox1.Text & str
|
|||
|
|
End Sub
|
|||
|
|
|
|||
|
|
Public Sub ResetLine(str As String)
|
|||
|
|
Console.TextBox1.Text = str
|
|||
|
|
End Sub
|
|||
|
|
|
|||
|
|
Public Sub TextRebind()
|
|||
|
|
Console.TextBox1.Select(Console.TextBox1.Text.Length, 0)
|
|||
|
|
Console.TextBox1.ScrollToCaret()
|
|||
|
|
End Sub
|
|||
|
|
End Module
|