CXuesong
diff --git a/Diff for: ‎PowerFlowSolver.sln
+6-2 b/Diff for: ‎PowerFlowSolver.sln
+6-2
diff --git a/Diff for: ‎PowerFlowSolver/My Project/Application.Designer.vb
+1-1 b/Diff for: ‎PowerFlowSolver/My Project/Application.Designer.vb
+1-1
diff --git a/Diff for: ‎PowerFlowSolver/My Project/Application.shim.vb
+31 b/Diff for: ‎PowerFlowSolver/My Project/Application.shim.vb
+31
diff --git a/Diff for: ‎PowerFlowSolver/My Project/AssemblyInfo.vb
-35 b/Diff for: ‎PowerFlowSolver/My Project/AssemblyInfo.vb
-35
diff --git a/Diff for: ‎PowerFlowSolver/My Project/Resources.resx
-120 b/Diff for: ‎PowerFlowSolver/My Project/Resources.resx
-120
diff --git a/Diff for: ‎PowerFlowSolver/My Project/Settings.Designer.vb
+5-48 b/Diff for: ‎PowerFlowSolver/My Project/Settings.Designer.vb
+5-48
diff --git a/Diff for: ‎PowerFlowSolver/My Project/launchSettings.json
+9 b/Diff for: ‎PowerFlowSolver/My Project/launchSettings.json
+9
@@ -1,7 +1,7 @@
 
 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 14
-VisualStudioVersion = 14.0.25420.1
+# Visual Studio Version 16
+VisualStudioVersion = 16.0.30404.54
 MinimumVisualStudioVersion = 10.0.40219.1
 Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{6D63AA79-0929-4DE1-BC9C-A4E3DE722922}"
 	ProjectSection(SolutionItems) = preProject
@@ -43,6 +43,7 @@ Global
 		{F0A27E64-DFB4-4A02-94D7-04C6E66534EB}.Release|x86.ActiveCfg = Release|Win32
 		{F0A27E64-DFB4-4A02-94D7-04C6E66534EB}.Release|x86.Build.0 = Release|Win32
 		{C79AB260-5777-4CBE-A335-6F97B804AE85}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{C79AB260-5777-4CBE-A335-6F97B804AE85}.Debug|x64.Build.0 = Debug|Any CPU
 		{C79AB260-5777-4CBE-A335-6F97B804AE85}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{C79AB260-5777-4CBE-A335-6F97B804AE85}.Debug|x86.Build.0 = Debug|Any CPU
 		{C79AB260-5777-4CBE-A335-6F97B804AE85}.Release|x64.ActiveCfg = Release|Any CPU
@@ -76,4 +77,7 @@ Global
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
 	EndGlobalSection
+	GlobalSection(ExtensibilityGlobals) = postSolution
+		SolutionGuid = {FF59B287-4112-48C2-B7B3-BDE979B985CA}
+	EndGlobalSection
 EndGlobal
@@ -0,0 +1,31 @@
+Imports System.ComponentModel
+Imports CXuesong.Shims.VisualBasic.ApplicationServices
+Imports CXuesong.Shims.VisualBasic.Devices
+
+Namespace My
+
+    <HideModuleName>
+    Friend Module MyProject
+
+        Public ReadOnly Property Application As New MyApplication
+
+        Public ReadOnly Property Computer As New MyComputer
+
+    End Module
+
+    <EditorBrowsable(EditorBrowsableState.Never)>
+    Friend Class MyApplication
+        Inherits ConsoleApplicationBase
+
+        Public Sub New()
+            MyBase.New(GetType(MyApplication).Assembly)
+        End Sub
+    End Class
+
+    <EditorBrowsable(EditorBrowsableState.Never)>
+    Friend Class MyComputer
+        Inherits Computer
+
+    End Class
+
+End Namespace
@@ -0,0 +1,9 @@
+{
+  "profiles": {
+    "PowerFlowSolver": {
+      "commandName": "Project",
+      "commandLineArgs": "/case:rts24.txt",
+      "nativeDebugging": true
+    }
+  }
+}