From e17103c363ce30c2baa6f3795177a4eeae1e535a Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Sun, 6 Nov 2022 21:19:35 +0700 Subject: dir fixing and stuff --- ShiftOS-TheRevival/MainForms/FileManagement.vb | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 ShiftOS-TheRevival/MainForms/FileManagement.vb (limited to 'ShiftOS-TheRevival/MainForms/FileManagement.vb') diff --git a/ShiftOS-TheRevival/MainForms/FileManagement.vb b/ShiftOS-TheRevival/MainForms/FileManagement.vb new file mode 100644 index 0000000..b943fba --- /dev/null +++ b/ShiftOS-TheRevival/MainForms/FileManagement.vb @@ -0,0 +1,10 @@ +Imports System.IO + +Module FileManagement + Public Sub CatFile(filename As String) + If File.Exists(Terminal.CurrentDirectory & "\" & filename) = True Then + Dim Contents As String = File.ReadAllText(Terminal.CurrentDirectory & "\" & filename) + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Environment.NewLine & Contents + End If + End Sub +End Module -- cgit v1.2.3