Mega Code Archive

 

Categories / VB.Net by API / System

 

Convert ToInt64

Imports System Public Class MainClass     Shared Sub Main(  )         Dim l As Long         Dim s As Single              l = Long.MaxValue         Console.WriteLine(l)              s = Convert.ToSingle(l)         s -= 1000000000000         l = Convert.ToInt64(s)              Console.WriteLine(l)     End Sub 'Main     End Class