VB.NET Integer Casting / String Casting

VB.NET Integer Casting / String Casting

   Private Sub Casting()

      Dim A As Integer = 1
      Dim B As String = CStr(A)
      Dim C As Integer = CInt(B) + 1
      Dim D As String = CStr(C)

      Label1.Text = D

   End Sub