Mega Code Archive

 

Categories / VB.Net / Development

 

Convert ChangeType

Imports System Public Class ChangeTypeTest     Public Shared Sub Main()         Dim d As [Double] = - 2.345         Dim i As Integer = CInt(Convert.ChangeType(d, GetType(Integer)))         Console.WriteLine(i)         Dim s As String = "12/12/98"         Dim dt As DateTime = CType(Convert.ChangeType(s, GetType(DateTime)), DateTime)         Console.WriteLine(dt)     End Sub 'Main End Class 'ChangeTypeTest