Contact: aviboots(AT)netvision.net.il
38,480 questions
50,145 answers
573 users
Imports System Public Module Module1 Public Sub Main() Dim d As Double = 195.8713 Dim i As Integer = CInt(d) Console.WriteLine(i) End Sub End Module ' run: ' ' 196 '
Imports System Public Module Module1 Public Sub Main() Dim d As Double = 195.8713 Dim i As Integer = CInt(Math.Truncate(d)) Console.WriteLine(i) End Sub End Module ' run: ' ' 195 '