add vb.net tests

Examples/test_vb/Program.vb

@@ -1,26 +0,0 @@
-Imports System
-
-Module Program
-    Sub Main(args As String())
-        Console.WriteLine("Hello World!")
-
-        Dim fsql = New FreeSql.FreeSqlBuilder() _
-            .UseConnectionString(FreeSql.DataType.Sqlite, "data source=testvb.db") _
-            .UseAutoSyncStructure(True) _
-            .UseMonitorCommand(Sub(cmd) Trace.WriteLine(cmd.CommandText)) _
-        .Build()
-
-        REM Microsoft.VisualBasic.CompilerServices.Operators.CompareString()
-        Dim List1 = fsql.Select(Of Testvb).Where(Function(a) a.Id = 100).ToList()
-        Dim List2 = fsql.Select(Of Testvb).Where(Function(a) a.Title = "xxx").ToList()
-        Dim List3 = fsql.Select(Of Testvb).Where(Function(a) a.Title <> "xxx").ToList()
-
-        fsql.Dispose()
-    End Sub
-End Module
-
-Class Testvb
-    Property Id As Integer
-    Property Title As String
-End Class
-

Examples/test_vb/test_vb.vbproj

@@ -1,13 +0,0 @@
-<Project Sdk="Microsoft.NET.Sdk">
-
-  <PropertyGroup>
-    <OutputType>Exe</OutputType>
-    <RootNamespace>test_vb</RootNamespace>
-    <TargetFramework>netcoreapp3.1</TargetFramework>
-  </PropertyGroup>
-
-  <ItemGroup>
-    <ProjectReference Include="..\..\Providers\FreeSql.Provider.Sqlite\FreeSql.Provider.Sqlite.csproj" />
-  </ItemGroup>
-
-</Project>