Minimal vb example

FiskalyClientVbDemo/FiskalyClientVbDemo.vbproj

@@ -0,0 +1,18 @@
+<Project Sdk="Microsoft.NET.Sdk">
+
+  <ItemGroup>
+    <ProjectReference Include="..\FiskalyClient\FiskalyClient.csproj" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="Serilog" Version="2.8.0" />
+    <PackageReference Include="Serilog.Sinks.Console" Version="3.1.1" />
+  </ItemGroup>
+
+  <PropertyGroup>
+    <OutputType>Exe</OutputType>
+    <RootNamespace>FiskalyClientVbDemo</RootNamespace>
+    <TargetFramework>netcoreapp3.0</TargetFramework>
+  </PropertyGroup>
+
+</Project>

FiskalyClientVbDemo/Program.vb

@@ -0,0 +1,13 @@
+Imports System
+Imports Fiskaly.Client
+Imports System.Net.Http
+Imports Serilog
+
+Module Program
+    Sub Main(args As String())
+        Log.Logger = New LoggerConfiguration().WriteTo.Console().CreateLogger()
+        Dim apiKey as String = Environment.GetEnvironmentVariable("API_KEY")
+        Dim apiSecret as String  = Environment.GetEnvironmentVariable("API_SECRET")
+        Dim client As HttpClient = ClientFactory.Create(apiKey, apiSecret).AsTask().Result
+    End Sub
+End Module