diff --git a/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/Kernel.vb b/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/Kernel.vb index 00b577bb1e..30285f5f9c 100644 --- a/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/Kernel.vb +++ b/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/Kernel.vb @@ -4,19 +4,20 @@ Imports System.Text Namespace $safeprojectname$ - Public Class Kernel - Inherits Cosmos.System.Kernel + Public Class Kernel + Inherits Cosmos.System.Kernel - Protected Overrides Sub BeforeRun() - Console.WriteLine("Cosmos booted successfully. Type a line of text to get it echoed back.") - End Sub + Protected Overrides Sub BeforeRun() + Console.WriteLine("Cosmos booted successfully. Type a line of text to get it echoed back.") + End Sub - Protected Overrides Sub Run() - Console.Write("Input: ") - Console.ReadLine() - Console.Write("Text typed: ") - End Sub + Protected Overrides Sub Run() + Console.Write("Input: ") + Dim input = Console.ReadLine() + Console.Write("Text typed: ") + Console.WriteLine(input) + End Sub - End Class + End Class -End Namespace \ No newline at end of file +End Namespace diff --git a/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/VBProjKernel.vbproj b/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/VBProjKernel.vbproj index 918a5bbc0f..73a2a44e89 100644 --- a/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/VBProjKernel.vbproj +++ b/source/Cosmos.VS.Package/Templates/Projects/CosmosKernel (VB)/VBProjKernel.vbproj @@ -21,7 +21,7 @@ true bin\Debug\ - DEBUG;TRACE + DEBUG,TRACE full x86 prompt diff --git a/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/Kernel.vb b/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/Kernel.vb index 00b577bb1e..30285f5f9c 100644 --- a/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/Kernel.vb +++ b/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/Kernel.vb @@ -4,19 +4,20 @@ Imports System.Text Namespace $safeprojectname$ - Public Class Kernel - Inherits Cosmos.System.Kernel + Public Class Kernel + Inherits Cosmos.System.Kernel - Protected Overrides Sub BeforeRun() - Console.WriteLine("Cosmos booted successfully. Type a line of text to get it echoed back.") - End Sub + Protected Overrides Sub BeforeRun() + Console.WriteLine("Cosmos booted successfully. Type a line of text to get it echoed back.") + End Sub - Protected Overrides Sub Run() - Console.Write("Input: ") - Console.ReadLine() - Console.Write("Text typed: ") - End Sub + Protected Overrides Sub Run() + Console.Write("Input: ") + Dim input = Console.ReadLine() + Console.Write("Text typed: ") + Console.WriteLine(input) + End Sub - End Class + End Class -End Namespace \ No newline at end of file +End Namespace diff --git a/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/VBProjKernel.vbproj b/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/VBProjKernel.vbproj index 918a5bbc0f..73a2a44e89 100644 --- a/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/VBProjKernel.vbproj +++ b/source/Cosmos.VS.Package/Templates/Projects/CosmosProject (VB)/VBProjKernel.vbproj @@ -21,7 +21,7 @@ true bin\Debug\ - DEBUG;TRACE + DEBUG,TRACE full x86 prompt