First convert from your base64 string to a byte array: Dim bytes As Byte() = Convert.FromBase64String(base64_string) Next save the byte array to disk: Dim stream As System.IO.FileStream = New FileStream(“C:\mypdf.pdf”, FileMode.CreateNew) Dim writer As System.IO.BinaryWriter…
Public Shared Function GetUnixMicroTime() As String Dim origin As DateTime = New DateTime(1970, 1, 1, 0, 0, 0, 0) Dim diff As TimeSpan = Now() – origin Return CStr(diff.TotalSeconds) End Function
How to get difference between two date in hh:MM format with vb.net. Dim dt As DateTime = DateTime.Now Dim dt1 As DateTime = scadenza_pin Dim duration As TimeSpan = dt1 – dt Dim durationTicks As…
To capitalize only the first character of a string you can create an extension, like this: Public Module MyModule Public Function UppercaseFirst(my_string As String) As String If String.IsNullOrWhiteSpace(my_string ) OrElse my_string .Length < 2 Then...
Dim char_array_end = "<br />".ToCharArray Dim char_array_start = "I ".ToCharArray Dim my_string = "I love pizza, beer, sambuca<br />" Dim my_string_trimmed = my_string.TrimEnd(char_array_end) Console.WriteLine(my_string_trimmed) ‘I love pizza, beer, sambuca’ my_string_trimmed = my_string.TrimStart(char_array_start) Console.WriteLine(my_string_trimmed) ‘love pizza,…
Dim AnHex As String = “FFFFFF” Dim MyInteger As Integer = CInt(“&H” & AnHex) Console.WriteLine(MyInteger)
Useful function to return the first non-nothing value in a list
Simply use the TypeOf operator to retrieve the type of an instance of an object. For example to find out if an object is a string: If TypeOf foo Is String Then Console.WriteLine(“fooo is a…
The simplest way Dim text = “.Maui is awesome” Dim count = text.Split(“a”).Length -1
Dim my_string As String = vbTab & “row1 ” & vbNewLine & “” & vbTab & ” row2 ” Dim rows As String() = my_string.Split(vbNewLine) Dim text As StringBuilder = New StringBuilder For Each row…